Excel怎么制作用户登录窗口?( 二 )


Unload Me ‘卸载窗体
ThisWorkbook.Close ‘关闭工作簿
End Sub
6、按F5键运行程序出现“用户登录”窗口 , 在“登录名”文本框中输入人名 , 如果非授权用户 , 程序给出提示 , 如图4所示 。单击“确定”按钮关闭提示对话框后 , “登录名”文本框获得焦点 , 在其中输入正确登录名 。在“登录密码”文本框中输入密码 , 如果密码错误 , 程序给出提示 , 如图5所示 。如果输入正确的用户名和登录密码 , 程序提示登录成功 , 如图6所示 。单击“确定”按钮关闭对话框 , “用户登录”窗体将关闭 。

Excel怎么制作用户登录窗口?


图5 登录名输入错误提示
Excel怎么制作用户登录窗口?


图6 密码输入错误提示
Excel怎么制作用户登录窗口?


图7 登录成功提示
7、在工程资源管理器中双击”ThisWorkbook”选项打开“代码”窗口 , 在其中输入如下程序代码使工作簿打开时用户窗体可见 。切换到Excel , 保存文档 , 完成本实例的制作 。

猜你喜欢