Cómo abrir una página web en programación VB
Coloque la siguiente oración en la primera línea del código:
Función de declaración privada ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation Como cadena, ByVal lpFile como cadena, ByVal lpParameters como cadena, ByVal lpDirectory como cadena, ByVal nShowCmd As Long) As Long
Defina otra función:
Private Sub OpenUrl(tUrl As String )
'Abre la página de inicio con ie
ShellExecute Me.hwnd, "Open", tUrl, 0, 0, 0
End Sub
Donde necesites usarlo, como el evento de clic, agrega:
OpenUrl "http://*"
Eso es todo