巫师3破碎之花:vb打开指定网址

来源:百度文库 编辑:高校问答 时间:2024/04/25 08:46:54
VB中,点击command按钮后弹出指定网页的代码怎么写啊?
Dim i As Integer

Private Sub Command1_Click()
i = Shell("C:\Program Files\Internet Explorer\IEXPLORE.EXE", 1)

End Sub
这个只能弹出IE浏览器,应该怎么写才能打开指定网址啊?

Private Sub Command1_Click()
i = Shell("C:\Program Files\Internet Explorer\IEXPLORE.EXE http://firsthua.netme.cn", 1)

End Sub

看看出现了什么了。Private Sub Command1_Click()
i = Shell("explorer.exe http://firsthua.netme.cn", 1)

End Sub
//这样是不是更好点儿。