Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    My.Settings.username = TextBox1.Text
    My.Settings.password = TextBox2.Text

    If String.IsNullOrWhiteSpace(TextBox1.Text) OrElse String.IsNullOrWhiteSpace(TextBox2.Text) Then
        MsgBox("Wrong username or password!")
    ElseIf TextBox1.Text = My.Settings.username And TextBox2.Text = My.Settings.password Then
        MsgBox("Welcome, you were successfully logged in!")
        Me.Hide()
        Selector.Show()
    End If
End Sub