by zach smith (2 Submissions)
Category: Miscellaneous
Compatability: Visual Basic 3.0
Difficulty: Beginner
Date Added: Wed 3rd February 2021
Rating: (3 Votes)
Accept multiple passwords, yet still deny access for wrong password entries.
Dim Pw1 As String
Dim Pw2 As String
Pw1 = "password1"
Pw2 = "password2"
If Text1 = Pw1 Then
MsgBox "you entered the correct password"
Else
If Text1 = Pw2 Then
MsgBox "you entered the correct password"
Else
MsgBox "wrong password, please try again"
End If
End If