变量名称 组件啥的 能用变量来定吗？

woyao2991314

  

子程序名	返回值类型	公开	备 注
_指定名称_被单击

变量名	类 型	静态	数组	备 注
i	整数型
s1	文本型		0
s2	文本型		0
s3	文本型		0
s4	文本型		0
s5	文本型		0
数组名	文本型
成员几	整数型

s1 ＝ 分割文本 (q1.内容, #换行符, )
s2 ＝ 分割文本 (q1.内容, #换行符, )
s3 ＝ 分割文本 (q1.内容, #换行符, )
s4 ＝ 分割文本 (q1.内容, #换行符, )
s5 ＝ 分割文本 (q1.内容, #换行符, )
计次循环首 (5, i)
数组名 ＝ “s” ＋ 取随机数 (1, 5)
成员几 ＝ 取随机数 (1, 99)
调试输出 (s+数组名 [成员几])  ' 如果这样，但是这写法不行
' 有没不用判断直接 像取成员那样的写法
判断 (数组名 ＝ “s1”)
调试输出 (s1 [成员几])
判断 (数组名 ＝ “s1”)
调试输出 (s2 [成员几])
判断 (数组名 ＝ “s1”)
调试输出 (s3 [成员几])
判断 (数组名 ＝ “s1”)
调试输出 (s4 [成员几])
判断 (数组名 ＝ “s1”)
调试输出 (s5 [成员几])



计次循环尾 ()

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _指定名称_被单击<br /> .局部变量 i, 整数型<br /> .局部变量 s1, 文本型, , "0"<br /> .局部变量 s2, 文本型, , "0"<br /> .局部变量 s3, 文本型, , "0"<br /> .局部变量 s4, 文本型, , "0"<br /> .局部变量 s5, 文本型, , "0"<br /> .局部变量 数组名, 文本型<br /> .局部变量 成员几, 整数型<br /> <br /> s1 ＝ 分割文本 (q1.内容, #换行符, )<br /> s2 ＝ 分割文本 (q1.内容, #换行符, )<br /> s3 ＝ 分割文本 (q1.内容, #换行符, )<br /> s4 ＝ 分割文本 (q1.内容, #换行符, )<br /> s5 ＝ 分割文本 (q1.内容, #换行符, )<br /> <br /> .计次循环首 (5, i)<br />     数组名 ＝ “s” ＋ 取随机数 (1, 5)<br />     成员几 ＝ 取随机数 (1, 99)<br />     调试输出 (s+数组名 [成员几])  ' 如果这样，但是这写法不行<br />     ' 有没不用判断直接 像取成员那样的写法<br />     .判断开始 (数组名 ＝ “s1”)<br />         调试输出 (s1 [成员几])<br />     .判断 (数组名 ＝ “s1”)<br />         调试输出 (s2 [成员几])<br />     .判断 (数组名 ＝ “s1”)<br />         调试输出 (s3 [成员几])<br />     .判断 (数组名 ＝ “s1”)<br />         调试输出 (s4 [成员几])<br />     .判断 (数组名 ＝ “s1”)<br />         调试输出 (s5 [成员几])<br />     .默认<br /> <br />     .判断结束<br /> <br /> .计次循环尾 ()

samll88

  

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

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

置随机数种子 ()
加入成员 (数组, 分割文本 (q1.内容, #换行符, ))
加入成员 (数组, 分割文本 (q1.内容, #换行符, ))
加入成员 (数组, 分割文本 (q1.内容, #换行符, ))
加入成员 (数组, 分割文本 (q1.内容, #换行符, ))
加入成员 (数组, 分割文本 (q1.内容, #换行符, ))
计次循环首 (5, i)
调试输出 (数组 [取随机数 (1, 取数组成员数 (数组))])
计次循环尾 ()

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 i, 整数型<br /> .局部变量 数组, 文本型, , "0"<br /> <br /> 置随机数种子 ()<br /> 加入成员 (数组, 分割文本 (q1.内容, #换行符, ))<br /> 加入成员 (数组, 分割文本 (q1.内容, #换行符, ))<br /> 加入成员 (数组, 分割文本 (q1.内容, #换行符, ))<br /> 加入成员 (数组, 分割文本 (q1.内容, #换行符, ))<br /> 加入成员 (数组, 分割文本 (q1.内容, #换行符, ))<br /> .计次循环首 (5, i)<br />     调试输出 (数组 [取随机数 (1, 取数组成员数 (数组))])<br /> .计次循环尾 ()

你这样写感觉很费事,不如把所有数组直接合并,然后随机抽一个,结果和你这个一样

走一回

可以用命令复制出来的变量名来命名，是组件的要有源始的组件加载。

aipca

  

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

变量名	类 型	静态	数组	备 注
i	整数型
s1	文本型		0
s2	文本型		0
s3	文本型		0
s4	文本型		0
s5	文本型		0
数组名	文本型		0
成员几	整数型

置随机数种子 ()
清除数组 (数组名)
s1 ＝ 分割文本 (q1.内容, #换行符, )
s2 ＝ 分割文本 (q1.内容, #换行符, )
s3 ＝ 分割文本 (q1.内容, #换行符, )
s4 ＝ 分割文本 (q1.内容, #换行符, )
s5 ＝ 分割文本 (q1.内容, #换行符, )
加入成员 (数组名, s1)
加入成员 (数组名, s2)
加入成员 (数组名, s3)
加入成员 (数组名, s4)
加入成员 (数组名, s5)
计次循环首 (取数组成员数 (数组名), i)
成员几 ＝ 取随机数 (1, 5)
如果真 (i ��� (成员几 － 1) × 5 且 i ��� (成员几 － 1) × 5)
调试输出 (数组名 [i] ＋ “是在s” ＋ 到文本 (成员几))

计次循环尾 ()

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 i, 整数型<br /> .局部变量 s1, 文本型, , "0"<br /> .局部变量 s2, 文本型, , "0"<br /> .局部变量 s3, 文本型, , "0"<br /> .局部变量 s4, 文本型, , "0"<br /> .局部变量 s5, 文本型, , "0"<br /> .局部变量 数组名, 文本型, , "0"<br /> .局部变量 成员几, 整数型<br /> <br /> 置随机数种子 ()<br /> 清除数组 (数组名)<br /> s1 ＝ 分割文本 (q1.内容, #换行符, )<br /> s2 ＝ 分割文本 (q1.内容, #换行符, )<br /> s3 ＝ 分割文本 (q1.内容, #换行符, )<br /> s4 ＝ 分割文本 (q1.内容, #换行符, )<br /> s5 ＝ 分割文本 (q1.内容, #换行符, )<br /> 加入成员 (数组名, s1)<br /> 加入成员 (数组名, s2)<br /> 加入成员 (数组名, s3)<br /> 加入成员 (数组名, s4)<br /> 加入成员 (数组名, s5)<br /> .计次循环首 (取数组成员数 (数组名), i)<br />     成员几 ＝ 取随机数 (1, 5)<br />     .如果真 (i ≥ (成员几 － 1) × 5 且 i ≤ (成员几 － 1) × 5)<br />         调试输出 (数组名 <i> ＋ “是在s” ＋ 到文本 (成员几))<br />     .如果真结束<br /> <br /> .计次循环尾 ()

补充内容 (2025-4-7 08:54):
如果真 (i ≥ (成员几 － 1) × 5 且 i ≤ (成员几 － 1) × 5)
为啥经常出现乱码，奇怪

woyao2991314

aipca 发表于 2025-4-7 08:53
[e=1].版本 2
.支持库 spec

还是搞不明白，

[JavaScript] 纯文本查看 复制代码

.版本 2

.子程序 _指定名称_被单击
.局部变量 i, 整数型
.局部变量 s1, 文本型, , "0"
.局部变量 s2, 文本型, , "0"
.局部变量 s3, 文本型, , "0"
.局部变量 s4, 文本型, , "0"
.局部变量 s5, 文本型, , "0"
.局部变量 数组名, 文本型, , "0"
.局部变量 成员几, 整数型
.局部变量 数组几, 整数型

数组名 ＝ 分割文本 (“s1 s2 s3 s4 s5”, “ ”, )
s1 ＝ 分割文本 (q1.内容, #换行符, )
s2 ＝ 分割文本 (q2.内容, #换行符, )
s3 ＝ 分割文本 (q3.内容, #换行符, )
s4 ＝ 分割文本 (q4.内容, #换行符, )
s5 ＝ 分割文本 (q5.内容, #换行符, )

成员几 ＝ 取随机数 (1, 5)
数组几 ＝ 取随机数 (1, 5)
' 假设 s1 的成员1 是10 输出结果=10
调试输出 (数组几的成员几内容)‘输出数组几 的成员几=内容

笨来无一悟

分五个数组去取简直是多此一举 又不是一个数组只取一次 既然哪个数组取不取 取几次都是随机的 那合并就是完全等价的

  

子程序名	返回值类型	公开	备 注
数组随机文本
参数名	类 型	参考	可空	数组	备 注
参_文本一	文本型
参_文本二	文本型
参_文本三	文本型
参_文本四	文本型
参_文本五	文本型

变量名	类 型	静态	数组	备 注
文本	快速文本对象
数组	文本型		0

文本.添加 (参_文本一, 参_文本二, 参_文本三, 参_文本四, 参_文本五)
数组 ＝ 文本.分割文本 ( #换行符, )
计次循环首 (5, )
数组[取随机数 (1,取数组成员数 (数组))]
计次循环尾 ()

i支持库列表	支持库注释
commobj	通用对象支持库

.版本 2<br /> .支持库 commobj<br /> <br /> .子程序 数组随机文本<br /> .参数 参_文本一, 文本型<br /> .参数 参_文本二, 文本型<br /> .参数 参_文本三, 文本型<br /> .参数 参_文本四, 文本型<br /> .参数 参_文本五, 文本型<br /> .局部变量 文本, 快速文本对象<br /> .局部变量 数组, 文本型, , "0"<br /> <br /> 文本.添加 (参_文本一, 参_文本二, 参_文本三, 参_文本四, 参_文本五)<br /> 数组 ＝ 文本.分割文本 (#换行符, )<br /> .计次循环首 (5, )<br />     数组[取随机数(1,取数组成员数(数组))]<br /> .计次循环尾 ()

音速

没搞懂你这代码是要干啥，，，s1-s5都是同样的数据，直接去随机就好了，
组件可以设置变量， 可以加入标记。 组件复制 食用参考下面帖子：https://bbs.125.la/forum.php?mod=viewthread&tid=14692927

woyao2991314

向各位大哥学习，举列也要严谨 ，实际用的话 数组内容不一样的