简单的VB对话框问题
这道题的要求是这样的：有三个按钮控件，其中comman1是输入按钮，command3是登录按钮，command2是退出按钮，还有一个列表框list1接收command1即输入按钮输入的信息，程序运行的时候command1按钮是不能使用的，只有当command3登录按钮在三次以内输入正确密码，command1才变为可用，我想要程序运行的时候，登录按钮只能实现输入三次密码，超过三次就自动退出程序，我写了一下程序，发现，运行的时候，只要不要输入密码超过三次，重新点击登录按钮的时候，输入密码的次数又重新计算了，这样的话，只要每一次点击登录按钮的时候输入密码次数不要超过三次，那么就可以无限制的输入密码，达不到一共只能输入三次的目的，请大家帮忙看看，要怎么才能实现，不管登录按钮点击了多少次，计算输入密码次数的变量countt不会重新计算，而是会一直累计下去的。
下面是我写的代码：
Private Sub Command1_Click()
a = InputBox("请输入学生名称,输入对话框")
Do While a <> ""
List1.AddItem a
a = InputBox("请输入学生名称,输入对话框")
Loop
End Sub
Private Sub Command2_Click()
a = MsgBox("真的要退出程序吗？", 4 + 48 + 256, "退出对话框")
If a = 6 Then
End
End If
End Sub
Private Sub Command3_Click()
a = InputBox("请输入密码,密码输入框")
Countt = 1
Do While a <> "123456"
b = MsgBox("你输入的密码不正确", 5 + 16 + 256, "密码核对框")
If b = 4 Then
a = InputBox("请输入密码,密码输
相关问答：
大家好，问个vb打印问题
printer.print "dsff"
.....
....
Printer.EndDoc
打印成功后我将执行
sqlstr = "update vc_yh set pr=' 已打印 ', ......
我有自动生成序列号的程序，但是怎么跟打包后的安装程序结合在一起，在安装时提示用户输入序列号，正确后再继续安装？？？
方法1：你可以在运行程序后输入序列号注册，很多软件都是这样的。
方法2：使用Setu ......
"insert into user1(name,age) values('" & Text1.Text & "','" & Text2.Text & "' )"
问题：对sql语句中单、双引号模糊。既然 Text1.Text就表示 ......
题目描述应该不是很准确。
现状是：假如一个文本文件共100行，那么我循环次数最大就是100×100=10000下，花费时间非常多，请问有没有办法能够提高对文本文件的循环访问速度。非数据库技术。
你要循环做什么� ......
在vb这编程里似乎有很多的东西是相联系的，为什么有些人对vb的编程摸不到头脑啊！并且有些事很容易的，但是却把它们的代码变成复杂，也去想一些不能实现的东西啊！
没分了，楼主多来点分！
来接点分
......
