验证码简易版-真的好简单

忧虑天使

验证码简易版-真的好简单
思路问题
希望能帮你打开思路，制作更多精品源码哟。

假设：
一个圆形验证，需要旋转多少度才能验证通过。
随机数 1-360
底图为0  副图为随机数  需要你在转动多少度才能归零。
底图是180为正图  副图为35度需要你旋转多少度呢，答案就在你的公式里...







验证码一看就灰.e (6.85 KB, 下载次数: 27)

2023-7-13 14:32 上传

点击文件名下载附件
这就是一个一看就灰的验证码

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
验证码	文本型

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
a	文本型
b	文本型
c	文本型
d	文本型

置随机数种子 ()
a ＝ 到文本 (字符 (取随机数 (48, 57)))  ' 数字0-9
b ＝ 到文本 (字符 (取随机数 (65, 90)))  ' 小写a-z
c ＝ 到文本 (字符 (取随机数 (97, 122)))
d ＝ 到文本 (字符 (取随机数 (65, 90)))  ' 大写A-Z
标签1.标题 ＝ a ＋ b ＋ c ＋ d
验证码 ＝ a ＋ b ＋ c ＋ d

子程序名	返回值类型	公开	备 注
_标签1_被双击	逻辑型
参数名	类 型	参考	可空	数组	备 注
横向位置	整数型
纵向位置	整数型
功能键状态	整数型

变量名	类 型	静态	数组	备 注
a	文本型
b	文本型
c	文本型
d	文本型

a ＝ 到文本 (字符 (取随机数 (48, 57)))  ' 数字0-9
b ＝ 到文本 (字符 (取随机数 (65, 90)))  ' 小写a-z
c ＝ 到文本 (字符 (取随机数 (97, 122)))
d ＝ 到文本 (字符 (取随机数 (65, 90)))  ' 大写A-Z
标签1.标题 ＝ a ＋ b ＋ c ＋ d
验证码 ＝ a ＋ b ＋ c ＋ d

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
a	文本型
b	文本型
c	文本型
d	文本型

a ＝ 到文本 (字符 (取随机数 (48, 57)))  ' 数字0-9
b ＝ 到文本 (字符 (取随机数 (65, 90)))  ' 小写a-z
c ＝ 到文本 (字符 (取随机数 (97, 122)))
d ＝ 到文本 (字符 (取随机数 (65, 90)))  ' 大写A-Z
标签1.标题 ＝ a ＋ b ＋ c ＋ d
验证码 ＝ a ＋ b ＋ c ＋ d
调试输出 (到文本 (验证码))

子程序名	返回值类型	公开	备 注
_按钮2_被单击

如果 (编辑框1.内容 ＝ “”)
信息框 (“请输入验证码”, 0, , )
编辑框1.获取焦点 ()



如果 (编辑框1.内容 ＝ 验证码)
信息框 (“正确，当前验证码为：” ＋ 验证码, 0, , )


信息框 (“错误!请重新输入”, 0, , )

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 验证码, 文本型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 a, 文本型<br /> .局部变量 b, 文本型<br /> .局部变量 c, 文本型<br /> .局部变量 d, 文本型<br /> <br /> <br /> 置随机数种子 ()<br /> a ＝ 到文本 (字符 (取随机数 (48, 57)))  ' 数字0-9<br /> b ＝ 到文本 (字符 (取随机数 (65, 90)))  ' 小写a-z<br /> c ＝ 到文本 (字符 (取随机数 (97, 122)))<br /> d ＝ 到文本 (字符 (取随机数 (65, 90)))  ' 大写A-Z<br /> 标签1.标题 ＝ a ＋ b ＋ c ＋ d<br /> 验证码 ＝ a ＋ b ＋ c ＋ d<br /> <br /> <br /> .子程序 _标签1_被双击, 逻辑型<br /> .参数 横向位置, 整数型<br /> .参数 纵向位置, 整数型<br /> .参数 功能键状态, 整数型<br /> .局部变量 a, 文本型<br /> .局部变量 b, 文本型<br /> .局部变量 c, 文本型<br /> .局部变量 d, 文本型<br /> <br /> <br /> a ＝ 到文本 (字符 (取随机数 (48, 57)))  ' 数字0-9<br /> b ＝ 到文本 (字符 (取随机数 (65, 90)))  ' 小写a-z<br /> c ＝ 到文本 (字符 (取随机数 (97, 122)))<br /> d ＝ 到文本 (字符 (取随机数 (65, 90)))  ' 大写A-Z<br /> 标签1.标题 ＝ a ＋ b ＋ c ＋ d<br /> 验证码 ＝ a ＋ b ＋ c ＋ d<br /> <br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 a, 文本型<br /> .局部变量 b, 文本型<br /> .局部变量 c, 文本型<br /> .局部变量 d, 文本型<br /> <br /> <br /> a ＝ 到文本 (字符 (取随机数 (48, 57)))  ' 数字0-9<br /> b ＝ 到文本 (字符 (取随机数 (65, 90)))  ' 小写a-z<br /> c ＝ 到文本 (字符 (取随机数 (97, 122)))<br /> d ＝ 到文本 (字符 (取随机数 (65, 90)))  ' 大写A-Z<br /> <br /> 标签1.标题 ＝ a ＋ b ＋ c ＋ d<br /> 验证码 ＝ a ＋ b ＋ c ＋ d<br /> <br /> 调试输出 (到文本 (验证码))<br /> <br /> <br /> .子程序 _按钮2_被单击<br /> <br /> <br /> .如果 (编辑框1.内容 ＝ “”)<br />     信息框 (“请输入验证码”, 0, , )<br />     编辑框1.获取焦点 ()<br /> <br /> .否则<br /> <br />     .如果 (编辑框1.内容 ＝ 验证码)<br />         信息框 (“正确，当前验证码为：” ＋ 验证码, 0, , )<br />     .否则<br /> <br /> <br />         信息框 (“错误!请重新输入”, 0, , )<br /> <br />     .如果结束<br /> <br /> .如果结束

忧虑天使

已注销571294 发表于 2023-7-16 08:36
**** 作者被禁止或删除 内容自动屏蔽 ****

自定义文字即可！

562159129

66666666666666

vfghy1

找了好久，学习看看

小白3

感谢您对论坛的支持！

苕皮哥哥

不错 不错 可以

小丸心°

收藏一下,这个比较简单

忧虑天使

zhaoyuyyy 发表于 2023-7-16 08:36
文字的咋弄？

https://bbs.125.la/forum.php?mod ... &extra=#pid26240857
中文版在这里！！！！！

忧虑天使

zhaoyuyyy 发表于 2023-7-14 12:05
任何程序都能用吗？

嗯！ 不管是网路验证 本地验证 等等 但需要加密的哟不然直接就抓取到了

jia201314973

支持开源~！感谢分享