取列表随机并打乱顺序

595262556 · 发表于 2020-2-9 22:31:51

求大神给个范例

例如文档有
大神1
大神2
大神99

取4个但不能重复

补充内容 (2020-2-10 00:26):
数字不是纯粹数字是为了说明有多少个不同的用户而不是数字

寒潮 · 发表于 2020-2-9 22:31:52

局_原始文本＝到文本 (读入文件 (取运行目录 () ＋ “\文档.txt”))
局_原始文本_数组＝分割文本 (局_原始文本, #换行符, )
局_取出数量＝ 4
文本_取出N组不重复数字 (局_位置_数组, 局_取出数量, 1, 取数组成员数 (局_原始文本_数组))
局_新文本＝ “”

计次循环首 (局_取出数量, 局_计次)

如果真 (局_新文本 ≠ “”)

局_新文本＝局_新文本＋ #换行符

局_新文本＝局_新文本＋局_原始文本_数组 [局_位置_数组 [局_计次]]

计次循环尾 ()
调试输出 (局_新文本)

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

jackliuwenli · 发表于 2020-2-9 22:42:34

走一回 · 发表于 2020-2-9 22:43:43

总共有99个，随机后，基本上不可能再有重复。。
如果有重复，基本上比500万大奖的概率要低上几个数量级都不止。
在你的有生之年是不可能有重复的。

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

清除数组 (array)
置随机数种子 ()

计次循环首 (99, i)

加入成员 (array, “大神” ＋到文本 (i))

计次循环尾 ()

计次循环首 (99, i)

随机序号＝取随机数 (1, 99)

temp ＝ array [随机序号]

array [随机序号] ＝ array [i]

array [i] ＝ temp

计次循环尾 ()

计次循环首 (4, i)

调试输出 (array [i])

计次循环尾 ()

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

数据压缩 · 发表于 2020-2-9 22:46:51

测试.e (843.9 KB, 下载次数: 7)

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

[完成] 取列表随机并打乱顺序