vb中密码登陆怎么写。

来源:百度知道 编辑:UC知道 时间:2024/05/17 02:12:01
我要的是如果账号等于123456密码等于654321 登陆成功
账号等于abcde密码等于edcba能登陆成功
账号等于123abc密码等于cba321也能登陆成功

就是账号密码满足上面3个条件都可以登录成功否则就不成功。

下面显示的只是满足一个条件!我想要满足3个条件的!
rivate Sub Command1_Click()
If Text1.Text = "123456" And Text2.Text = "abc" Then
MsgBox "登陆成功!!", , "欢迎登陆"
Form1.Hide
Form2.Show
Else
Text1="
Text2=""
MsgBox "密码错误"
End If
End Sub
还有点就是满足条件1跳转到from2

满足条件2跳转到from3
满足条件3跳转到from4该怎么写!

private Sub Command1_Click()
If Text1.Text = "123456" And Text2.Text = "abc" Then
MsgBox "登陆成功!!", , "欢迎登陆"
Form1.Hide
Form2.Show
elseIf Text1.Text = "abede" And Text2.Text = "edcba" Then
MsgBox "登陆成功!!", , "欢迎登陆"
Form1.Hide
Form3.Show
elseIf Text1.Text = "123abc" And Text2.Text = "cba321" Then
MsgBox "登陆成功!!", , "欢迎登陆"
Form1.Hide
Form4.Show
Else
Text1="
Text2=""
MsgBox "密码错误"
End If
End Sub

IF TEXT1.TEXT="123456" AND TEXT2.TEXT="654321" THEN
MsgBox "登陆成功!!", , "欢迎登陆"
Form1.Hide
Form2.Show
ELSEIF TEXT1.TEXT="abcde" AND TEXT2.TEXT="edcba" THEN
MsgBox "登陆成功!!", , "欢迎登陆&qu