Public Class Login

    Dim wClient As New System.Net.WebClient
    Private Sub TextBox1_TextChanged(sender As System.Object, e As System.EventArgs) Handles TextBox1.TextChanged

    End Sub

    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        Dim results As String = wClient.DownloadString("http://yourdomain.esy.es/Login/handler.php?action=register&username=" + TextBox1.Text + "&password=" + TextBox2.Text)

        If results = "1" Then

            MessageBox.Show("Successfully Registered!")

        ElseIf results = "0" Then

            MessageBox.Show("There Is An Error, Please Try Again")

        End If
    End Sub

    Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click

        Dim results As String = wClient.DownloadString("http://yourdomain.esy.es/Login/handler.php?action=login&username=" + TextBox1.Text + "&password=" + TextBox2.Text)

        If results = "1" Then

            MessageBox.Show("Successfully Logged In!")

            Form1.Show()
            Me.Hide()



        ElseIf results = "0" Then

            MessageBox.Show("Invalid Login Info", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)

        End If

    End Sub
End Class