精易论坛

标题: 取随机字母三种[超级新手一看就懂版] [打印本页]

---

作者: KD飞飞    时间: 2024-11-8 08:22
标题: 取随机字母三种[超级新手一看就懂版]


这次补全了大写， 小写，大小写混合，三种
而且非常简单，新手一看就会，没有用任何难懂内容

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
随机数	整数型	0	开程序就存26个字母的数值型池

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

变量名	类 型	静态	数组	备 注
初始加入	整数型

计次循环首 (26, 初始加入)  ' 生成一个池存储26个字母的数值型
加入成员 (随机数, 64 ＋ 初始加入)
计次循环尾 ()
置随机数种子 ()

子程序名	返回值类型	公开	备 注
_按钮1_被单击			触发按钮，赋值循环次数和循环那种，这里三种都写，如果想触发单种可以自己写返回然后只运行一个，这里运行三个

取随机字母大小写混合 (20)
只随机小写 (10)
只随机大写 (10)

子程序名	返回值类型	公开	备 注
取随机字母大小写混合			大小写混合
参数名	类 型	参考	可空	数组	备 注
随机生成多少个	整数型

变量名	类 型	静态	数组	备 注
是否大写	整数型
a	整数型
取数组哪一位	整数型
字母结果	文本型		0

如果真 (随机生成多少个 ＞ 0)  ' 校验传递过来的值下限
计次循环首 (随机生成多少个, a)  ' 开始循环
是否大写 ＝ 取随机数 (1, 2)  ' 随机取是大写还是小写
取数组哪一位 ＝ 取随机数 (1, 26)  ' 随机取字母池内的某个位置
加入成员 (字母结果, 字符 (随机数 [取数组哪一位]))  ' 将取出的值加入结果变量内存储
如果真 (是否大写 ＝ 2)  ' 如果是2则判别为小写
字母结果 [a] ＝ 到小写 (字母结果 [a])

计次循环尾 ()
调试输出 (字母结果)  ' 会输出20个大小写混合的随机内容

子程序名	返回值类型	公开	备 注
只随机小写			小写
参数名	类 型	参考	可空	数组	备 注
随机次数小写	整数型

变量名	类 型	静态	数组	备 注
sa	整数型
小写结果	文本型		0

如果真 (随机次数小写 ＞ 0)
计次循环首 (随机次数小写, sa)
加入成员 (小写结果, 到小写 (字符 (随机数 [取随机数 (1, 26)])))  ' 随机取字母池内的某个位置
计次循环尾 ()
调试输出 (小写结果)

子程序名	返回值类型	公开	备 注
只随机大写			大写
参数名	类 型	参考	可空	数组	备 注
随机次数小写	整数型

变量名	类 型	静态	数组	备 注
saa	整数型
大写结果	文本型		0

如果真 (随机次数小写 ＞ 0)
计次循环首 (随机次数小写, saa)
加入成员 (大写结果, 字符 (随机数 [取随机数 (1, 26)]))  ' 随机取字母池内的某个位置
计次循环尾 ()
调试输出 (大写结果)

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

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 随机数, 整数型, , "0", 开程序就存26个字母的数值型池<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 初始加入, 整数型<br /> <br /> .计次循环首 (26, 初始加入)  ' 生成一个池存储26个字母的数值型<br />     加入成员 (随机数, 64 ＋ 初始加入)<br /> .计次循环尾 ()<br /> 置随机数种子 ()<br /> <br /> .子程序 _按钮1_被单击, , , 触发按钮，赋值循环次数和循环那种，这里三种都写，如果想触发单种可以自己写返回然后只运行一个，这里运行三个<br /> <br /> 取随机字母大小写混合 (20)<br /> 只随机小写 (10)<br /> 只随机大写 (10)<br /> <br /> .子程序 取随机字母大小写混合, , , 大小写混合<br /> .参数 随机生成多少个, 整数型<br /> .局部变量 是否大写, 整数型<br /> .局部变量 a, 整数型<br /> .局部变量 取数组哪一位, 整数型<br /> .局部变量 字母结果, 文本型, , "0"<br /> <br /> .如果真 (随机生成多少个 ＞ 0)  ' 校验传递过来的值下限<br />     .计次循环首 (随机生成多少个, a)  ' 开始循环<br />         是否大写 ＝ 取随机数 (1, 2)  ' 随机取是大写还是小写<br />         取数组哪一位 ＝ 取随机数 (1, 26)  ' 随机取字母池内的某个位置<br />         加入成员 (字母结果, 字符 (随机数 [取数组哪一位]))  ' 将取出的值加入结果变量内存储<br />         .如果真 (是否大写 ＝ 2)  ' 如果是2则判别为小写<br />             字母结果 [a] ＝ 到小写 (字母结果 [a])<br />         .如果真结束<br /> <br />     .计次循环尾 ()<br /> .如果真结束<br /> 调试输出 (字母结果)  ' 会输出20个大小写混合的随机内容<br /> <br /> .子程序 只随机小写, , , 小写<br /> .参数 随机次数小写, 整数型<br /> .局部变量 sa, 整数型<br /> .局部变量 小写结果, 文本型, , "0"<br /> <br /> .如果真 (随机次数小写 ＞ 0)<br />     .计次循环首 (随机次数小写, sa)<br />         加入成员 (小写结果, 到小写 (字符 (随机数 [取随机数 (1, 26)])))  ' 随机取字母池内的某个位置<br />     .计次循环尾 ()<br /> <br /> .如果真结束<br /> 调试输出 (小写结果)<br /> <br /> .子程序 只随机大写, , , 大写<br /> .参数 随机次数小写, 整数型<br /> .局部变量 saa, 整数型<br /> .局部变量 大写结果, 文本型, , "0"<br /> <br /> .如果真 (随机次数小写 ＞ 0)<br />     .计次循环首 (随机次数小写, saa)<br />         加入成员 (大写结果, 字符 (随机数 [取随机数 (1, 26)]))  ' 随机取字母池内的某个位置<br />     .计次循环尾 ()<br /> .如果真结束<br /> 调试输出 (大写结果)

