Public Class Form1
    Inherits System.Windows.Forms.Form
 
#Region " Vom Windows Form Designer generierter Code "
    ' ...
#End Region
 
    Dim MyDOM As mshtml.HTMLDocument
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles Button1.Click
        ' Document Object festlegen
        MyDOM = AxWebBrowser1.Document
        ' Warten
        Do
            Application.DoEvents()
        Loop Until MyDOM.getElementsByName("error").item(0).value = "2"
        ' fertig gewartet
        MsgBox("Jo, da steht nu 2!")
    End Sub
 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles MyBase.Load
        AxWebBrowser1.Navigate(Application.StartupPath & "\file.htm")
    End Sub
 
End Class

Meine Homepage: www.dartrax.de