为什么VB中这段代码错了

来源：百度知道 编辑：UC知道 时间：2024/05/23 14:47:37
Private Sub Command1_Click()
Dim a
a = Shell("C:\Program Files\Internet Explorer\iexplore.exe", vbMaximizedFocus & "http://www.baidu.com/s?wd=" & Text1.Text & "&cl=3")
End Sub

当然错了，你参数写错位置了，正确的如下：
Private Sub Command1_Click()
Dim a
a = Shell("C:\Program Files\Internet Explorer\iexplore.exe http://www.baidu.com/s?wd=" & Text1.Text & "&cl=3", vbMaximizedFocus)
End Sub

另外，你a申请了又不用，不如不申请。直接：
Private Sub Command1_Click()
Call Shell("C:\Program Files\Internet Explorer\iexplore.exe http://www.baidu.com/s?wd=" & Text1.Text & "&cl=3", vbMaximizedFocus)
End Sub

换这个

a = Shell("C:\Program Files\Internet Explorer\iexplore.exe" & " http://www.baidu.com/s?wd=" & Text1.Text & "&cl=3", vbMaximizedFocus)

a = Shell("C:\Program Files\Internet Explorer&