vb中如何使用超连接打开一个网站

Question

请问各位大侠，如何在VB中使用超连接，我想点击一个地方，直接用IE打开一个网站

Answer 1

摘自:http://expert.csdn.net/Expert/topic/1555/1555609.xml?temp=.6770746很多朋友都在问：
如何通过VB代码打开一个默认浏览器访问指定的URL，或者打开默认的邮件客户端向指定的Mailbox发送邮件。其实，很简单,使用API: ShellExecuteDeclare 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 LongPrivate Sub lblCSDN_Click()
ShellExecute 0, "open", "http://www.csdn.net", vbNullString, vbNullString, 3
End SubPrivate Sub lblEmail_Click()
ShellExecute 0, "open", "mailto:[email protected]?subject=反馈邮件 [邮件探测器]", vbNullString, vbNullString, 0
End Sub

Answer 2

TO yns(胡) :你自己试一下，如果不行，是否能说一下到底怎么不行？出现什么错误？能不能"具体点"!?

Answer 3

Cooly(☆回答问题不要分儿☆) ( ) 已经很具体了！
拿代码试试

Answer 4

用shell：Private Sub command1_Click()
dim goweb as string
goweb="Explorer.exe  "+text1.text  '在explorer.exe后面一定要加一两个空格
x=shell(goweb)
end sub程序运行时在文本框中输入合法的url地址例如http://163.com然后点击command1按钮就可以打开浏览器同时进入你想去的网址。。不过这个打开的浏览器是系统的默认浏览器，并不一定是ie。。如果一定要打开ie，得再想想

Answer 5

ShellExecute()是API,他是用默认的方式打开文件或网站,象你双击一样