.版本 2
.程序集 窗口程序集_启动窗口
.子程序 _编辑框_用户名_获得焦点
.如果真 (编辑框_用户名.内容 = “请输入账号”)
编辑框_用户名.内容 = “”
.如果真结束
.子程序 __启动窗口_创建完毕
编辑框_密码.获取焦点 ()
.子程序 _编辑框_用户名_失去焦点
.如果真 (编辑框_用户名.内容 = “”)
编辑框_用户名.内容 = “请输入账号”
.如果真结束
.子程序 _按钮_登陆_被单击
编辑框_用户名.内容 = 删全部空 (编辑框_用户名.内容)
编辑框_密码.内容 = 删全部空 (编辑框_密码.内容)
.判断开始 (取文本长度 (编辑框_用户名.内容) < 5)
信息框 (“输入的账号名太短,至少需要5个字符”, 0, , )
.判断 (取文本长度 (编辑框_密码.内容) < 6)
信息框 (“输入的密码太短,至少需要6个字符”, 0, , )
.默认
.判断结束
.判断开始 (编辑框_用户名.内容 = “Admin”)
.判断开始 (编辑框_密码.内容 = “a123456”)
信息框 (“输入正确”, 0, , )
.默认
信息框 (“密码输入错误”, 0, , )
.判断结束
.默认
信息框 (“用户名输入错误”, 0, , )
.判断结束