VB登陆:
Private Sub Command1_Click()
If Text1.Text = "guest" Then
If Text2.Text = "12345" Then
MsgBox "登陆成功!"
End
End If
Else
MsgBox "账号或密码错误!"
End
End If
End Sub
VB问题:耶稣是哪国人
Private Sub Command1_Click()
If Text1.Text = "天国" Then
MsgBox "恭喜你,答对了!"
Else
MsgBox "恭喜你打错了,答案是天国"
End
End If
End Sub
Private Sub Command1_Click()
If Text1.Text = "guest" Then
If Text2.Text = "12345" Then
MsgBox "登陆成功!"
End
End If
Else
MsgBox "账号或密码错误!"
End
End If
End Sub
VB问题:耶稣是哪国人
Private Sub Command1_Click()
If Text1.Text = "天国" Then
MsgBox "恭喜你,答对了!"
Else
MsgBox "恭喜你打错了,答案是天国"
End
End If
End Sub