易语言置入代码例程 多项选择执行子程序

易语言置入代码例程 多项选择执行子程序

.版本 2

.程序集 窗口程序集_启动窗口

.子程序 _按钮1_被单击

输出调试文本 (多项选择执行子程序1 (到整数 (编辑框1.内容), &子程序1, &子程序2, &子程序3, &子程序4, &子程序5, &子程序6, &子程序7, &子程序8, &子程序9, &子程序10))

.子程序 _按钮2_被单击

输出调试文本 (多项选择执行子程序2 (到整数 (编辑框1.内容), &子程序1, &子程序2, &子程序3, &子程序4, &子程序5, &子程序6, &子程序7, &子程序8, &子程序9, &子程序10))

.子程序 多项选择执行子程序1, 整数型, , 索引下标越界返回-1
.参数 索引值, 整数型, , 请提供1-10,如果小于1或大于10都返回-1  该参数会传递到执行的子程序下面
.参数 子程序1, 子程序指针, , 可根据需要改成整数型
.参数 子程序2, 子程序指针
.参数 子程序3, 子程序指针
.参数 子程序4, 子程序指针, , 类型只能是整数型或者子程序指针
.参数 子程序5, 子程序指针
.参数 子程序6, 子程序指针
.参数 子程序7, 子程序指针
.参数 子程序8, 子程序指针, , 固定的参数数量,不知道怎么改成动态扩展参数.....
.参数 子程序9, 子程序指针
.参数 子程序10, 子程序指针

置入代码 ({ 139, 77, 8, 131, 249, 1, 117, 5, 139, 69, 12, 235, 92, 131, 249, 2, 117, 5, 139, 69, 16, 235, 82, 131, 249, 3, 117, 5, 139, 69, 20, 235, 72, 131, 249, 4, 117, 5, 139, 69, 24, 235, 62, 131, 249, 5, 117, 5, 139, 69, 28, 235, 52, 131, 249, 6, 117, 5, 139, 69, 32, 235, 42, 131, 249, 7, 117, 5, 139, 69, 36, 235, 32, 131, 249, 8, 117, 5, 139, 69, 40, 235, 22, 131, 249, 9, 117, 5, 139, 69, 44, 235, 12, 131, 249, 10, 117, 5, 139, 69, 48, 235, 2, 235, 7, 81, 255, 208, 201, 194, 4, 0, 201, 184, 255, 255, 255, 255, 194, 4, 0 })
返回 (0)

.子程序 多项选择执行子程序2, 整数型, , 索引下标越界执行第一个子程序
.参数 索引值, 整数型, , 请提供1-10,如果<1或>10 则执行第一个子程序  该参数会传递到执行的子程序下面
.参数 子程序1, 子程序指针, , 可根据需要改成整数型
.参数 子程序2, 子程序指针
.参数 子程序3, 子程序指针
.参数 子程序4, 子程序指针, , 固定的参数数量,不知道怎么改成动态扩展参数.....
.参数 子程序5, 子程序指针
.参数 子程序6, 子程序指针
.参数 子程序7, 子程序指针
.参数 子程序8, 子程序指针, , 类型只能是整数型或者子程序指针
.参数 子程序9, 子程序指针
.参数 子程序10, 子程序指针

置入代码 ({ 139, 77, 8, 131, 249, 1, 117, 5, 139, 69, 12, 235, 93, 131, 249, 2, 117, 5, 139, 69, 16, 235, 83, 131, 249, 3, 117, 5, 139, 69, 20, 235, 73, 131, 249, 4, 117, 5, 139, 69, 24, 235, 63, 131, 249, 5, 117, 5, 139, 69, 28, 235, 53, 131, 249, 6, 117, 5, 139, 69, 32, 235, 43, 131, 249, 7, 117, 5, 139, 69, 36, 235, 33, 131, 249, 8, 117, 5, 139, 69, 40, 235, 23, 131, 249, 9, 117, 5, 139, 69, 44, 235, 13, 131, 249, 10, 117, 5, 139, 69, 48, 235, 3, 139, 69, 12, 81, 255, 208, 201, 194, 4, 0 })
返回 (0)

.子程序 子程序1, 整数型
.参数 a, 整数型

信息框 (“我是老大,后面的都是疯子”, 0, , )
返回 (a)

.子程序 子程序2, 整数型
.参数 a, 整数型

信息框 (“我是有点正经的老二”, 0, , )
返回 (a)

.子程序 子程序3, 整数型
.参数 a, 整数型

信息框 (“我是正经的老三”, 0, , )
返回 (a)

.子程序 子程序4, 整数型
.参数 参数1, 整数型

信息框 (“ssssssssssssssssssssssssssssssssss去屎”, 0, , )
返回 (参数1)

.子程序 子程序5, 整数型
.参数 参数1, 整数型

信息框 (“555555555555555555555”, 0, , )
返回 (参数1)

.子程序 子程序6, 整数型
.参数 参数1, 整数型

信息框 (“6666666666666666666666666666666666666666666666666666666666666666666666666666666真6”, 0, , )
返回 (参数1)

.子程序 子程序7, 整数型
.参数 参数1, 整数型

信息框 (“七枷社在此....”, 0, , )
返回 (参数1)

.子程序 子程序8, 整数型
.参数 参数1, 整数型

信息框 (“八神三段笑,自己脑补...哇哈哈哈哈哈  哇哈哈哈哈  哇哈哈哈哈哈哈哈哈哈”, 0, , )
返回 (参数1)

.子程序 子程序9, 整数型
.参数 参数1, 整数型

信息框 (“九妹九妹漂亮的妹妹”, 0, , )
返回 (参数1)

.子程序 子程序10, 整数型
.参数 参数1, 整数型

信息框 (“第10个子程序”, 0, , )
返回 (参数1)  ' 返回值根据需要修改,如果是非整数,返回的是指针

@福仔