有用的源码，分享了

wfa270 · 发表于 2011-3-13 12:28:07

取多种随机码：.版本 2

.程序集窗口程序集1

.子程序子程序_取得随机密码, 文本型
.参数参数_位数, 整数型
.参数参数_模式, 整数型, 可空
.局部变量局部_变量, 整数型
.局部变量局部_文本, 文本型

置随机数种子 ()
.判断开始 (参数_模式＝ 1)
.计次循环首 (参数_位数, 局部_变量)
      局部_文本＝局部_文本＋字符 (取随机数 (48, 57))
.计次循环尾 ()
.判断 (参数_模式＝ 2)
.计次循环首 (参数_位数, 局部_变量)
      局部_文本＝局部_文本＋多项选择 (取随机数 (1, 2), 字符 (取随机数 (65, 65 ＋ 25)), 字符 (取随机数 (97, 97 ＋ 25)))
.计次循环尾 ()
.判断 (参数_模式＝ 3)
.计次循环首 (参数_位数, 局部_变量)
      局部_文本＝局部_文本＋多项选择 (取随机数 (1, 3), 字符 (取随机数 (65, 65 ＋ 25)), 字符 (取随机数 (97, 97 ＋ 25)), 字符 (取随机数 (48, 57)))
.计次循环尾 ()
.判断 (是否为空 (参数_模式) ＝真)
局部_文本＝ “我爱易语言”
.默认

.判断结束
返回 (局部_文本)

.子程序 _按钮_取默认密码_被单击

编辑框_密码.内容＝子程序_取得随机密码 (到整数 (编辑框_密码长度.内容), )

.子程序 _按钮_取数字密码_被单击

编辑框_密码.内容＝子程序_取得随机密码 (到整数 (编辑框_密码长度.内容), 1)

.子程序 _按钮_取字母密码_被单击

编辑框_密码.内容＝子程序_取得随机密码 (到整数 (编辑框_密码长度.内容), 2)

.子程序 _按钮_取混合密码_被单击

编辑框_密码.内容＝子程序_取得随机密码 (到整数 (编辑框_密码长度.内容), 3)

.子程序 __启动窗口_创建完毕

773737994 · 发表于 2011-3-13 23:57:43

顶顶顶顶顶顶顶

773737994 · 发表于 2011-3-13 23:58:04

顶顶顶顶顶顶顶顶顶顶顶顶

封印 · 发表于 2011-8-20 23:27:51

好东西....{:3_227:}

易魂 · 发表于 2011-9-13 20:31:13

hekhe ，谢了啊！！

hejianfei123 · 发表于 2012-4-4 18:30:07

怎么扣了 2个下载点啊。。。。。。。。。。。。

xiang135666 · 发表于 2012-9-19 12:51:23

没看懂有空再来看留下脚印

		自动登录	找回密码
密码			注册