Se ho capito bene tu vorresti cliccare (per esempio su una label)
e lanciare una pagina (internet) predefinita tramite il tuo browser:

Se così:

codice del modulo:
codice:
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
Public Const W_SHOWNORMAL = 1

Public Function LanciaBrowser(Handle As Long, Indirizzo As String)
    Dim retValue As Long
    retValue = ShellExecute(Handle, vbNullString, Indirizzo, vbNullString, "c:\", SW_SHOWNORMAL)
End Function
codice del form:
codice:
Private Sub Label1_Click()
    'EDITOR DI POSTA PREDEFINITO
    'LanciaBrowser Me.hwnd, "mailto:ivan@database.it"
    'BROWSER PREDEFINITO
    LanciaBrowser Me.hwnd, "http://www.html.it"
End Sub