怎么样为窗体加入带下划线的超连接

Question

最简单的就是使用袁飞打印预览控件里的 DNetButton 控件啦!http://ygyuan.3322.net/
http://ygyuan.onchina.net/

Answer 1

不带下划线的超级连接你要是会。
把Label的font设置一下就行了。

Answer 2

但是怎么在labeL的click事件里写转到URL代码啊

Answer 3

label1_click事件中加入
shell 就可以了!!
直接调用IE

Answer 4

调用IE我当然会了啊，问题是怎么使IE自动访问设置的地址啊，你就在行行好告诉我吧

Answer 5

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Const SW_SHOWNORMAL = 1
Private Sub Label1_Click()    ShellExecute Me.hwnd, vbNullString, "http://www.sina.com.cn", vbNullString, "C:\", SW_SHOWNORMAL
End Sub

Answer 6

webbrowser控件也可以完成同样的工作。
如：WebBrowser1.Navigate2 "www.sina.com.cn"

Answer 7

Public Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Longｌａｂｅｌ的CLICK事件：ShellExecute Me.hwnd, "open", "http://www.csdn.net", 0, 0, 0
顺便说一句，在 VB.Net　里到是有现成的一个控件