找位大哥姐教VB，怎样按一个按纽进入一个网站

答案:4 悬赏:0 手机版

解决时间 2021-04-13 02:44

提问者网友：咪咪
2021-04-12 03:43

刚学VB语，还不太会，呵呵，另外，那网站也不是很会，找一个精通的没事教教

最佳答案

五星知识达人网友：狂恋
2021-04-12 05:16

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
Private Sub Command1_Click()

Dim HyperJump
Dim w
w = " http://qhdedu.net/A01.asp"
HyperJump = ShellExecute(0&, vbNullString, w, vbNullString, vbNullString, vbNormalFocus)

End Sub

全部回答

1楼网友：空山清雨
2021-04-12 06:12

给你一个不用任何控件就可以实现的方法很简单的，你一看就明白了

Shell "explorer "" http://www.baidu.com """, 1

需要注意的是在网址的前后要多加两个双引号因为在VB里，想把双引号加到字符串里，就必须用两个双引号表示一个双引号

explorer后面有一个空格然后把网址写进去

2楼网友：深街酒徒
2021-04-12 05:58

shell"explorer.exe http://www.baidu.com"

QQ：9986666@qq.tm

答案：问问

3楼网友：蓝房子
2021-04-12 05:42

一个最简单的方法，适合初学者使用

str =" www.baidu.com" WebBrowser1.Navigate str

我要举报

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息