50个多线程发动后，怎么知道全部执行完毕好进行下一步呢？

yifan790

  

临时文本数组 ＝ 分割文本 (临时文本, #换行符, )
计次循环首 (50, 计次)
代理IP ＝ 临时文本数组 [计次]
线程_启动_文本型 (到整数 (&work_开始cha询), , , , , 代理IP)

处理事件 ()
计次循环尾 ()
' 怎么判断上面的50个线程执行完没？
' 50个线程结束后，再进行下一步

i支持库列表	支持库注释
internet	互联网支持库

.版本 2<br /> .支持库 internet<br /> <br /> 临时文本数组 ＝ 分割文本 (临时文本, #换行符, )<br /> <br /> .计次循环首 (50, 计次)<br /> <br />     代理IP ＝ 临时文本数组 [计次]<br /> <br />         线程_启动_文本型 (到整数 (&work_开始cha询), , , , , 代理IP)<br /> <br />     .如果真结束<br /> <br />     处理事件 ()<br /> <br /> .计次循环尾 ()<br /> <br /> '怎么判断上面的50个线程执行完没？<br /> <br /> '50个线程结束后，再进行下一步

七彩色工作室

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
集_正在运行的线程数量	整数型
许可证	整数型

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

许可证 ＝ 创建进入许可证 ()

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

临时文本数组 ＝ 分割文本 (临时文本, #换行符, )
计次循环首 (50, 计次)
代理IP ＝ 临时文本数组 [计次]
进入许可区 (许可证)
集_正在运行的线程数量 ＝ 集_正在运行的线程数量 ＋ 1
退出许可区 (许可证)
线程_启动_文本型 (到整数 (&work_开始cha询), , , , , 代理IP)
处理事件 ()
计次循环尾 ()
' 怎么判断上面的50个线程执行完没？
' 50个线程结束后，再进行下一步
判断循环首 (集_正在运行的线程数量 ≤ 0)
跳出循环 ()
程序_延时 (2000, )
处理事件 ()
判断循环尾 ()
' 开始处理事件

子程序名	返回值类型	公开	备 注
work_开始cha询

' 这里是你的代码
' 处理完成
进入许可区 (许可证)
集_正在运行的线程数量 ＝ 集_正在运行的线程数量 － 1
退出许可区 (许可证)

i支持库列表	支持库注释
EThread	多线程支持库

.版本 2<br /> .支持库 EThread<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 集_正在运行的线程数量, 整数型<br /> .程序集变量 许可证, 整数型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 许可证 ＝ 创建进入许可证 ()<br /> <br /> <br /> .子程序 _按钮1_被单击<br /> <br /> 临时文本数组 ＝ 分割文本 (临时文本, #换行符, )<br /> <br /> .计次循环首 (50, 计次)<br /> <br />     代理IP ＝ 临时文本数组 [计次]<br />     进入许可区 (许可证)<br />     集_正在运行的线程数量 ＝ 集_正在运行的线程数量 ＋ 1<br />     退出许可区 (许可证)<br />     线程_启动_文本型 (到整数 (&work_开始cha询), , , , , 代理IP)<br /> <br /> <br />     处理事件 ()<br /> <br /> .计次循环尾 ()<br /> <br /> '怎么判断上面的50个线程执行完没？<br /> <br /> ' 50个线程结束后，再进行下一步<br /> <br /> .判断循环首 (集_正在运行的线程数量 ≤ 0)<br />     跳出循环 ()<br />     程序_延时 (2000, )<br />     处理事件 ()<br /> .判断循环尾 ()<br /> <br /> ' 开始处理事件<br /> <br /> .子程序 work_开始cha询<br /> <br /> ' 这里是你的代码<br /> ' 处理完成<br /> 进入许可区 (许可证)<br /> 集_正在运行的线程数量 ＝ 集_正在运行的线程数量 － 1<br /> 退出许可区 (许可证)

补充内容 (2022-4-1 19:36):
这里面的代码注意后面的判断应该是 集_正在运行的线程数量 >0，并且里面的跳出循环要去掉啊~~~

XZ6

用线程池吧，线程池可以判断空闲线程，全部空闲就是全部运行完了

XZ6

  

变量名	类 型	静态	数组	备 注
计次	整数型
局_线程句柄	整数型
局_线程数组	整数型		0
局_状态	整数型

临时文本数组 ＝ 分割文本 (临时文本, #换行符, )
计次循环首 (50, 计次)
代理IP ＝ 临时文本数组 [计次]
局_线程句柄 ＝ 线程_启动_文本型 (到整数 (&work_开始cha询), , , , , 代理IP)
加入成员 (局_线程数组, 局_线程句柄)
处理事件 ()
计次循环尾 ()
局_状态 ＝ 0
判断循环首 (局_状态 ≥ 0)
计次循环首 (取数组成员数 (局_线程数组), 计次)
如果真 (线程_取状态 (局_线程数组 [计次]) ＝ 0)
局_状态 ＝ 局_状态 ＋ 1

计次循环尾 ()
如果真 (局_状态 ＝ 取数组成员数 (局_线程数组))
跳出循环 ()
局_状态 ＝ 0
处理事件 ()
程序_延时 (1000)
判断循环尾 ()
调试输出 (“全部运行完毕”)

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

.版本 2<br /> .支持库 spec<br /> <br /> .局部变量 计次, 整数型<br /> .局部变量 局_线程句柄, 整数型<br /> .局部变量 局_线程数组, 整数型, , "0"<br /> .局部变量 局_状态, 整数型<br /> <br /> 临时文本数组 ＝ 分割文本 (临时文本, #换行符, )<br /> .计次循环首 (50, 计次)<br />     代理IP ＝ 临时文本数组 [计次]<br />     局_线程句柄 ＝ 线程_启动_文本型 (到整数 (&work_开始cha询), , , , , 代理IP)<br />     加入成员 (局_线程数组, 局_线程句柄)<br />     处理事件 ()<br /> .计次循环尾 ()<br /> 局_状态 ＝ 0<br /> .判断循环首 (局_状态 ≥ 0)<br />     .计次循环首 (取数组成员数 (局_线程数组), 计次)<br />         .如果真 (线程_取状态 (局_线程数组 [计次]) ＝ 0)<br />             局_状态 ＝ 局_状态 ＋ 1<br />         .如果真结束<br /> <br />     .计次循环尾 ()<br />     .如果真 (局_状态 ＝ 取数组成员数 (局_线程数组))<br />         跳出循环 ()<br />     .如果真结束<br />     局_状态 ＝ 0<br />     处理事件 ()<br />     程序_延时 (1000)<br /> .判断循环尾 ()<br /> 调试输出 (“全部运行完毕”)

剧终0616

七彩色工作室 发表于 2022-3-31 09:45
[e=0].版本 2
.支持库 EThread

错了吧，判断循环首 里面的条件小于等于0 ，那不就不进入循环了。！

七彩色工作室

剧终0616 发表于 2022-3-31 14:08
错了吧，判断循环首 里面的条件小于等于0 ，那不就不进入循环了。！

貌似是的~
写了没有验证哈哈，应该是大于0，里面加判断小于零的时候跳出

剧终0616

七彩色工作室 发表于 2022-3-31 16:28
貌似是的~
写了没有验证哈哈，应该是大于0，里面加判断小于零的时候跳出 ...

额，里面也不需要加判断，就判断循环首那边加就可以

wgx7450

这几天刚学习多线程, 可以用精易模块里的   原子递增变量和原子递减变量