UC知道一个编程问题，高手进来回答？
来源：百度知道 编辑：UC知道 时间：2024/06/01 11:50:36
Const pwd = "pass"
Private Sub Command1_Click()
Static times As Integer
If txtinput <> pwd Then
times = times + 1
MsgBox "错误"
If times = 3 Then End
Else
MsgBox "正确"
times = 0
End If
End Sub
这是一个设置密码的小程序，但是总是提示错误，请进哪儿出问题了，请写一个正确的，谢谢了，
Private Sub Command1_Click()
Static times As Integer
If txtinput <> pwd Then
times = times + 1
MsgBox "错误"
If times = 3 Then End
Else
MsgBox "正确"
times = 0
End If
End Sub
这是一个设置密码的小程序，但是总是提示错误，请进哪儿出问题了，请写一个正确的，谢谢了，
VB6 SP6 测试通过
一、在VB中新建工程
二、在窗体设计中创建Textbox对象，Name属性为：txtinput
三、在窗体的代码窗口中粘贴以下代码
Option Explicit
Const pwd = "pass"
Private Sub Command1_Click()
Static times As Integer
If txtinput <> pwd Then
times = times + 1
MsgBox "错误"
If times = 3 Then End
Else
MsgBox "正确"
times = 0
End If
End Sub
－－－－－－－－－－－－－－－－－－－－－－－－－－－
根据以上代码程序，我可以理解“狡猾的孤独”想实现用户如果输入错误密码三次就自动退出程序
其实vb中有关于输入密码的程序!
你的程序设计思路本身就有问题,
再者你的编程逻辑也不是很清楚!应该重新定位问题了!
if与end if对应个数也不一致啊!
编译应该没有什么问题吧!
就算编译通过了,你的程序也不可能实现你的功能!
在If times = 3 Then End
之后加个end if
你先调试一下,哪里不对,在去改!
编译通过。
逻辑比较混乱，建议将三次判断置于txtinput <> pwd判断后，减少if嵌套。
<>????????