Potrebbe venirti qualche idea:
codice:
Public Class Form1
Private Sub Form1_Shown(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Shown
wb.Navigate(New Uri("urlprova"))
End Sub
Private Sub wb_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs)_Handles wb.DocumentCompleted
MsgBox( wb.DocumentType)
End Sub
Private Sub wb_Navigating(ByVal sender As Object, _
ByVal e As System.Windows.Forms.WebBrowserNavigatingEventArgs) Handles wb.Navigating
MsgBox( e.Url.ToString)
End Sub
End Class