子程序缩减版

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
随机数	整数型	0	开程序就存26个字母的数值型池

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

变量名	类 型	静态	数组	备 注
初始加入	整数型

计次循环首 (26, 初始加入)  ' 生成一个池存储26个字母的数值型
加入成员 (随机数, 64 ＋ 初始加入)
计次循环尾 ()
置随机数种子 ()

子程序名	返回值类型	公开	备 注
_按钮1_被单击			触发按钮，赋值循环次数和循环那种，这里三种都写，如果想触发单种可以自己写返回然后只运行一个，这里运行三个

取随机字母大小写混合 (20)
' 这俩是单独的 取消屏蔽后使用
' 只随机小写 (10)
' 只随机大写 (10)'

子程序名	返回值类型	公开	备 注
取随机字母大小写混合			大小写混合
参数名	类 型	参考	可空	数组	备 注
随机生成多少个	整数型

变量名	类 型	静态	数组	备 注
mm	整数型

如果真 (随机生成多少个 ＞ 0)
计次循环首 (随机生成多少个, mm)
如果 (取随机数 (0, 1) ＝ 1)
只随机小写 (1)


只随机大写 (1)

计次循环尾 ()

子程序名	返回值类型	公开	备 注
只随机小写			小写
参数名	类 型	参考	可空	数组	备 注
随机次数小写	整数型

变量名	类 型	静态	数组	备 注
sa	整数型
小写结果	文本型		0

如果真 (随机次数小写 ＞ 0)
计次循环首 (随机次数小写, sa)
加入成员 (小写结果, 到小写 (字符 (随机数 [取随机数 (1, 26)])))  ' 随机取字母池内的某个位置
计次循环尾 ()
调试输出 (小写结果)

子程序名	返回值类型	公开	备 注
只随机大写			大写
参数名	类 型	参考	可空	数组	备 注
随机次数小写	整数型

变量名	类 型	静态	数组	备 注
saa	整数型
大写结果	文本型		0

