Private Sub Form_Load()
Shell "C:\Program Files\Internet Explorer\iexplore.exe" & Space(1) & "www.baidu.com", vbNormalFocus
Unload Me
End Sub
Private Sub Form_Load()
Shell "C:\Program Files\Internet Explorer\iexplore.exe" & Space(1) & "www.baidu.com", vbNormalFocus
Unload Me
End Sub