怎么建立超连接？

Question

ShellExecute Me.hwnd, "Open", "http://www.csdn.net", vbNullString, vbNullString, 1

Answer 1

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