Vb登陆界面设计.docx

Vb登陆界面设计 Vb登陆界面设计 1.所用主要控件，以及关键属性： 控件关键属性 Label Caption,backstyle,font text Caption, passwordchar Command caption,font,style,picture 2.使用了什么样的过程和方法 登陆界面程序代码： Dim i As Integer, j As Integer Private Sub Command1_Click() If Text2 "2022512" Then j = j + 1 i = MsgBox("请重新输入密码？", vbOKCancel + vbQuestion, "密码错误！" & "第" & j & "次") If i = 1 Then Text2.Text = "" Text2.SetFocus If j > 3 Then MsgBox ("密码错误3次，强制退出！") End Else Text2.Text = "" Text2.SetFocus End If End If If i = 2 Then End End If Else Load Form2 Form2.Show End If End Sub Private Sub Text1_LostFocus() If IsNumeric(Text1) = False Then MsgBox ("请输入数字！") End If End Sub 程序实现的功能： 用户名必须输入数字，不然会出现提示窗口：请输入数字。 密码如果输入正确则进入form2登录成功界面，输入错误会出现提示窗口：密码错误！第n次，请重新输入，当三次输入错误时，提示密码输入超过3次，程序自动结束。 3上机遇到的问题 开始对于变量的声明不是很清楚，不懂全局变量和局部变量的作用范围，后来上百度搜索并且和同学讨论使得程序得以顺利编完。 循环的嵌套问题还是不是很清楚，下课还要在研究一下，多参照些课外资料，多上网搜搜。 Vb的学习使得自己对编程的恐惧心理大大减小，上课老师的演示激发了我浓厚的兴趣，同时可视 化的面向对象的编程使得很多功能容易实现，这也在很大程度上增强自己的自信心。