Auswertung Zustand andauert, wenn die Bedingung nicht

In einem WebBrowser-Steuerelement in einem Visual Studio-Formular dieser Code erfüllt funktioniert:Auswertung Zustand andauert, wenn die Bedingung nicht

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles Me.Load 

    WebBrowser1.DocumentText = 
    "<html><body>Search in Google:<br/>" & 
    "<form method='get' action='http://www.google.com/search'>" & 
    "<input type='text' name='as_q'/><br/>" & 
    "<input type='submit' value='Search'/>" & 
    "</form></body></html>" 

End Sub

Wenn ich den folgenden Code Validieren ein HTML-Formular über das WebBrowser-Document-Eigenschaft hinzufügen, erhalten diese Fehlermeldung: Objektreferenz wurde nicht auf eine Instanz eines Objekts gesetzt.

Private Sub WebBrowser1_Navigating(sender As Object, e As WebBrowserNavigatingEventArgs) Handles WebBrowser1.Navigating 

    Dim document = WebBrowser1.Document 
    If document IsNot Nothing And 
    document.All("as_q") IsNot Nothing And 
    String.IsNullOrEmpty(
    document.All("as_q").GetAttribute("value")) Then 
     e.Cancel = True 
     MsgBox("Please enter a search term.") 
    End If 

End Sub

Quelle

2016-09-29 Enrique Bello

Vielen Dank Zagger. Dieses und andere Beispiele funktionieren !!!!. Entschuldigung .. Zaggler. –