写一个登录器，帐号110 密码120
以下是我自己写的代码
Private Sub Command1_Click()
If s = 110 Then t1 = "登陆成功"
If s <> 110 Then t1 = "帐号或密码错误"
If z = 120 Then t2 = "登陆成功"
If z <> 120 Then t2 = "帐号或密码错误"
Text1.Text = t1
Text2.Text = t2
End Sub

Private Sub Command2_Click()
Text1.Text = ""
Text2.Text = ""
End Sub

Private Sub Command3_Click()
End
End Sub

Private Sub Form_Load()
Command1.Caption = "确定"
Command2.Caption = "注销"
Command3.Caption = "退出"
Frame1.Caption = "帐号"
Frame2.Caption = "密码"
Frame3.Caption = "作者:黑夜里的黑猫"

Form1.Caption = "QQ2010"
Text1.Text = ""
Text2.Text = ""
End Sub

Private Sub Frame4_DragDrop(Source As Control, X As Single, Y As Single)
Frame = t2
End Sub
为什么输入正确，但是还显示帐号或密码错误？？谁能帮忙改下

新学VB  才几天