VB怎么打开某个网页?

Question

RT
(当时IE并没有运行)谢了

Answer 1

可以用API ShellExecute
可以这样:
Private Sub OpenHomeSite()
    Dim oIE As Object
    Set oIE = CreateObject("InternetExplorer.Application")       
    oIE.Navigate "http://www.gfg.com/" 
    oIE.Visible = True
    Set oIE = Nothing
End Sub

Answer 2

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 LongPrivate Sub Label1_Click()
  ShellExecute Me.hwnd, "open", "http://www.sohu.com", vbNullString, vbNullString, 1  
End Sub

Answer 3

可以下载看一下！我做的~
http://www.cmiic2.com/mty/mtynet.exe

Answer 4

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
ShellExecute Me.hwnd, "open", 网址，vbNullString, vbNullString, 1  

Answer 5

ShellExecute Me.hwnd, "open", 网址，vbNullString, vbNullString, 1  这是最简单了

Answer 6

同意用ShellExecute打开,这样就可以使用默认浏览器打开URL.如果用InternetExplorer对象的话,总是会用IE打开网址的（有时候用户会觉得很不爽:)）

Answer 7

shell "explorer http://www.csdn.net"

Answer 8

shell "explorer http://www.csdn.net"