io l'ho convertito così:

Dim curElement As HtmlElement = WebBrowser1.Document.GetElementById("link")
MessageBox.Show(curElement.GetAttribute("InnerText "))

ma non funziona, per questo ho chiesto un aiuto