[VB6] Aprire collegamenti (link) tramite ShellExecute

[MItaly]

Public Sub Command1_Click()
    ShellExecute Me.hWnd, "open", "http://www.tuosito.com", vbNullString, vbNullString, SW_NORMAL
End Sub

(maledette parentesi.. mi confondo sempre con VB.NET )