vb里超链接控件是哪个?(游览器不一定是ie)

发布时间:2024-05-22 06:54 发布:上海旅游网

问题描述:

问题解答:

复制以下代码,绝对好使。以默认浏览器打开
先在窗体上添加一个名为“label1”的label控件:
Private Sub Form_Load()
With Label1
.Caption = "www.baidu.com" '改成想要的内容
.Font.Underline = True
.ForeColor = vbBlue
End With

End Sub

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Label1.ForeColor = vbBlue
Me.MousePointer = 0

End Sub

Private Sub Label1_Click()

CreateObject("wscript.shell").run "http://www.baidu.com" '完整的网址
End Sub

Private Sub Label1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Label1.ForeColor = vbRed
Me.MousePointer = 0

End Sub

热点新闻