Imports System.Text.RegularExpressions
Imports System.Net

Public Class VoteForm
    Private Sub WebBrowser1_DocumentCompleted(sender As Object, e As WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted
        WebBrowser1.Document.Window.ScrollTo(150, 300)
    End Sub

    Private Sub WebBrowser1_DocumentTitleChanged(sender As Object, e As EventArgs) Handles WebBrowser1.DocumentTitleChanged
        If WebBrowser1.DocumentTitle.Contains("Voting Gateway") = False Then
            Form1.Show()
            Me.Close()
        End If
    End Sub

End Class