Question

求大佬解决一个VB编写程序的问题

编程实现以下功能：设计界面能输入用户名与密码，“确认”按钮单击事件的程序要求如下：若输入的用户名不是大写或小写的“user”，则信息框显示“请重新输入用户名！”；若用户名输入正确而输入的密码不是“888” ，则信息框显示“请重新输入密码！”；若输入的次数超过3次，则退出，密码正确则提示“登录成功，欢迎使用系统！”界面自行设计。

Answer 1

Dim zz As Integer '计数用

Private Sub Command1_Click()

If LCase(Text1.Text) = "user" Then '无论大小写，均转换为小写判断

If Text2.Text = "888" Then    '判断密码正确

MsgBox ("登录成功，欢迎使用系统！")

Else

zz = zz + 1

If zz <= 3 Then

MsgBox ("请重新输入密码")

Text2.Text = ""

Else

End

End If

End If

Else

MsgBox ("用户名错误，请重新输入")

Text1.Text = ""

Text2.Text = ""

End If

End Sub