设计一个用户登录窗体

来源:百度知道 编辑:UC知道 时间:2024/05/18 05:54:04
设计一个用户登录窗体(8分)。要求:
⑴ 允许用户最多输入3次密码(密码为:“password”),若密码正确,则装入指定窗体:frmmain,否则,重新输入密码,若密码输入超过3次,则结束程序。
⑵ 给出窗体上控件名称,并给出相应属性设置
VB
要具体的 代码 急要具体的代码 急要具体的代码急要具体的代码急要具体的代码

文件>新建工程>标准EXE(主窗体改名成:frmMain)
工程>添加窗体>登陆对话框(frmLogin)
工程>工程 属性>启动对象 设置为 frmLogin
================================================================
frmMain的代码:

根据需要
================================================================
frmLogin的代码:

Option Explicit

Public LoginTime As Single

Private Sub cmdCancel_Click()
End
End Sub

Private Sub cmdOK_Click()
If txtPassword = "password" Then
Me.Hide
FrmMain.Show
Else
LoginTime = LoginTime + 1
If LoginTime >= 3 Then
MsgBox "已经输错3次密码,程序退出!", , "登录"
End
End If
MsgBox "无效的密码,请重试!", , "登录"
txtPassword.Text = ""
txtPassword.SetFocus
End If
End Sub
=====================================================