GUI Program to Validate User name and password

Private Sub Command1_Click()
If Text1.Text = "student" And Text2.Text = "dept123" Then
MsgBox "valid username and password", , "login"
Me.Hide
Else
MsgBox "invalid password,try again!", , "login"
End If
End Sub

Private Sub Command2_Click()
Me.Hide
End Sub