如果真 (随机次数小写 ＞ 0)
计次循环首 (随机次数小写, saa)
加入成员 (大写结果, 字符 (随机数 [取随机数 (1, 26)]))  ' 随机取字母池内的某个位置
计次循环尾 ()
调试输出 (大写结果)

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

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 随机数, 整数型, , "0", 开程序就存26个字母的数值型池<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 初始加入, 整数型<br /> <br /> .计次循环首 (26, 初始加入)  ' 生成一个池存储26个字母的数值型<br />     加入成员 (随机数, 64 ＋ 初始加入)<br /> .计次循环尾 ()<br /> 置随机数种子 ()<br /> <br /> .子程序 _按钮1_被单击, , , 触发按钮，赋值循环次数和循环那种，这里三种都写，如果想触发单种可以自己写返回然后只运行一个，这里运行三个<br /> <br /> 取随机字母大小写混合 (20)<br /> ' 这俩是单独的 取消屏蔽后使用<br /> ' 只随机小写 (10)<br /> ' 只随机大写 (10)'<br /> <br /> .子程序 取随机字母大小写混合, , , 大小写混合<br /> .参数 随机生成多少个, 整数型<br /> .局部变量 mm, 整数型<br /> <br /> .如果真 (随机生成多少个 ＞ 0)<br />     .计次循环首 (随机生成多少个, mm)<br />         .如果 (取随机数 (0, 1) ＝ 1)<br />             只随机小写 (1)<br />         .否则<br /> <br />             只随机大写 (1)<br />         .如果结束<br /> <br />     .计次循环尾 ()<br /> .如果真结束<br /> <br /> <br /> .子程序 只随机小写, , , 小写<br /> .参数 随机次数小写, 整数型<br /> .局部变量 sa, 整数型<br /> .局部变量 小写结果, 文本型, , "0"<br /> <br /> .如果真 (随机次数小写 ＞ 0)<br />     .计次循环首 (随机次数小写, sa)<br />         加入成员 (小写结果, 到小写 (字符 (随机数 [取随机数 (1, 26)])))  ' 随机取字母池内的某个位置<br />     .计次循环尾 ()<br /> .如果真结束<br /> 调试输出 (小写结果)<br /> <br /> .子程序 只随机大写, , , 大写<br /> .参数 随机次数小写, 整数型<br /> .局部变量 saa, 整数型<br /> .局部变量 大写结果, 文本型, , "0"<br /> <br /> .如果真 (随机次数小写 ＞ 0)<br />     .计次循环首 (随机次数小写, saa)<br />         加入成员 (大写结果, 字符 (随机数 [取随机数 (1, 26)]))  ' 随机取字母池内的某个位置<br />     .计次循环尾 ()<br /> .如果真结束<br /> 调试输出 (大写结果)

子程序再次缩减版极简，从上面向下逐步演化而来

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
随机数	整数型	0	开程序就存26个字母的数值型池

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

变量名	类 型	静态	数组	备 注
初始加入	整数型

计次循环首 (26, 初始加入)  ' 生成一个池存储26个字母的数值型
加入成员 (随机数, 64 ＋ 初始加入)
计次循环尾 ()
置随机数种子 ()

子程序名	返回值类型	公开	备 注
_按钮1_被单击			触发按钮，赋值循环次数和循环那种，这里三种都写，如果想触发单种可以自己写返回然后只运行一个，这里运行三个

取随机字母大小写混合 (20, “大小写”)
' 下面这些解除屏蔽后使用
' 取随机字母大小写混合 (10, “小写”)
' 取随机字母大小写混合 (10, “大写”)

子程序名	返回值类型	公开	备 注
取随机字母大小写混合			大小写混合
参数名	类 型	参考	可空	数组	备 注
随机生成多少个	整数型
取值范围	文本型

变量名	类 型	静态	数组	备 注
是否大写	整数型
a	整数型
取数组哪一位	整数型
字母结果	文本型		0

如果真 (随机生成多少个 ＞ 0)  ' 校验传递过来的值下限
计次循环首 (随机生成多少个, a)  ' 开始循环
如果真 (取值范围 ＝ “大小写”)
是否大写 ＝ 取随机数 (1, 2)  ' 随机取是大写还是小写
如果真 (取值范围 ＝ “小写”)
是否大写 ＝ 2
如果真 (取值范围 ＝ “大写”)
是否大写 ＝ 1
取数组哪一位 ＝ 取随机数 (1, 26)  ' 随机取字母池内的某个位置
加入成员 (字母结果, 字符 (随机数 [取数组哪一位]))  ' 将取出的值加入结果变量内存储
如果真 (是否大写 ＝ 2)  ' 如果是2则判别为小写
字母结果 [a] ＝ 到小写 (字母结果 [a])

计次循环尾 ()
调试输出 (字母结果)  ' 会输出20个大小写混合的随机内容

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

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 随机数, 整数型, , "0", 开程序就存26个字母的数值型池<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 初始加入, 整数型<br /> <br /> .计次循环首 (26, 初始加入)  ' 生成一个池存储26个字母的数值型<br />     加入成员 (随机数, 64 ＋ 初始加入)<br /> .计次循环尾 ()<br /> 置随机数种子 ()<br /> <br /> .子程序 _按钮1_被单击, , , 触发按钮，赋值循环次数和循环那种，这里三种都写，如果想触发单种可以自己写返回然后只运行一个，这里运行三个<br /> <br /> 取随机字母大小写混合 (20, “大小写”)<br /> ' 下面这些解除屏蔽后使用<br /> ' 取随机字母大小写混合 (10, “小写”)<br /> ' 取随机字母大小写混合 (10, “大写”)<br /> <br /> .子程序 取随机字母大小写混合, , , 大小写混合<br /> .参数 随机生成多少个, 整数型<br /> .参数 取值范围, 文本型<br /> .局部变量 是否大写, 整数型<br /> .局部变量 a, 整数型<br /> .局部变量 取数组哪一位, 整数型<br /> .局部变量 字母结果, 文本型, , "0"<br /> <br /> .如果真 (随机生成多少个 ＞ 0)  ' 校验传递过来的值下限<br />     .计次循环首 (随机生成多少个, a)  ' 开始循环<br />         .如果真 (取值范围 ＝ “大小写”)<br />             是否大写 ＝ 取随机数 (1, 2)  ' 随机取是大写还是小写<br />         .如果真结束<br />         .如果真 (取值范围 ＝ “小写”)<br />             是否大写 ＝ 2<br />         .如果真结束<br />         .如果真 (取值范围 ＝ “大写”)<br />             是否大写 ＝ 1<br />         .如果真结束<br />         取数组哪一位 ＝ 取随机数 (1, 26)  ' 随机取字母池内的某个位置<br />         加入成员 (字母结果, 字符 (随机数 [取数组哪一位]))  ' 将取出的值加入结果变量内存储<br />         .如果真 (是否大写 ＝ 2)  ' 如果是2则判别为小写<br />             字母结果 [a] ＝ 到小写 (字母结果 [a])<br />         .如果真结束<br /> <br />     .计次循环尾 ()<br /> .如果真结束<br /> 调试输出 (字母结果)  ' 会输出20个大小写混合的随机内容

