Private Sub Label1_Click()
Shell "C:\Program Files\Internet Explorer\IEXPLORE.EXE" & "http://www.163.com", vbNormalFocus
Me.MousePointer = vbHourglass
End Sub
这是照书上打的,地址也没错 但是出现文件没找到的错误...不知道怎么回事
还有教小弟一些Shell的用法..
Thanks.

Private Sub Label1_Click()
Shell "C:\Program Files\Internet Explorer\IEXPLORE.EXE www.163.com", vbNormalFocus
Me.MousePointer = vbHourglass
End Sub
我改成这样就能执行了 难道书上错了

Private Sub Label1_Click()
Shell "C:\Program Files\Internet Explorer\IEXPLORE.EXE " & "http://www.163.com", vbNormalFocus
Me.MousePointer = vbHourglass
End Sub

[此贴子已经被作者于2006-11-23 10:56:02编辑过]

enene.书上也会出错。

书上那个地方少个空格