导读
易语言5.6完美版,可静态编译,绿色无后门

学习易语言 讲究的是系统,如果你正在四处闲逛,你懂的永远是皮毛! 觅风论坛正在为每个困惑的对易语言 详细

[源码] 简单的登入器

[复制链接]

微信扫一扫 分享朋友圈

king2065348986 发表于 2018-5-5 10:48:15 | 显示全部楼层 |阅读模式 打印 上一主题 下一主题

马上注册,结交更多易友,享用更多功能,让你轻松玩转觅风论坛。

您需要 登录 才可以下载或查看,没有账号?立即注册

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_被单击 ()

回复

使用道具 举报

精彩评论58

海绵老爹 发表于 2018-5-5 10:50:20 | 显示全部楼层
前来支持~~~~~~~~~~~~~~~~~~~
回复 支持 反对

使用道具 举报

sdf 发表于 2018-5-5 10:52:25 | 显示全部楼层
学习了,这就去试试
回复 支持 反对

使用道具 举报

q13129841235 发表于 2018-5-5 10:54:30 | 显示全部楼层
感谢您的无私精神...
回复 支持 反对

使用道具 举报

q13129841235 发表于 2018-5-5 10:56:36 | 显示全部楼层
我表示压力很大
回复 支持 反对

使用道具 举报

黑崎一宇 发表于 2018-5-5 10:58:41 | 显示全部楼层
前来围观,LZ好样的!
回复 支持 反对

使用道具 举报

443651433.. 发表于 2018-5-5 11:02:33 | 显示全部楼层
学习了!!!!
回复 支持 反对

使用道具 举报

qq1124824221 发表于 2018-5-5 11:06:25 | 显示全部楼层
支持!!!!!!
回复 支持 反对

使用道具 举报

csw96781 发表于 2018-5-5 11:10:17 | 显示全部楼层
感谢您的无私精神...
回复 支持 反对

使用道具 举报

qq2556906318 发表于 2018-5-5 11:14:10 | 显示全部楼层
顶起  很好的帖
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关注我们:觅风论坛与你快乐分享

收藏本站

用心服务做个非盈利公益编程网站

www.eyyba.com

服务人:觅风论坛

Email:eyyba@foxmail.com

Powered by WWW.EYYBA.COM X3.4© 2001-2023 Inc.   版权所有   

觅风论坛  疆ICP备15020893号-1