多线程数组问题

笨鸟先飞

一个死循环有5个线程一直在读取一个数组5个数据


线程 12345

数组 12345

例子    3号停止 工作1245 线程

       读取数组这样 1234

  顺序不对了 数组报错  求思路改成一样顺序 感谢大神

明天自然醒

标准的写法~

管理器逻辑

  

窗口程序集名	保 留	保 留	备 注
任务管理器
变量名	类 型	数组	备 注
_等待事件	鱼刺类_事件	0
_映射表	整数型	0
_临界许可	鱼刺类_临界许可

子程序名	返回值类型	公开	备 注
_初始化			当基于本类的对象被创建后，此方法会被自动调用

子程序名	返回值类型	公开	备 注
_销毁			当基于本类的对象被销毁前，此方法会被自动调用

子程序名	返回值类型	公开	备 注
初始化
参数名	类 型	参考	可空	数组	备 注
容量	整数型

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

重定义数组 (_等待事件, 假, 容量)
计次循环首 (容量, i)
_等待事件 [i].创建 (真, 真, , )
计次循环尾 ()
计次循环首 (容量, i)
加入成员 (_映射表, i)
计次循环尾 ()

子程序名	返回值类型	公开	备 注
等待事件
参数名	类 型	参考	可空	数组	备 注
slot	整数型

_等待事件 [slot].等待进入 ()

子程序名	返回值类型	公开	备 注
取任务id	整数型
参数名	类 型	参考	可空	数组	备 注
slot	整数型

变量名	类 型	静态	数组	备 注
idx	整数型
i	整数型

_临界许可.进入 ()
计次循环首 (取数组成员数 (_映射表), i)
如果真 (_映射表 [i] ＝ slot)
idx ＝ i
跳出循环 ()

计次循环尾 ()
_临界许可.退出 ()
返回 (idx)

子程序名	返回值类型	公开	备 注
暂停
参数名	类 型	参考	可空	数组	备 注
slot	整数型

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

_等待事件 [slot].重置 ()  ' 先让它“睡着”
_临界许可.进入 ()
计次循环首 (取数组成员数 (_映射表), i)
如果真 (_映射表 [i] ＝ slot)
删除成员 (_映射表, i, )
跳出循环 ()

计次循环尾 ()
_临界许可.退出 ()

子程序名	返回值类型	公开	备 注
恢复
参数名	类 型	参考	可空	数组	备 注
slot	整数型

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

如果真 (_等待事件 [slot].等待进入 (10))
调试输出 (“线程运行中，无需恢复”)
返回 ()

_临界许可.进入 ()
如果 (取数组成员数 (_映射表) ＝ 0)
加入成员 (_映射表, slot)
判断 (slot ＞ _映射表 [取数组成员数 (_映射表)])  ' 插入到最后一个
加入成员 (_映射表, slot)
判断 (slot ＜ _映射表 [1])  ' 插入到第一个
插入成员 (_映射表, 1, slot)
变量循环首 (取数组成员数 (_映射表) － 1, 1, -1, i)
如果真 (slot ＜ _映射表 [i ＋ 1] 且 slot ＞ _映射表 [i])
插入成员 (_映射表, i ＋ 1, slot)

变量循环尾 ()

_临界许可.退出 ()
_等待事件 [slot].触发 ()

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

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

