今天想弄一个有彩蛋的登录器，然后写了这段代码：
（Form3是彩蛋内容）
Private Sub Command1_Click()
If Text1 = 10086 And Text2 = 10086 Then
MsgBox "登陆成功"
Else
MsgBox "账号或密码错误请重新登陆"
End If
If Text1 = 12345 And Text2 = 12345 Then
Form3.Show
Else
MsgBox "账号或密码错误请重新登陆"
End If
End Sub
运行了之后就发现他先弹账号密码错误再出Form3
有没有办法让他不弹啊 谢谢
本人刚学两天vb什么都不懂

我估计改成这样就是你想要的效果了：
If Text1 = "10086" And Text2 = "10086" Then
MsgBox "登陆成功"
ElseIf Text1 = "12345" And Text2 = "12345" Then
Form3.Show
Else
MsgBox "账号或密码错误请重新登陆"
End If