Private Sub Form_Initialize()
Please take a look:
____________________________________________________________
x = InputBox("Password Albert", "Guess what your password it!!!", "Enter it here")
If x <> abc Then
MsgBox "wrong password!!!", vbCritical
Else
Form1.Visible = True
End If
End Sub
____________________________________________________________
But the password is still wrong when I type abc!!!.What's wrong???