开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

用微信号发送消息登录论坛

新人指南 邀请好友注册 - 我关注人的新帖 教你赚取精币 - 每日签到


求职/招聘- 论坛接单- 开发者大厅

论坛版规 总版规 - 建议/投诉 - 应聘版主 - 精华帖总集 积分说明 - 禁言标准 - 有奖举报

查看: 5244|回复: 24
收起左侧

[易源码分享] 自己写密码生成器!练手用!

[复制链接]
结帖率:50% (10/20)
发表于 2021-2-24 15:17:42 | 显示全部楼层 |阅读模式   河南省新乡市
分享源码
界面截图:
是否带模块: 纯源码
备注说明: -
自己练手写的!练练手高手误笑!



  
窗口程序集名保 留  保 留备 注
窗口程序集_启动窗口   
变量名类 型数组备 注
密码种类整数型  
密码位数整数型  

子程序名返回值类型公开备 注
_按钮1_被单击  
变量名类 型静态数组备 注
小写字母整数型097-122
数值整数型 
大写字母整数型065-90
临时计数整数型 
密码文本型 
类别整数型 
a整数型 
置随机数种子 ()
密码位数 = 到整数 (编辑框2.内容)
密码种类 = 0
如果真 (选择框1.选中 = )
a = 1
密码种类 = 1
如果真 (选择框2.选中 = )
判断 (a = 0)
a = 2


密码种类 = 2
如果真 (选择框3.选中 = )
判断 (a = 0)
a = 3


密码种类 = 3

如果真 (密码位数 = 0 密码种类 = 0)
信息框 (“请选择正确的生产条件或者输入正确的密码位数!”, 0, , )
返回 ()

计次循环首 (26, 临时计数)
加入成员 (小写字母, 96 + 临时计数)
计次循环尾 ()
计次循环首 (26, 临时计数)
加入成员 (大写字母, 64 + 临时计数)
计次循环尾 ()
计次循环首 (密码位数, 临时计数)
类别 = 取随机数 (a, 密码种类)
如果真 (类别 = 1)
密码 = 密码 + 到文本 (取随机数 (0, 10))
到循环尾 ()

如果真 (类别 = 2)
密码 = 密码 + 字符 (小写字母 [取随机数 (1, 26)])
到循环尾 ()

如果真 (类别 = 3)
密码 = 密码 + 字符 (大写字母 [取随机数 (1, 26)])
到循环尾 ()

计次循环尾 ()
编辑框1.内容 = 密码


评分

参与人数 3好评 +2 精币 +3 收起 理由
ghost12 + 1 支持开源~!感谢分享
FUYUEPC + 1 感谢发布原创作品,精易因你更精彩!
zhao52 + 1 + 2 此处应该有鼓励~

查看全部评分


本帖被以下淘专辑推荐:

结帖率:89% (16/18)

签到天数: 3 天

发表于 2024-6-15 23:47:26 | 显示全部楼层   四川省成都市
就看看好看好看
回复 支持 反对

使用道具 举报

签到天数: 1 天

发表于 2024-2-11 22:00:25 | 显示全部楼层   河南省濮阳市
{:7_432:}{:7_432:}
回复 支持 反对

使用道具 举报

结帖率:0% (0/5)
发表于 2024-1-2 15:58:30 | 显示全部楼层   浙江省杭州市
可以加个排除字符项吗
回复 支持 反对

使用道具 举报

发表于 2022-5-24 19:44:52 | 显示全部楼层   吉林省吉林市
感谢分享
回复 支持 反对

使用道具 举报

结帖率:0% (0/7)
发表于 2022-3-11 08:40:39 | 显示全部楼层   山东省济南市
1111111111111111111
回复 支持 反对

使用道具 举报

发表于 2022-3-9 16:14:54 | 显示全部楼层   广东省肇庆市
感谢分享
回复 支持 反对

使用道具 举报

结帖率:82% (27/33)

签到天数: 3 天

发表于 2022-2-23 08:00:30 | 显示全部楼层   上海市上海市
支持开源~!感谢分享
回复 支持 反对

使用道具 举报

发表于 2021-7-31 01:30:41 | 显示全部楼层   陕西省安康市
66666666666666666666666666666666666666666666666
回复 支持 反对

使用道具 举报

发表于 2021-4-13 09:56:06 | 显示全部楼层   福建省福州市
加油加油加油加油加油加油加油加油加油加油加油加油加油加油
回复 支持 反对

使用道具 举报

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

本版积分规则 致发广告者

发布主题 收藏帖子 返回列表

sitemap| 易语言源码| 易语言教程| 易语言论坛| 易语言模块| 手机版| 广告投放| 精易论坛
拒绝任何人以任何形式在本论坛发表与中华人民共和国法律相抵触的言论,本站内容均为会员发表,并不代表精易立场!
论坛帖子内容仅用于技术交流学习和研究的目的,严禁用于非法目的,否则造成一切后果自负!如帖子内容侵害到你的权益,请联系我们!
防范网络诈骗,远离网络犯罪 违法和不良信息举报电话0663-3422125,QQ: 793400750,邮箱:wp@125.la
Powered by Discuz! X3.4 揭阳市揭东区精易科技有限公司 ( 粤ICP备12094385号-1) 粤公网安备 44522102000125 增值电信业务经营许可证 粤B2-20192173

快速回复 返回顶部 返回列表