觅风论坛

标题: 简单的登入器 [打印本页]

作者: king2065348986    时间: 2018-5-5 10:48
标题: 简单的登入器
.版本 2

.程序集 窗口程序集1

.子程序 _标签1_反馈事件, 整数型
.参数 参数一, 整数型
.参数 参数二, 整数型



.子程序 _按钮1_被单击

.如果真 (编辑框1.内容 = “” 或 编辑框2.内容 = “”)
    信息框 (“登入失败!”, 0, )
    编辑框1.获取焦点 ()

.如果真结束
.如果真 (编辑框1.内容 = “吴水林” 且 编辑框2.内容 = “123456”)
    信息框 (“登入成功!”, 0, )
    图片框1.可视 = 真
    返回 ()
.如果真结束
信息框 (“登入失败!”, 0, )


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

.如果真 (键代码 = #回车键)
    编辑框2.获取焦点 ()

.如果真结束


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

.如果真 (键代码 = #回车键)
    _按钮1_被单击 ()
[hide=d10].版本 2

.程序集 窗口程序集1

.子程序 _标签1_反馈事件, 整数型
.参数 参数一, 整数型
.参数 参数二, 整数型



.子程序 _按钮1_被单击

.如果真 (编辑框1.内容 = “” 或 编辑框2.内容 = “”)
    信息框 (“登入失败!”, 0, )
    编辑框1.获取焦点 ()

.如果真结束
.如果真 (编辑框1.内容 = “吴水林” 且 编辑框2.内容 = “123456”)
    信息框 (“登入成功!”, 0, )
    图片框1.可视 = 真
    返回 ()
.如果真结束
信息框 (“登入失败!”, 0, )


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

.如果真 (键代码 = #回车键)
    编辑框2.获取焦点 ()

.如果真结束


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

.如果真 (键代码 = #回车键)
    _按钮1_被单击 ()

[/hide]


作者: 海绵老爹    时间: 2018-5-5 10:50
前来支持~~~~~~~~~~~~~~~~~~~
作者: sdf    时间: 2018-5-5 10:52
学习了,这就去试试
作者: q13129841235    时间: 2018-5-5 10:54
感谢您的无私精神...
作者: q13129841235    时间: 2018-5-5 10:56
我表示压力很大
作者: 黑崎一宇    时间: 2018-5-5 10:58
前来围观,LZ好样的!
作者: 443651433..    时间: 2018-5-5 11:02
学习了!!!!
作者: qq1124824221    时间: 2018-5-5 11:06
支持!!!!!!
作者: csw96781    时间: 2018-5-5 11:10
感谢您的无私精神...
作者: qq2556906318    时间: 2018-5-5 11:14
顶起  很好的帖
作者: 磊磊    时间: 2018-5-5 11:18
抢楼了,前排第一次啊
作者: 黑崎一宇    时间: 2018-5-5 11:19
谢谢楼主,,,收藏ing
作者: 赵金龙    时间: 2018-5-5 11:20
支持!!!!!!
作者: wwww    时间: 2018-5-5 11:20
还是看不懂,复杂
作者: 雨点    时间: 2018-5-5 11:21
支持,赞
作者: dsdasf    时间: 2018-5-5 11:22
学习一下!十分感谢
作者: 小天    时间: 2018-5-5 11:33
前来支持~~~~~~~~~~~~~~~~~~~
作者: 小天    时间: 2018-5-5 11:44
谢谢楼主,,,收藏ing
作者: lmx0618    时间: 2018-5-5 11:55
不错不错 支持下
作者: 卧槽你妹    时间: 2018-5-5 12:06
好像还不错!
作者: dsdasf    时间: 2018-5-5 12:17
藕是来打酱油滴...
作者: 好吧你又赢了    时间: 2018-5-5 12:35
学习了!!!!
作者: 444555    时间: 2018-5-5 12:53
支持,赞
作者: 的含税单价    时间: 2018-5-5 13:11
期待中......
作者: 哦美国    时间: 2018-5-5 13:29
感谢您的无私精神...
作者: 444555    时间: 2018-5-5 13:47
碉堡了!
作者: 小一    时间: 2018-5-5 13:49
谢谢楼主,,,收藏ing
作者: 莫天浩    时间: 2018-5-5 13:50
支持一下,期待更多东西
作者: 孤独    时间: 2018-5-5 13:52
路过还不错
作者: 6360120    时间: 2018-5-5 13:54
藕是来打酱油滴...
作者: qq1354596367    时间: 2018-5-5 13:56
感觉不错
作者: a32d321as    时间: 2018-5-5 14:10
学习了!!!!
作者: 我爱你苏根    时间: 2018-5-5 14:24
好像还不错!
作者: ...    时间: 2018-5-5 14:37
顶起  很好的帖
作者: 付出又有回报    时间: 2018-5-5 14:51
赞一个!
作者: 付出又有回报    时间: 2018-5-5 15:05
支持!!!!前排!!!!
作者: wz19981007    时间: 2018-5-5 15:15
还是看不懂,复杂
作者: jackleos    时间: 2018-5-5 15:25
学习一下!十分感谢
作者: 216341564213    时间: 2018-5-5 15:35
学习了,这就去试试
作者: 图样图森破丶    时间: 2018-5-5 15:45
支持一下,期待更多东西
作者: sdajhdjannda    时间: 2018-5-5 15:55
非常不错,感谢分享!
作者: 1354541    时间: 2018-5-5 16:01
谢谢楼主的辛苦分享
作者: 尘封    时间: 2018-5-5 16:07
学习了,这就去试试
作者: jhasgvcah    时间: 2018-5-5 16:14
支持一下,期待更多东西
作者: 80590711    时间: 2018-5-5 16:20
必须支持。。。。。。。
作者: 孤独    时间: 2018-5-5 16:27
前来围观,LZ好样的!
作者: lhq19880526    时间: 2018-5-5 16:27
学习了!!!!
作者: 慌什么!    时间: 2018-5-5 16:27
这个好好支持一下
作者: 360403967    时间: 2018-5-5 16:27
期待中......
作者: 风月    时间: 2018-5-5 16:27
非常不错,感谢分享!
作者: 1378409920    时间: 2018-5-5 16:27
支持!!!!前排!!!!
作者: 小粑    时间: 2018-5-5 16:27
好像还不错!
作者: 老子    时间: 2018-5-5 16:27
顶一个了
作者: xiaojian    时间: 2018-5-5 16:27
必须支持。。。。。。。
作者: 卧槽你妹    时间: 2018-5-5 16:27
前来围观,LZ好样的!
作者: yu2353173832    时间: 2018-5-5 16:27
藕是来打酱油滴...
作者: 青春给她    时间: 2018-5-7 10:32
:)
作者: 青春给她    时间: 2018-5-7 10:33
hahahahahahaahh
作者: 青春给她    时间: 2018-5-7 10:33
哈哈哈哈哈哈哈哈啊哈哈哈哈哈




欢迎光临 觅风论坛 (https://www.eyyba.com/) Powered by Discuz! X3.4