计次循环首 (取数组成员数 (_等待事件), i)
_等待事件 [i].触发 ()
_等待事件 [i].关闭 ()
计次循环尾 ()

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

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 任务管理器<br /> .程序集变量 _等待事件, 鱼刺类_事件, , "0"<br /> .程序集变量 _映射表, 整数型, , "0"<br /> .程序集变量 _临界许可, 鱼刺类_临界许可<br /> <br /> .子程序 _初始化, , , 当基于本类的对象被创建后，此方法会被自动调用<br /> <br /> <br /> <br /> .子程序 _销毁, , , 当基于本类的对象被销毁前，此方法会被自动调用<br /> <br /> <br /> <br /> .子程序 初始化, , 公开<br /> .参数 容量, 整数型<br /> .局部变量 i, 整数型<br /> <br /> 重定义数组 (_等待事件, 假, 容量)<br /> .计次循环首 (容量, i)<br />     _等待事件 <i>.创建 (真, 真, , )<br /> .计次循环尾 ()<br /> .计次循环首 (容量, i)<br />     加入成员 (_映射表, i)<br /> .计次循环尾 ()<br /> <br /> .子程序 等待事件, , 公开<br /> .参数 slot, 整数型<br /> <br /> _等待事件 [slot].等待进入 ()<br /> <br /> .子程序 取任务id, 整数型, 公开<br /> .参数 slot, 整数型<br /> .局部变量 idx, 整数型<br /> .局部变量 i, 整数型<br /> <br /> _临界许可.进入 ()<br /> .计次循环首 (取数组成员数 (_映射表), i)<br />     .如果真 (_映射表 <i> ＝ slot)<br />         idx ＝ i<br />         跳出循环 ()<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> _临界许可.退出 ()<br /> 返回 (idx)<br /> <br /> .子程序 暂停, , 公开<br /> .参数 slot, 整数型<br /> .局部变量 i, 整数型<br /> <br /> _等待事件 [slot].重置 ()  ' 先让它“睡着”<br /> _临界许可.进入 ()<br /> .计次循环首 (取数组成员数 (_映射表), i)<br />     .如果真 (_映射表 <i> ＝ slot)<br />         删除成员 (_映射表, i, )<br />         跳出循环 ()<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> _临界许可.退出 ()<br /> <br /> .子程序 恢复, , 公开<br /> .参数 slot, 整数型<br /> .局部变量 i, 整数型<br /> <br /> <br /> .如果真 (_等待事件 [slot].等待进入 (10))<br />     调试输出 (“线程运行中，无需恢复”)<br />     返回 ()<br /> .如果真结束<br /> <br /> _临界许可.进入 ()<br /> .如果 (取数组成员数 (_映射表) ＝ 0)<br />     加入成员 (_映射表, slot)<br /> .否则<br />     .判断开始 (slot ＞ _映射表 [取数组成员数 (_映射表)])  ' 插入到最后一个<br />         加入成员 (_映射表, slot)<br />     .判断 (slot ＜ _映射表 [1])  ' 插入到第一个<br />         插入成员 (_映射表, 1, slot)<br />     .默认<br />         .变量循环首 (取数组成员数 (_映射表) － 1, 1, -1, i)<br />             .如果真 (slot ＜ _映射表 [i ＋ 1] 且 slot ＞ _映射表 <i>)<br />                 插入成员 (_映射表, i ＋ 1, slot)<br />             .如果真结束<br /> <br />         .变量循环尾 ()<br />     .判断结束<br /> <br /> .如果结束<br /> _临界许可.退出 ()<br /> _等待事件 [slot].触发 ()<br /> <br /> .子程序 销毁, , 公开<br /> .局部变量 i, 整数型<br /> <br /> .计次循环首 (取数组成员数 (_等待事件), i)<br />     _等待事件 <i>.触发 ()<br />     _等待事件 <i>.关闭 ()<br /> .计次循环尾 ()

具体实现

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
_线程池	鱼刺类_线程池
_任务管理器	任务管理器
_任务终止	逻辑型

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

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

