易语言启动前输入密码

用户名的编辑框取名：UserName 密码输入编辑框取名：Pwd
.版本 2

.子程序 __启动窗口_创建完毕

UserName.内容 ＝""
UserName.获取焦点 ()

.子程序 _登陆_被单击
.如果 (UserNam.e.内容 ≠ “”)
.如果 (Pwd.内容 ≠ “”)
.如果 (Pwd.内容 ＝ “888888”)
载入 (主窗口, , 真)

.否则
信息框 (“密码不正确！请重新输入。”, 0, )
Pwd.内容 ＝ “”
Pwd.获取焦点 ()
.如果结束

.否则
信息框 (“密码不能为空！”, 0, )
Pwd.获取焦点 ()
.如果结束

信息框 (“系统无此用户，请核对！”, 0, )
UserName.获取焦点 ()

.否则
信息框 (“用户名不能为空！”, 0, )
UserName.获取焦点 ()
.如果结束

温馨提示：答案为网友推荐，仅供参考

当前网址：https://verywind.cn/ee/ej33fjv3v.html