在VB中如何实现链接

Question

我想在VB中建立链接，该如何实现

Answer 1

ShellExecute 0, "", "http://www.csdn.net", "", "", 5

Answer 2

ShellExecute 0, "", "mailto:你的邮箱", "", "", 5

Answer 3

还要在模块中加入这么一句:
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事件中相应上面的语句就可以很容易的实现超链接功能了

Answer 4

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
Private Sub Command1_Click()ShellExecute 0, "", "www.sina.com.cn", "", "", 5End Sub