文本取随机数字

chunyu

如果我在编辑框1.内容 填写
1
2
3
4
5
6
7
8

我想取3个随机数字，不重复的应该怎么搞

卿卿吖

精易模块
取出不重复.e (960.54 KB, 下载次数: 7)

2025-5-21 21:32 上传

点击文件名下载附件

opphk

取随机数(1，3)，可能写的不对，你可能写个取随机数，后面有提示你按着填

chunyu

opphk 发表于 2025-5-21 21:28
取随机数(1，3)，可能写的不对，你可能写个取随机数，后面有提示你按着填

我的意思是在编辑框里面取呢

opphk

文本分割，加入数组，随机取数组，去取重复，判断数组数量是否为三个，调试输出

萌新来学习

看图就明白了

补充内容 (2025-5-21 21:35):
如果对您有帮助，望采纳

aipca

  

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

变量名	类 型	静态	数组	备 注
文本	文本型		0
i	整数型
随机数	整数型
新文本	文本型

文本 ＝ 分割文本 (编辑框1.内容, #换行符, )
计次循环首 (3, i)
置随机数种子 ()
随机数 ＝ 取随机数 (1, 取数组成员数 (文本))
判断 (i ＝ 3)
新文本 ＝ 新文本 ＋ 文本 [随机数]
新文本 ＝ 新文本 ＋ 文本 [随机数] ＋ “，”
删除成员 (文本, 随机数, 1)
计次循环尾 ()
调试输出 (新文本)

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 文本, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 随机数, 整数型<br /> .局部变量 新文本, 文本型<br /> <br /> 文本 ＝ 分割文本 (编辑框1.内容, #换行符, )<br /> .计次循环首 (3, i)<br />     置随机数种子 ()<br />     随机数 ＝ 取随机数 (1, 取数组成员数 (文本))<br />     .判断开始 (i ＝ 3)<br />         新文本 ＝ 新文本 ＋ 文本 [随机数]<br />     .默认<br />         新文本 ＝ 新文本 ＋ 文本 [随机数] ＋ “，”<br />     .判断结束<br />     删除成员 (文本, 随机数, 1)<br /> .计次循环尾 ()<br /> 调试输出 (新文本)