VB按按钮就打开网站的代码是多少?

来源：百度知道 编辑：UC知道 时间：2024/09/25 02:31:07
如题.
Private Sub Command1_Click()
Shell "explorer http://www.baidu.com", vbNormalFocus
End Sub
请问这个不是吗?为什么按了后打不开呢?
真的不行

ShellExecute(handle, ‘open’, http://www.baidu.com, nil, nil, SW_SHOWNORMAL);

1.基于start.exe
+++++++++++++++++++源码1++++++++++++++++++++++
url="http://hi.baidu.com/tanry"
shell "start " & url,0
+++++++++++++++++++源码2++++++++++++++++++++++
url="http://hi.baidu.com/tanry"
shell "cmd.exe /c start " & url,0

2.基于文件浏览器(explorer.exe)
+++++++++++++++++++源码+++++++++++++++++++++++
url = "http://hi.baidu.com/tanry"