Excel如何创建用户登录窗口?介绍了如何利用VBA窗体控件、文本框控件和按钮控件制作用户登录窗口 。
1.启动Excel并打开工作表,打开Visual Basic编辑器,在项目资源管理器中单击鼠标右键,然后在上下文菜单中选择“插入|用户表单”以插入用户表单 。按F4打开“属性”对话框,在“标题”文本框中输入文本“用户登录”来更改表单标题,如图1所示 。
文章插图
图1创建一个用户表单并设置其属性
2.从“工具箱”对话框中选择“文本框”控件、“标签”控件和“命令按钮”控件,并在表单中绘制这些控件,如图2所示 。在“属性”对话框中,将两个标签控件的“标题”属性分别设置为“登录名”和“登录密码”,并将命令按钮控件的“标题”属性分别设置为“确定”和“取消”,如图3所示 。
文章插图
图2向表单添加控件
文章插图
图3修改控件的
3.选择表单中的第二个“文本框”控件,并将“属性”对话框中的“密码字符”属性设置为字符“*”,如图4所示 。这样,在此文本框中输入的字符将被“*”替换 。
文章插图
图4更改
4.右键单击表单中的“确定”按钮,并在上下文菜单中选择“查看代码”命令以打开“代码”窗口 。此时,Visual Basic编辑器将自动向“代码”窗口中的控件添加一个单击事件 。为此按钮添加点击事件程序,如下所示:
【Excel怎么创建用户登录窗口?】私有子命令按钮1 _单击()
如果文本框1 。文本“郭一凡”然后“判断用户名是否正确
‘ MsgBox ‘用户名错误,您无权登录!’给出了不正确的提示
带文本框1 。“SelStart=0”设置选定文本的起始字符 。SelLength=Len(文本框1 。设置选定文本的长度 。“设置焦点”文本框获得焦点
Elseif textbox2.text’ abcdef ‘然后’如果密码错误
‘密码输入不正确,请重新输入!’暗示
带文本框2 。“SelStart=0”设置选定文本的起始字符 。SelLength=Len(文本框2 。设置选定文本的长度 。获取焦点的“设置焦点”
MsgBox ‘登录成功,欢迎光临!’登录成功提示
“卸载我”卸载表单
这里,程序首先判断第一个文本框中文本属性的值是否是设置的用户名,如果不是,则给出提示 。同时,使用With结构来设置关键的SelStart属性和SelLength属性,以便文本框中的文本可以突出显示 。同时,使用SetFocus方法使文本框获得焦点,方便用户更改用户名 。如果输入的是设置的用户名,那么程序判断第二个文本框中的文本属性值是否是设置的密码,如果不是,则执行与错误用户名相同的操作 。如果用户名和密码正确,程序会提示并卸载表单 。
5.然后在“代码”窗口中输入程序代码,并为“取消”按钮添加点击事件代码 。
6.按F5运行程序,出现“用户登录”窗口 。在“登录名”文本框中输入人员的姓名 。如果用户未被授权,程序将给出提示,如图4所示 。点击“确定”按钮关闭提示对话框,“登录名”文本框将获得焦点,并在其中输入正确的登录名 。在“登录密码”文本框中输入密码 。如果密码错误,程序会给出提示,如图5所示 。如果您输入了正确的用户名和登录密码,程序会提示登录成功,如图6所示 。单击确定关闭对话框,用户登录表单将关闭 。
推荐阅读
- 煮粽子熟了红豆不熟怎么办
- T恤怎么穿都不高级?也许是面料和下装都选错了,和长相关系不大
- 鲜榨黄桃汁怎么做好吃
- 淘宝卖家怎么报名省钱专区?如何进入?
- 淘宝直播99珠宝节是怎么回事?
- 樱桃罐头怎么做好吃
- 淘宝店铺公益宝贝怎么设置?设置有好处吗?
- 淘宝会员名修改诀窍是什么?怎么取好听淘宝会员名?
- 香蕉酸奶芒果夹心雪糕怎么做好吃
- 淘宝曝光率一般是多少?怎么增加曝光?