password visual basic 6.0

formulario:
If txtpassword.Text <> "hola" Then
MsgBox "incorrecto", vbCritical, "atención"
Else
MsgBox "correcto", vbInformation, "atencion"
frmcalculadora.Show
Unload Me
End If