_线程池.创建 ( #最大线程数量, , , )
_任务管理器.初始化 ( #最大线程数量 )
计次循环首 ( #最大线程数量, i)
超级列表框1.插入表项 (, i, , , , )
计次循环尾 ()
计次循环首 ( #最大线程数量, i)
_线程池.投递任务 (&任务线程, i, )
计次循环尾 ()

子程序名	返回值类型	公开	备 注
任务线程
参数名	类 型	参考	可空	数组	备 注
线程id	整数型				线程id是固定不变的

变量名	类 型	静态	数组	备 注
任务id	整数型			任务id是动态变化的

判断循环首 (_任务终止 ＝ 假)
_任务管理器.等待事件 (线程id)
任务id ＝ _任务管理器.取任务id (线程id)
超级列表框1.置标题 (线程id － 1, 1, 任务id)
模拟业务代码 ()
判断循环尾 ()

子程序名	返回值类型	公开	备 注
模拟业务代码

延时 (10)

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

变量名	类 型	静态	数组	备 注
线程id	整数型

线程id ＝ 到整数 (编辑框1.内容)
_任务管理器.暂停 (线程id)
超级列表框1.置标题 (线程id － 1, 1, “/”)

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

变量名	类 型	静态	数组	备 注
线程id	整数型

线程id ＝ 到整数 (编辑框1.内容)
_任务管理器.恢复 (线程id)

子程序名	返回值类型	公开	备 注
__启动窗口_将被销毁

_任务终止 ＝ 真
_任务管理器.销毁 ()
_线程池.销毁 (, )

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br /> .支持库 iext<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 _线程池, 鱼刺类_线程池<br /> .程序集变量 _任务管理器, 任务管理器<br /> .程序集变量 _任务终止, 逻辑型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 i, 整数型<br /> <br /> _线程池.创建 (#最大线程数量, , , )<br /> _任务管理器.初始化 (#最大线程数量)<br /> <br /> .计次循环首 (#最大线程数量, i)<br />     超级列表框1.插入表项 (, i, , , , )<br /> .计次循环尾 ()<br /> <br /> .计次循环首 (#最大线程数量, i)<br />     _线程池.投递任务 (&任务线程, i, )<br /> .计次循环尾 ()<br /> <br /> .子程序 任务线程<br /> .参数 线程id, 整数型, , 线程id是固定不变的<br /> .局部变量 任务id, 整数型, , , 任务id是动态变化的<br /> <br /> <br /> .判断循环首 (_任务终止 ＝ 假)<br />     _任务管理器.等待事件 (线程id)<br />     任务id ＝ _任务管理器.取任务id (线程id)<br />     超级列表框1.置标题 (线程id － 1, 1, 任务id)<br />     模拟业务代码 ()<br /> .判断循环尾 ()<br /> <br /> .子程序 模拟业务代码<br /> <br /> 延时 (10)<br /> <br /> .子程序 _按钮_暂停线程_被单击<br /> .局部变量 线程id, 整数型<br /> <br /> 线程id ＝ 到整数 (编辑框1.内容)<br /> _任务管理器.暂停 (线程id)<br /> 超级列表框1.置标题 (线程id － 1, 1, “/”)<br /> <br /> .子程序 _按钮_恢复线程_被单击<br /> .局部变量 线程id, 整数型<br /> <br /> 线程id ＝ 到整数 (编辑框1.内容)<br /> _任务管理器.恢复 (线程id)<br /> <br /> .子程序 __启动窗口_将被销毁<br /> <br /> _任务终止 ＝ 真<br /> _任务管理器.销毁 ()<br /> _线程池.销毁 (, )

依次取任务.zip (184.61 KB, 下载次数: 4)

2026-1-8 11:41 上传

点击文件名下载附件

笨鸟先飞

jcos 发表于 2026-1-7 23:37
[e=4].版本 2
.支持库 EThread
.支持库 spec

我要在3号线程停止时候 删除 数组重新读入 数组1234 线程1245 这样

笨鸟先飞

z573277679 发表于 2026-1-8 01:16
来给我转精币
[e=4].版本 2
.支持库 EThread

我要在3号线程停止时候 删除 数组重新读入 数组1234 线程1245 这样

z573277679

来，给我转精币
开始运行被调试程序
* “线程ID:5 正在处理: 我是数据_5”
* “线程ID:1 正在处理: 我是数据_1”
* “线程ID:2 正在处理: 我是数据_2”
* “线程ID:4 正在处理: 我是数据_4”
* “线程ID:3 正在处理: 我是数据_3”
* “线程ID:4 正在处理: 我是数据_4”
* “线程ID:5 正在处理: 我是数据_5”
* “线程ID:1 正在处理: 我是数据_1”
* “线程ID:2 正在处理: 我是数据_2”
* “线程ID:3 正在处理: 我是数据_3”
* “线程ID:3 正在处理: 我是数据_3”
* “线程ID:1 正在处理: 我是数据_1”
* “线程ID:5 正在处理: 我是数据_5”
* “线程ID:4 正在处理: 我是数据_4”
* “线程ID:2 正在处理: 我是数据_2”
* “线程ID:1 正在处理: 我是数据_1”
* “线程ID:2 正在处理: 我是数据_2”
* “线程 3 已停止工作”
* “线程ID:5 正在处理: 我是数据_5”
* “线程ID:4 正在处理: 我是数据_4”
* “线程ID:1 正在处理: 我是数据_1”
* “线程ID:2 正在处理: 我是数据_2”
* “线程ID:4 正在处理: 我是数据_4”
* “线程ID:5 正在处理: 我是数据_5”
被调试易程序运行完毕
示例.e (956.11 KB, 下载次数: 4)

2026-1-8 01:17 上传

点击文件名下载附件

z573277679

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
全局_数据数组	文本型	0
全局_线程状态	逻辑型	0

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

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

' 1. 初始化数据
计次循环首 (5, i)
加入成员 (全局_数据数组, “我是数据_” ＋ 到文本 (i))
加入成员 (全局_线程状态, 真)  ' 默认都在运行
计次循环尾 ()
' 2. 启动线程，发sfz
计次循环首 (5, i)
启动线程 (&工作线程_逻辑, i, )
计次循环尾 ()

子程序名	返回值类型	公开	备 注
工作线程_逻辑
参数名	类 型	参考	可空	数组	备 注
我的sfz号	整数型

变量名	类 型	静态	数组	备 注
当前数据	文本型

判断循环首 (真)
' 1. 检查自己是否被命令停止
如果真 (全局_线程状态 [我的sfz号] ＝ 假)
调试输出 (“线程 ” ＋ 到文本 (我的sfz号) ＋ “ 已停止工作”)
跳出循环 ()

' 2. 读取数据 (雷打不动，只读自己的下标)
' 即使 3 号停了，5 号线程依然读取 数组[5]，互不干扰
当前数据 ＝ 全局_数据数组 [我的sfz号]
调试输出 (“线程ID:” ＋ 到文本 (我的sfz号) ＋ “ 正在处理: ” ＋ 当前数据)
延时 (1000)
判断循环尾 ()

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

' 只要修改状态，不要删除数组！
' 这样 1,2,4,5 继续跑，完全不受影响，也不会报错
全局_线程状态 [3] ＝ 假

i支持库列表	支持库注释
EThread	多线程支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 EThread<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 全局_数据数组, 文本型, , "0"<br /> .程序集变量 全局_线程状态, 逻辑型, , "0"<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 i, 整数型<br /> <br /> ' 1. 初始化数据<br /> .计次循环首 (5, i)<br />     加入成员 (全局_数据数组, “我是数据_” ＋ 到文本 (i))<br />     加入成员 (全局_线程状态, 真)  ' 默认都在运行<br /> .计次循环尾 ()<br /> <br /> ' 2. 启动线程，发sfz<br /> .计次循环首 (5, i)<br />     启动线程 (&工作线程_逻辑, i, )<br /> .计次循环尾 ()<br /> <br /> .子程序 工作线程_逻辑<br /> .参数 我的sfz号, 整数型<br /> .局部变量 当前数据, 文本型<br /> <br /> .判断循环首 (真)<br />     ' 1. 检查自己是否被命令停止<br />     .如果真 (全局_线程状态 [我的sfz号] ＝ 假)<br />         调试输出 (“线程 ” ＋ 到文本 (我的sfz号) ＋ “ 已停止工作”)<br />         跳出循环 ()<br />     .如果真结束<br /> <br />     ' 2. 读取数据 (雷打不动，只读自己的下标)<br />     ' 即使 3 号停了，5 号线程依然读取 数组[5]，互不干扰<br />     当前数据 ＝ 全局_数据数组 [我的sfz号]<br /> <br />     调试输出 (“线程ID:” ＋ 到文本 (我的sfz号) ＋ “ 正在处理: ” ＋ 当前数据)<br /> <br />     延时 (1000)<br /> .判断循环尾 ()<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> ' 只要修改状态，不要删除数组！<br /> ' 这样 1,2,4,5 继续跑，完全不受影响，也不会报错<br /> 全局_线程状态 [3] ＝ 假

z573277679

来给我转精币

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
全局_数据数组	文本型	0
全局_线程状态	逻辑型	0

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

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

' 1. 初始化数据
计次循环首 (5, i)
加入成员 (全局_数据数组, “我是数据_” ＋ 到文本 (i))
加入成员 (全局_线程状态, 真)  ' 默认都在运行
计次循环尾 ()
' 2. 启动线程，发sfz
计次循环首 (5, i)
启动线程 (&工作线程_逻辑, i, )
计次循环尾 ()

子程序名	返回值类型	公开	备 注
工作线程_逻辑
参数名	类 型	参考	可空	数组	备 注
我的sfz号	整数型

变量名	类 型	静态	数组	备 注
当前数据	文本型

判断循环首 (真)
' 1. 检查自己是否被命令停止
如果真 (全局_线程状态 [我的sfz号] ＝ 假)
调试输出 (“线程 ” ＋ 到文本 (我的sfz号) ＋ “ 已停止工作”)
跳出循环 ()

' 2. 读取数据 (雷打不动，只读自己的下标)
' 即使 3 号停了，5 号线程依然读取 数组[5]，互不干扰
当前数据 ＝ 全局_数据数组 [我的sfz号]
调试输出 (“线程ID:” ＋ 到文本 (我的sfz号) ＋ “ 正在处理: ” ＋ 当前数据)
延时 (1000)
判断循环尾 ()

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

' 只要修改状态，不要删除数组！
' 这样 1,2,4,5 继续跑，完全不受影响，也不会报错
全局_线程状态 [3] ＝ 假

i支持库列表	支持库注释
EThread	多线程支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 EThread<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 全局_数据数组, 文本型, , "0"<br /> .程序集变量 全局_线程状态, 逻辑型, , "0"<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 i, 整数型<br /> <br /> ' 1. 初始化数据<br /> .计次循环首 (5, i)<br />     加入成员 (全局_数据数组, “我是数据_” ＋ 到文本 (i))<br />     加入成员 (全局_线程状态, 真)  ' 默认都在运行<br /> .计次循环尾 ()<br /> <br /> ' 2. 启动线程，发sfz<br /> .计次循环首 (5, i)<br />     启动线程 (&工作线程_逻辑, i, )<br /> .计次循环尾 ()<br /> <br /> .子程序 工作线程_逻辑<br /> .参数 我的sfz号, 整数型<br /> .局部变量 当前数据, 文本型<br /> <br /> .判断循环首 (真)<br />     ' 1. 检查自己是否被命令停止<br />     .如果真 (全局_线程状态 [我的sfz号] ＝ 假)<br />         调试输出 (“线程 ” ＋ 到文本 (我的sfz号) ＋ “ 已停止工作”)<br />         跳出循环 ()<br />     .如果真结束<br /> <br />     ' 2. 读取数据 (雷打不动，只读自己的下标)<br />     ' 即使 3 号停了，5 号线程依然读取 数组[5]，互不干扰<br />     当前数据 ＝ 全局_数据数组 [我的sfz号]<br /> <br />     调试输出 (“线程ID:” ＋ 到文本 (我的sfz号) ＋ “ 正在处理: ” ＋ 当前数据)<br /> <br />     延时 (1000)<br /> .判断循环尾 ()<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> ' 只要修改状态，不要删除数组！<br /> ' 这样 1,2,4,5 继续跑，完全不受影响，也不会报错<br /> 全局_线程状态 [3] ＝ 假

jcos

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_窗口1
变量名	类 型	数组	备 注
线程状态	整数型	5
中止执行	逻辑型		等真时跳出死循环
数组	文本型	5

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
线程标识	整数型

' 死循环
判断循环首 (真)
线程标识 ＝ 线程标识 ＋ 1
启动线程 (&子程序1, 线程标识, )
' 比如有5条线程循环执行，第执行第5后再从第1条开始
如果真 (线程标识 ＝ 5)
线程标识 ＝ 0

' 延迟1秒再执行下一条
程序_延时 (1000, )
' 就算是死循环，也应该加一个标识，以为结束这个循环，比如
如果真 (中止执行)
调试输出 (“已结束死循环”)
跳出循环 ()

判断循环尾 ()

子程序名	返回值类型	公开	备 注
子程序1
参数名	类 型	参考	可空	数组	备 注
线程标识	整数型				第几条线程标识

如果真 (线程标识 ＝ 1 且 线程状态 [1] ＝ 0)
' 你的业务代码
' 数组[1]
如果真 (线程标识 ＝ 2 且 线程状态 [2] ＝ 0)
' 你的业务代码
' 数组[2]
如果真 (线程标识 ＝ 3 且 线程状态 [3] ＝ 0)
' 你的业务代码
' 数组[3]
如果真 (线程标识 ＝ 4 且 线程状态 [4] ＝ 0)
' 你的业务代码
' 数组[4]
如果真 (线程标识 ＝ 5 且 线程状态 [5] ＝ 0)
' 你的业务代码
' 数组[5]

' ===== 备注 =====
' 线程状态，比如是0 是正常，等1是关闭的，也就是不执行的

i支持库列表	支持库注释
EThread	多线程支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 EThread<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_窗口1<br /> .程序集变量 线程状态, 整数型, , "5"<br /> .程序集变量 中止执行, 逻辑型, , , 等真时跳出死循环<br /> .程序集变量 数组, 文本型, , "5"<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 线程标识, 整数型<br /> <br /> ' 死循环<br /> .判断循环首 (真)<br />     线程标识 ＝ 线程标识 ＋ 1<br /> <br />     启动线程 (&子程序1, 线程标识, )<br /> <br />     ' 比如有5条线程循环执行，第执行第5后再从第1条开始<br />     .如果真 (线程标识 ＝ 5)<br />         线程标识 ＝ 0<br />     .如果真结束<br /> <br />     ' 延迟1秒再执行下一条<br />     程序_延时 (1000, )<br /> <br />     ' 就算是死循环，也应该加一个标识，以为结束这个循环，比如<br />     .如果真 (中止执行)<br />         调试输出 (“已结束死循环”)<br />         跳出循环 ()<br />     .如果真结束<br /> <br /> .判断循环尾 ()<br /> <br /> <br /> .子程序 子程序1<br /> .参数 线程标识, 整数型, , 第几条线程标识<br /> <br /> .如果真 (线程标识 ＝ 1 且 线程状态 [1] ＝ 0)<br />     ' 你的业务代码<br />     ' 数组[1]<br /> <br /> .如果真结束<br /> .如果真 (线程标识 ＝ 2 且 线程状态 [2] ＝ 0)<br />     ' 你的业务代码<br />     ' 数组[2]<br /> <br /> .如果真结束<br /> .如果真 (线程标识 ＝ 3 且 线程状态 [3] ＝ 0)<br />     ' 你的业务代码<br />     ' 数组[3]<br /> <br /> .如果真结束<br /> .如果真 (线程标识 ＝ 4 且 线程状态 [4] ＝ 0)<br />     ' 你的业务代码<br />     ' 数组[4]<br /> <br /> .如果真结束<br /> .如果真 (线程标识 ＝ 5 且 线程状态 [5] ＝ 0)<br />     ' 你的业务代码<br />     ' 数组[5]<br /> <br /> .如果真结束<br /> <br /> ' ===== 备注 =====<br /> ' 线程状态，比如是0 是正常，等1是关闭的，也就是不执行的

笨鸟先飞

jcos 发表于 2026-1-7 22:35
做个标识判断呀，对应着数组位置

数组[5]

老哥我没明白求例子 给你转金币行吗

jcos

做个标识判断呀，对应着数组位置

数组[5]
这样指定第几个数组读取