Как сделать вход и регистрацию в приложении? - Visual Basic .NET

  Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        TextBox1.PasswordChar = "*"
    End Sub
 
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        If TextBox1.Text = "password" Then
            MsgBox("Пароль введен верно", MsgBoxStyle.Information, "OK")
            Form2.Show()
            Me.Hide()
            'выполняемые действия, если пароль введен верно
        Else
            MsgBox("Пароль введен не верно", MsgBoxStyle.Critical, "Error")
            TextBox1.Text = ""
        End If
    End Sub