Dim PageElements As HtmlElementCollection = WebBrowser1.Document.GetElementsByTagName("a")
Dim Pages() As String = {"", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", ""...