Advertisement
ASP_Volume2 Miscellaneous #32098

Accept multiple passwords.

Accept multiple passwords, yet still deny access for wrong password entries.

AI

ملخص الذكاء الاصطناعي: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.

كود المصدر
original-source
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
التعليقات الأصلية (3)
مسترجع من Wayback Machine