Leggere codice HTML

Dim Matched as Boolean
Dim LineNumber as Integer
With Browser.DocumentStream
Do Until .EndOfStream
LineNumber += 1
If InStr(.ReadLine, "href=""www.pincopallo.net""") > 0 Then
Matched = True
Exit Do
End If
Loop
End With
If Matched Then
MsgBox("Link trovato! Riga " & LineNumber)
Else
MsgBox("Link non trovato!")
End If

'Prima della with
Dim DocStream as StreamReader = Browser.DocumentStream
'la with la modifichi così
With StreamReader
'....
End With

For Each Link As Windows.Forms.HtmlElement In Browser.Document.Links
            If Link.GetAttribute("href") = "www.unsito.com" Then
                MsgBox("Ho trovato il link!")
                Exit For
            End If
        Next

WebBrowser1.Document.GetElementById("id_del_form").InvokeMember("submit")

Private Sub GetElementById()
Throw New NotImplementedException
End Sub

Private Sub GetElementById(ByVal p1 As String)
Throw New NotImplementedException
End Sub

Private Function Info(ByVal p1 As String) As Object
Throw New NotImplementedException
End Function