|
发表于 2014-4-6 23:06:11
|
显示全部楼层
广东省广州市
本帖最后由 御风软件 于 2014-4-6 23:07 编辑
使用到精易模块,模块开源,不过,你只是不会混合,你稍微改下也行
.版本 2
.子程序 随机文本, 文本型
.参数 长度, 整数型
.参数 类型, 整数型, , 1.小写字母 2.大写字母 3.数字 4.汉字 5综合
.局部变量 生成文本, 文本型
.局部变量 随机字符, 随机字符
.局部变量 N, 整数型
.局部变量 临时文本, 文本型
.判断开始 (类型 = 1)
生成文本 = 文本_取随机字母 (长度, 0)
.判断 (类型 = 2)
生成文本 = 文本_取随机字母 (长度, 1)
.判断 (类型 = 3)
生成文本 = 文本_取随机数字 (长度)
.判断 (类型 = 4)
生成文本 = 文本_取随机汉字 (长度, 0)
.默认
' 综合
.计次循环首 (长度, N)
临时文本 = 选择 (汇编_取随机数 (0, 1) = 0, 文本_取随机汉字 (1, 0), 文本_取随机字符 (1))
生成文本 = 生成文本 + 临时文本
.计次循环尾 ()
.判断结束
返回 (生成文本)
|
|