vb编程入门代码 VB程序设计,用户登陆界面代码?
VB程序设计,用户登陆界面代码?Dim AAA As StringPrivate Sub Command1uclick()Dim AA,bbaa=“admin”“account BB=“Admin88
VB程序设计,用户登陆界面代码?
Dim AAA As StringPrivate Sub Command1uclick()Dim AA,bbaa=“admin”“account BB=“Admin888”“password AAA=Val(AAA)1“记录登录次数如果Val(AAA)>=3则”大于3次,提示并退出程序msgbox“您错误地输入了3次!如果text1=AA和text2=BB结束,则“如果输入正确,msgbox”登录成功Me.Hideform2文件. 显示“登录成功后,进入form2界面,否则”如果输入错误是msgbox “帐户或密码输入错误!“end IfEnd subprivate sub form Load()label1=”欢迎!“末端接头