codice:
Private Sub lbl_google_Click()
Call Shell("explorer http://www.google.it", vbMaximizedFocus)
End Sub
Prova così