

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim Doc As HtmlElementCollection = WebBrowser1.Document.All
For Each Ele As HtmlElement In Doc
If Ele.GetAttribute("className") = "score-spiders" Then 'Change the bigscore to what class you want
MessageBox.Show(Ele.InnerText)
End If
Next
End Sub

