作业-第二课仿QQ登录-源码+成品-啊啊啊灰

.版本 2

.程序集 窗口程序集_启动窗口

.子程序 _按钮1_被单击, , , 登录按钮被单击

.如果真 (编辑框1.内容 ＝ “”)  ' 判断编辑框1有没有内容
    ' 如果没有内容就为真， 程序继续往下执行，由内容则跳过
    信息框 (“请输入账号”, 0, , )  ' 弹出信息框 要求用户输入账号
    编辑框1.获取焦点 ()  ' 编辑框1获取输入焦点
    返回 ()  ' 程序不再往下执行

.如果真结束
.如果真 (编辑框2.内容 ＝ “”)  ' 判断用户有没有输入密码
    信息框 (“请输入密码”, 0, , )  ' 编辑框2没有内容 弹出信息框 要求用户输入密码
    编辑框2.获取焦点 ()  ' 编辑框2获取输入焦点
    返回 ()  ' 程序不再往下执行

.如果真结束


.如果 (编辑框1.内容 ＝ “123456” 且 编辑框2.内容 ＝ “654321”)  ' 判断编辑框1和编辑框2的条件是否一致
    ' 正确执行这里的↓↓↓
    信息框 (“登录成功”, 0, , )  ' 弹出信息框
.否则
    ' ←不正确执行这个箭头下的
    信息框 (“账号密码错误”, 0, , )  ' 弹出信息框
.如果结束



.子程序 _编辑框2_按下某键, 逻辑型
.参数 键代码, 整数型
.参数 功能键状态, 整数型

.如果真 (键代码 ＝ #回车键)  ' 判断用户是否在输入框2按下回车键
    _按钮1_被单击 ()  ' 如果按下了回车键=登录按钮 被单击
.如果真结束


.子程序 _按钮2_被单击, , , 关闭按钮被单击

销毁 ()
' 退出程序