|
#2
|
||||
|
||||
|
Hmm... ziemlich lange her...
Code:
Private Sub Command1_Click()
If Text2 = "Müller" And Text1 = "Test" Or Text2 = "Meier" And Text1 = "falsch" Then
MsgBox ("Zutritt gewährt")
hier kommt der Name der Form die aufgerufen werden soll
Exit Sub
Else: MsgBox ("Username / Passwor falsch oder nicht bekannt")
End If
End Sub
__________________
Zitat:
|