多线程 zc成功数量后才停止 而且线程不溢出

yangdonglin

现在的问题是  设置任务数量5  执行5个就停止（然而5个都是失败了）  大佬们看看怎么改成根据成功数量停止多线程


.版本 2
.支持库 spec

.子程序 多线程
.局部变量 任务总数量, 整数型
.局部变量 已执行任务数量, 整数型
.局部变量 线程数量, 整数型



任务总数量 ＝ 到整数 (编辑框成功数量.内容)
已执行任务数量 ＝ 0
程_已执行线程数量 ＝ 0
线程数量 ＝ 到整数 (编辑框注册线程.内容)
.判断循环首 (任务总数量 ＞ 已执行任务数量)


    .如果真 (线程数量 ＞ 程_已执行线程数量)
        线程_启动 (&主程序, , )
        已执行任务数量 ＝ 已执行任务数量 ＋ 1
        程_已执行线程数量 ＝ 程_已执行线程数量 ＋ 1
        程序_延时 (20, )
    .如果真结束


.判断循环尾 ()

调试输出 (“当前任务已结束,请等待已投入线程执行完毕，已投入线程数量：” ＋ 到文本 (程_已执行线程数量))
.判断循环首 (程_已执行线程数量 ＞ 0)
    程序_延时 (200, )
.判断循环尾 ()

信息框 (“任务完成！”, 0, , )





在zc程序最后添加了成功数量的程序集变量

.版本 2
.支持库 iext

成功数量 ＝ 成功数量 ＋ 1
状态条1.置文本 (7, 到文本 (成功数量))
线程_退出许可区 (许可证)
释放手机号 (手机号)
自定义延迟 ()
线程_进入许可区 (许可证)
程_已执行线程数量 ＝ 程_已执行线程数量 － 1
线程_退出许可区 (许可证)
返回 ()

Suky

yangdonglin 发表于 2023-4-27 23:34
应该怎么写啊

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
许可证1	整数型
许可证2	整数型
集_已执行线程数量	整数型
集_已执行任务数量	整数型

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

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

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

变量名	类 型	静态	数组	备 注
任务总数量	整数型
线程数量	整数型

任务总数量 ＝ 到整数 (编辑框成功数量.内容)
已执行任务数量 ＝ 0
程_已执行线程数量 ＝ 0
线程数量 ＝ 到整数 (编辑框注册线程.内容)
判断循环首 (任务总数量 ＞ 已执行任务数量)
如果真 (线程数量 ＞ 程_已执行线程数量)
线程_启动 (&主程序, , )
进入许可区 (许可证1)
集_已执行线程数量 ＝ 集_已执行线程数量 ＋ 1
退出许可区 (许可证1)
程序_延时 (20, )
判断循环尾 ()
调试输出 (“当前任务已结束,请等待已投入线程执行完毕，已投入线程数量：” ＋ 到文本 (程_已执行线程数量))
判断循环首 (程_已执行线程数量 ＞ 0)
程序_延时 (200, )
判断循环尾 ()
信息框 (“任务完成！”, 0, , )

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

' 成功数量 ＝ 成功数量 ＋ 1‘成功数字应该由具体任务子程序的返回值决定
状态条1.置文本 (7, 到文本 (成功数量))
如果真 (释放手机号 (手机号))  ' 子程序释放手机号需要根据执行结果返回一个逻辑值，执行成功返回真，失败返回假
线程_进入许可区 (许可证2)
集_已执行任务数量 ＝ 集_已执行任务数量 ＋ 1
线程_退出许可区 (许可证2)
进入许可区 (许可证1)
集_已执行线程数量 ＝ 集_已执行线程数量 － 1
退出许可区 (许可证1)
自定义延迟 ()
返回 ()

子程序名	返回值类型	公开	备 注
自定义延迟

子程序名	返回值类型	公开	备 注
释放手机号	逻辑型

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

.版本 2<br /> .支持库 EThread<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 许可证1, 整数型<br /> .程序集变量 许可证2, 整数型<br /> .程序集变量 集_已执行线程数量, 整数型<br /> .程序集变量 集_已执行任务数量, 整数型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 许可证1 ＝ 创建进入许可证 ()<br /> 许可证2 ＝ 创建进入许可证 ()<br /> <br /> .子程序 多线程<br /> .局部变量 任务总数量, 整数型<br /> .局部变量 线程数量, 整数型<br /> <br /> 任务总数量 ＝ 到整数 (编辑框成功数量.内容)<br /> 已执行任务数量 ＝ 0<br /> 程_已执行线程数量 ＝ 0<br /> 线程数量 ＝ 到整数 (编辑框注册线程.内容)<br /> .判断循环首 (任务总数量 ＞ 已执行任务数量)<br />     .如果真 (线程数量 ＞ 程_已执行线程数量)<br />         线程_启动 (&主程序, , )<br />         进入许可区 (许可证1)<br />         集_已执行线程数量 ＝ 集_已执行线程数量 ＋ 1<br />         退出许可区 (许可证1)<br />     .如果真结束<br />     程序_延时 (20, )<br /> .判断循环尾 ()<br /> 调试输出 (“当前任务已结束,请等待已投入线程执行完毕，已投入线程数量：” ＋ 到文本 (程_已执行线程数量))<br /> .判断循环首 (程_已执行线程数量 ＞ 0)<br />     程序_延时 (200, )<br /> .判断循环尾 ()<br /> 信息框 (“任务完成！”, 0, , )<br /> <br /> .子程序 主程序<br /> <br /> ' 成功数量 ＝ 成功数量 ＋ 1‘成功数字应该由具体任务子程序的返回值决定<br /> 状态条1.置文本 (7, 到文本 (成功数量))<br /> .如果真 (释放手机号 (手机号))  ' 子程序释放手机号需要根据执行结果返回一个逻辑值，执行成功返回真，失败返回假<br />     线程_进入许可区 (许可证2)<br />     集_已执行任务数量 ＝ 集_已执行任务数量 ＋ 1<br />     线程_退出许可区 (许可证2)<br />     进入许可区 (许可证1)<br />     集_已执行线程数量 ＝ 集_已执行线程数量 － 1<br />     退出许可区 (许可证1)<br /> .如果真结束<br /> 自定义延迟 ()<br /> 返回 ()<br /> <br /> .子程序 自定义延迟<br /> <br /> <br /> <br /> .子程序 释放手机号, 逻辑型

小了白了兔

流程有问题
用于做判断条件的 <已执行任务数量>  需要由线程执行完毕  任务成功后  才可以进行累加

yangdonglin

花的嫁纱 发表于 2023-4-27 23:13
流程有问题
用于做判断条件的   需要由线程执行完毕  任务成功后  才可以进行累加
...

应该怎么写啊