1.如何在VB程序中实现超链接功能(即点击就显示网站)?
2.各多媒体的控件中的播放路径可不可以是绝对路径(即网址)?
谢谢大家指教啦
[此贴子已经被作者于2005-10-21 19:41:24编辑过]
请问,如何做到把鼠标放到网址上时,才出现下划线
可以利用Form1及Label1的MouseMove事件,对Label1的FontUnderline属性进行设置,我试了一下,下面这段代码可以达到你所说的要求:
Private Sub Form_Load()
Label1.Caption = "http://www.bc-cn.net"
End Sub
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Label1.FontUnderline = False
End Sub
Private Sub Label1_Click()
Shell "explorer.exe ""http://www.bc-cn.net""", vbMaximizedFocus
End Sub
Private Sub Label1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Label1.FontUnderline = True
End Sub