Spanish Boton abre pagina web

Sub Button1_Click
    Dim p As PhoneIntents
    Dim url As String
    url = "http://www.webgis.de"   
    StartActivity(p.OpenBrowser(url))

End Sub

Dim WebView1 As WebView
' ----------------------------------------


WebView1.Initialize(NombredelEvento)

WebView1.LoadUrl(NombrePaginaWeb)

' ------------------------------------------
WebView1.LoadHtml (String de HTML)