马上注册,结交更多易友,享用更多功能,让你轻松玩转觅风论坛。
您需要 登录 才可以下载或查看,没有账号?立即注册
x
.版本 2
.程序集 窗口程序集1
.子程序 _标签1_反馈事件, 整数型
.参数 参数一, 整数型
.参数 参数二, 整数型
.子程序 _按钮1_被单击
.如果真 (编辑框1.内容 = “” 或 编辑框2.内容 = “”)
信息框 (“登入失败!”, 0, )
编辑框1.获取焦点 ()
.如果真结束
.如果真 (编辑框1.内容 = “吴水林” 且 编辑框2.内容 = “123456”)
信息框 (“登入成功!”, 0, )
图片框1.可视 = 真
返回 ()
.如果真结束
信息框 (“登入失败!”, 0, )
.子程序 _编辑框1_按下某键, 逻辑型
.参数 键代码, 整数型
.参数 功能键状态, 整数型
.如果真 (键代码 = #回车键)
编辑框2.获取焦点 ()
.如果真结束
.子程序 _编辑框2_按下某键, 逻辑型
.参数 键代码, 整数型
.参数 功能键状态, 整数型
.如果真 (键代码 = #回车键)
_按钮1_被单击 ()
.版本 2
.程序集 窗口程序集1
.子程序 _标签1_反馈事件, 整数型
.参数 参数一, 整数型
.参数 参数二, 整数型
.子程序 _按钮1_被单击
.如果真 (编辑框1.内容 = “” 或 编辑框2.内容 = “”)
信息框 (“登入失败!”, 0, )
编辑框1.获取焦点 ()
.如果真结束
.如果真 (编辑框1.内容 = “吴水林” 且 编辑框2.内容 = “123456”)
信息框 (“登入成功!”, 0, )
图片框1.可视 = 真
返回 ()
.如果真结束
信息框 (“登入失败!”, 0, )
.子程序 _编辑框1_按下某键, 逻辑型
.参数 键代码, 整数型
.参数 功能键状态, 整数型
.如果真 (键代码 = #回车键)
编辑框2.获取焦点 ()
.如果真结束
.子程序 _编辑框2_按下某键, 逻辑型
.参数 键代码, 整数型
.参数 功能键状态, 整数型
.如果真 (键代码 = #回车键)
_按钮1_被单击 ()
|