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 <> "2008512" Then j = j + 1
i = MsgBox("请...
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 <> "2008512" 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的学习使得自己对编程的恐惧心理大大减小,上课老师的演示激发了我浓厚的兴趣,同时可视化的面向对象的编程使得很多功能容易实现,这也在很大程度上增强自己的自信心。
本文档为【Vb登陆界面设计】,请使用软件OFFICE或WPS软件打开。作品中的文字与图均可以修改和编辑,
图片更改请在作品中右键图片并更换,文字修改请直接点击文字进行修改,也可以新增和删除文档中的内容。
[版权声明] 本站所有资料为用户分享产生,若发现您的权利被侵害,请联系客服邮件isharekefu@iask.cn,我们尽快处理。
本作品所展示的图片、画像、字体、音乐的版权可能需版权方额外授权,请谨慎使用。
网站提供的党政主题相关内容(国旗、国徽、党徽..)目的在于配合国家政策宣传,仅限个人学习分享使用,禁止用于任何广告和商用目的。