Dim RESULT As String
        Dim col As HtmlElementCollection = _
          WebBrowser1.Document.GetElementsByTagName("td")
        Dim element As HtmlElement
        For Each element In col
            If element.InnerText = "Text 1" Then
                RESULT = element.NextSibling.InnerText
                TextBox3.Text &= ""
                TextBox3.Text &= element.NextSibling.InnerText & _
                  Environment.NewLine
            End If

Bitte gebt mir dazu ein VB beispiel

  WebBrowser1.Navigate("http://")
 
        Application.DoEvents()
 
        Do While WebBrowser1.ReadyState <> WebBrowserReadyState.Complete
 
            Application.DoEvents()
 
        Loop
 
        If WebBrowserReadyState.Complete Then
 
            WebBrowser1.Document.Forms(0).InvokeMember("submit")
 
        End If