|
沙发

楼主 |
发表于 2012-11-24 12:44:06
|
只看该作者
浙江省宁波市
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
加载皮肤 (13)
.子程序 _按钮1_被单击
.如果真 (编辑框1.内容 = “”)
信息框 (“您还没有输入账号!!”, 0, )
编辑框1.获取焦点 ()
返回 ()
.如果真结束
编辑框2.获取焦点 ()
.如果真 (编辑框2.内容 = “”)
信息框 (“您还没有输入密码”, 0, )
编辑框2.获取焦点 ()
.如果真结束
.如果 (编辑框1.内容 = “93218800” 且 编辑框2.内容 = “123456”)
信息框 (“恭喜您!账号密码正确,成功!!”, 0, )
.否则
信息框 (“账号或密码错误!请重新输入!”, 0, )
' 作者QQ:93218800 , 谢谢鼓励!欢迎加入QQ群:91693908 讨论
.如果结束
.子程序 _按钮2_被单击
销毁 ()
.子程序 _编辑框1_按下某键, 逻辑型
.参数 键代码, 整数型
.参数 功能键状态, 整数型
.如果 (键代码 = #回车键)
编辑框2.获取焦点 ()
.否则
.如果结束
.子程序 _编辑框2_按下某键, 逻辑型
.参数 键代码, 整数型
.参数 功能键状态, 整数型
.如果 (键代码 = #回车键)
_按钮1_被单击 ()
.否则
.如果结束
.子程序 _时钟1_周期事件
时钟1.时钟周期 = 500
标签3.标题 = 到文本 (取现行时间 ())
刚才忘发了,这下发代码!
|
|