.版本 2
.程序集 窗口程序集1
.子程序 _按钮1_被单击
.如果真 (编辑框1.内容 = “”)
信息框 (“请输入帐号”, 0, )
编辑框2.获取焦点 ()
返回 ()
.如果真结束
.如果真 (编辑框2.内容 = “”)
信息框 (“请输入密码”, 0, )
编辑框2.获取焦点 ()
返回 ()
.如果真结束
.如果 (编辑框1.内容 = “123456” 且 编辑框2.内容 = “654321”)
信息框 (“恭喜您登录成功”, 0, )
.否则
信息框 (“帐号密码错误”, 0, )
.如果结束
.子程序 _编辑框2_按下某键, 逻辑型
.参数 键代码, 整数型
.参数 功能键状态, 整数型
.如果真 (键代码 = #回车键)
_按钮1_被单击 ()
.如果真结束
.子程序 _按钮2_被单击
销毁 ()