最后一个子程序其实可以优化在缩减很多行，懒得写了

---

作者: yezirun888    时间: 2024-11-8 08:29
666666666666666666666666666666666666666666666666666666666666666666666666666666666

---

作者: qqmqqg    时间: 2024-11-8 08:29
666666666666666

---

作者: 阿凡地方23    时间: 2024-11-8 08:49
支持开源~

---

作者: 苏雾    时间: 2024-11-8 09:05
666666666666666666

---

作者: 396384183    时间: 2024-11-8 10:25
论坛有你更精彩！！

---

作者: houtian    时间: 2024-11-8 10:37
你这个太复杂，对于新手来说代码越少越简单

  

调试输出 (子程序1 (20))
调试输出 (子程序1 (20, 1))
调试输出 (子程序1 (20, 2))

子程序名	返回值类型	公开	备 注
子程序1	文本型
参数名	类 型	参考	可空	数组	备 注
参_位数	整数型
参_类型	整数型				0:混合 1:大写 2:小写

变量名	类 型	静态	数组	备 注
局_结果	文本型
局_随机	整数型

置随机数种子 ()
计次循环首 (参_位数, )
局_随机 ＝ 取随机数 (1, 26) ＋ 64 ＋ 32 × 取随机数 (参_类型 ÷ 2, 1) × 取绝对值 (参_类型 － 1)
局_结果 ＝ 局_结果 ＋ 字符 (局_随机)
计次循环尾 ()
返回 (局_结果)

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

.版本 2<br /> .支持库 spec<br /> <br /> 调试输出 (子程序1 (20))<br /> 调试输出 (子程序1 (20, 1))<br /> 调试输出 (子程序1 (20, 2))<br /> <br /> .子程序 子程序1, 文本型<br /> .参数 参_位数, 整数型<br /> .参数 参_类型, 整数型, 可空, 0:混合 1:大写 2:小写<br /> .局部变量 局_结果, 文本型<br /> .局部变量 局_随机, 整数型<br /> <br /> 置随机数种子 ()<br /> .计次循环首 (参_位数, )<br />     局_随机 ＝ 取随机数 (1, 26) ＋ 64 ＋ 32 × 取随机数 (参_类型 ÷ 2, 1) × 取绝对值 (参_类型 － 1)<br />     局_结果 ＝ 局_结果 ＋ 字符 (局_随机)<br /> .计次循环尾 ()<br /> 返回 (局_结果)

---

作者: 悸动的青春    时间: 2024-11-8 13:41
666666666666666666

---

作者: xiaojiancccc    时间: 2024-11-8 14:50
感谢分享，很给力！~

---

作者: 一指温柔    时间: 2024-11-8 15:18
感谢分享，很给力！~

---

作者: kyo9766    时间: 2024-11-8 16:37
z直接贴代码好评啊，感谢分享

---

作者: 亿万    时间: 2024-11-8 20:04
感谢分享，很给力！~

---

作者: 查过    时间: 2024-11-9 06:12
感谢分享，很给力！~

---

作者: 豆豆灰常开心    时间: 2024-11-9 06:17
全都是大佬~

---

作者: year1970    时间: 2024-11-9 09:32
感谢分享

---

作者: vfghy1    时间: 2024-12-3 15:46
学习。。。。。。。。

---

作者: 熊不熊    时间: 2024-12-4 04:29
感谢分享，很给力！~

---

欢迎光临 精易论坛 (https://125.confly.eu.org/)

Powered by Discuz! X3.4