如何传入子程序，随机执行。但最终都要执行

q286868280

如何传入子程序，随机执行。但最终都要执行
例如
程序a调试("1")


程序b

调试("2")

程序c
调试("3")

都执行程序(程序a,程序b,程序c)

那么打印出来有可能是：1,2,3
也可能是：2,1,3
也可能是：3,2,1

haoren1212

  

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

变量名	类 型	静态	数组	备 注
测试	子程序指针		0

加入成员 (测试, &子程序2)
加入成员 (测试, &子程序3)
加入成员 (测试, &子程序4)
子程序1 (测试)

子程序名	返回值类型	公开	备 注
子程序1
参数名	类 型	参考	可空	数组	备 注
测试	子程序指针

变量名	类 型	静态	数组	备 注
局_数组	子程序指针		0
成员数	整数型
i	整数型
局_位置	整数型

复制数组 (局_数组, 测试)
成员数 ＝ 取数组成员数 (局_数组)
计次循环首 (成员数, i)
局_位置 ＝ 取随机数 (1, 取数组成员数 (局_数组))
执行子程序 (局_数组 [局_位置], )
删除成员 (局_数组, 局_位置, )
计次循环尾 ()

子程序名	返回值类型	公开	备 注
子程序2

调试输出 (“1”)

子程序名	返回值类型	公开	备 注
子程序3

调试输出 (“2”)

子程序名	返回值类型	公开	备 注
子程序4

调试输出 (“3”)

i支持库列表	支持库注释
shellEx	扩展功能支持库一
spec	特殊功能支持库

.版本 2<br /> .支持库 shellEx<br /> .支持库 spec<br /> <br /> <br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 测试, 子程序指针, , "0"<br /> <br /> <br /> 加入成员 (测试, &子程序2)<br /> 加入成员 (测试, &子程序3)<br /> 加入成员 (测试, &子程序4)<br /> 子程序1 (测试)<br /> <br /> .子程序 子程序1<br /> .参数 测试, 子程序指针, 数组<br /> .局部变量 局_数组, 子程序指针, , "0"<br /> .局部变量 成员数, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 局_位置, 整数型<br /> <br /> 复制数组 (局_数组, 测试)<br /> 成员数 ＝ 取数组成员数 (局_数组)<br /> .计次循环首 (成员数, i)<br />     局_位置 ＝ 取随机数 (1, 取数组成员数 (局_数组))<br />     执行子程序 (局_数组 [局_位置], )<br />     删除成员 (局_数组, 局_位置, )<br /> .计次循环尾 ()<br /> <br /> .子程序 子程序2<br /> <br /> 调试输出 (“1”)<br /> <br /> <br /> .子程序 子程序3<br /> <br /> 调试输出 (“2”)<br /> <br /> .子程序 子程序4<br /> <br /> 调试输出 (“3”)

E小菜鸟

执行过的标记下

黑咖啡

  

置随机数种子 ()
推迟调用子程序 (取随机数 (10, 500), &子程序1, , , )
推迟调用子程序 (取随机数 (10, 500), &子程序2, , , )
推迟调用子程序 (取随机数 (10, 500), &子程序3, , , )

子程序名	返回值类型	公开	备 注
子程序1

调试输出 (“1”)

子程序名	返回值类型	公开	备 注
子程序2

调试输出 (“2”)

子程序名	返回值类型	公开	备 注
子程序3

调试输出 (“3”)

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

.版本 2<br /> .支持库 spec<br /> <br /> 置随机数种子 ()<br /> 推迟调用子程序 (取随机数 (10, 500), &子程序1, , , )<br /> 推迟调用子程序 (取随机数 (10, 500), &子程序2, , , )<br /> 推迟调用子程序 (取随机数 (10, 500), &子程序3, , , )<br /> <br /> <br /> .子程序 子程序1<br /> <br /> 调试输出 (“1”)<br /> <br /> <br /> .子程序 子程序2<br /> <br /> 调试输出 (“2”)<br /> <br /> <br /> .子程序 子程序3<br /> <br /> 调试输出 (“3”)

开始运行被调试程序
* “3”
* “1”
* “2”
被调试易程序运行完毕




补充内容 (2026-6-4 14:32):
火山？那...

q286868280

忘记说了，是随机执行，执行过的就不要执行了，未执行的，要执行一次

q286868280

haoren1212 发表于 2026-6-4 14:36
[e=1].版本 2
.支持库 shellEx
.支持库 spec

如果子程序有参数怎么办啊