
Code:
Private Sub WebBrowser1_********Completed(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowser********CompletedEventArgs) Handles WebBrowser1.********Completed
Dim bilgi As HtmlElementCollection = WebBrowser1.********.All
For Each element As HtmlElement In bilgi
If element.GetAttribute("classname").Contains("fg-blue") Then
TextBox1.Text = element.InnerText
End If
Next
End Sub