Shell("explorer 网址")就可以了

解决方案 »

  1.   

    VB有各超级链接得控件,可以查一下msdn就知道用法了
      

  2.   

    使用LABEL控健,设字体为蓝色带下划线,鼠标指针设为手形。
    在CLICK事件中加入以下代码,
    Dim HYPERJUMP
    HYPERJUMP = ShellExecute(0&, vbNullString, "MAILTO:[email protected]", vbNullString, vbNullString, vbNormalFocus)
    就可以发电邮。
    超级链接同理
       ShellExecute 0&, vbNullString, "Http:\\www.shawls.coc.cc", vbNullString, vbNullString, vbNormalFocus
      

  3.   

    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发e-mail:
     ShellExecute hwnd, "open", "mailto:[email protected]", vbNullString, vbNullString, 0
    浏览IE:
    ShellExecute 0, "open", "http://wulai.yeah.net", vbNullString, vbNullString, 3
      

  4.   

    x=shellexecute(0&,vbnullstring,"http:...",vbnullstring,vbnullsring,vbnormalfocus)