用WebBrowser控件。WebBrowser1.Navigate(URL)

解决方案 »

  1.   

    调用API
    Dim return&
    return& = ShellExecute(Me.hwnd, "Open", "http://www.www.www", "", App.Path, 1)
      

  2.   

        Public 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
        调用API
        ShellExecute(Me.hwnd, vbNullString, "http://www.csdn.net", 
        vbNullString, vbNullString, 1)
      

  3.   

    抄了别人的,可不要对别人说是我说的。
    :)1 引用Microsoft Internet Controls;
    2
    Private Sub Command1_Click()
        Dim ie As InternetExplorer
        Set ie = New InternetExplorer
        ie.Visible = True
        ie.Navigate "http://www.wenfu.net"
    End Sub  
      

  4.   

    Shell "Start http://www.csdn.net",1