在VB中如何链接到网址

首先在代码窗口左上角的下拉框中选择“通用”，右上角的下拉框中选择“声明”，然后在输入以下代码: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,
这样就可以链接网址了,比如在Label1标签上调用搜狐网页,就可以在Label1控件的Click事件中加入以下代吗:
Call ShellExecute(Main.hwnd, "open", "http://www.sohu.com", vbNullString, vbNullString, &H0)

直接运行下边的代码就可以了,2000以上
shell "explorer.exe " & url