vb help

this my code
Private Sub cmdLogon_Click()

If txtName.Text = vbNullString Then
MsgBox "you must enter your name", vbOKOnly + vbInformation, " Name Error"
End If



If txtPassword.Text = vbNullString Then
MsgBox "you must enter your password", vbOKOnly + vbInformation, " Password Error"
End If




If txtPassword.Text = "Password" Or txtPassword.Text = "password" Then
MsgBox "logon complete", vbOKOnly
End If


If txtPassword.Text <> "Password" Or txtPassword.Text <> "password" Then
MsgBox " invalid password ", vbOKOnly + vbInformation, "invalid password"
End If


End Sub

when i put the correct password it said login but then invalid password how to fix this.

What language is that? It looks like Pascal maybe?

it is vb i found the problem.