创建易语言窗口并且创建控件 编辑2个 按钮2个 图片框1个 图片框在 其中一个编辑框的后面 设置为 不可以看见 如图所示

编写验证码随机随机生成 代码如下

.版本 2

.支持库 spec

.局部变量 局部_计次, 整数型

.局部变量 局部_随机数, 整数型

.局部变量 局部_文本, 文本型

置随机数种子 ()

.计次循环首 (4, 局部_计次)

局部_随机数 ＝ 取随机数 (1, 3)

.如果真 (局部_随机数 ＝ 3)

局部_文本 ＝ 局部_文本 ＋ 字符 (取随机数 (97, 122))

.如果真结束

.如果真 (局部_随机数 ＝ 2)

局部_文本 ＝ 局部_文本 ＋ 字符 (取随机数 (67, 90))

.如果真结束

.如果真 (局部_随机数 ＝ 1)

局部_文本 ＝ 局部_文本 ＋ 字符 (取随机数 (48, 57))

.如果真结束

.计次循环尾 ()

编辑框1.内容 ＝ 局部_文本

编辑框1.可视 ＝ 真

延迟 (5)

图片框1.图片 ＝ 快照 (编辑框1.取窗口句柄 (), 编辑框1.宽度, 编辑框1.高度)

编辑框1.可视 ＝ 假

下面判断是否正确

.版本 2

.如果真 (到小写 (编辑框2.内容) ＝ 到小写 (编辑框1.内容))

信息框 (“验证码正确”, 64, , )

子程序_获取验证码 ()

返回 ()

.如果真结束

信息框 (“验证码错误”, 48, , )

点击验证码 自动更换验证码

.版本 2

.子程序 _图片框1_鼠标左键被放开, 逻辑型

.参数 横向位置, 整数型

.参数 纵向位置, 整数型

.参数 功能键状态, 整数型

子程序_获取验证码 ()

添加简单功能错误 自动更换验证码

.版本 2

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

.如果真 (到小写 (编辑框2.内容) ＝ 到小写 (编辑框1.内容))

信息框 (“验证码正确”, 64, , )

子程序_获取验证码 ()

返回 ()

.如果真结束

信息框 (“验证码错误”, 48, , )

子程序_获取验证码 ()

选择并且测试 测试成功

支持正版软件

一定要到小写 不然容易失败