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???
arrow
arrow
    全站熱搜

    vbqa 發表在 痞客邦 留言(1) 人氣()