我理解的多多线程，是这样吗？

黑暗二次元

  

判断循环首 (总执行数 ＜ 超级列表框1.取表项数 ())
判断循环首 (线程数 ＜ 到数值 (编辑框_线程数.内容))
线程数 ＝ 线程数 ＋ 1
J_线程_许可证 ＝ 创建进入许可证 ()
进入许可区 (J_线程_许可证)
启动线程 (&子程序_开始, i, j_线程句柄)
判断循环尾 ()
判断循环尾 ()

子程序名	返回值类型	公开	备 注
子程序_开始
参数名	类 型	参考	可空	数组	备 注
i	整数型

变量名	类 型	静态	数组	备 注
str	文本型
o	整数型

如果 (寻找文本 (编码_utf8到gb2312 (str), “zc成功”, , 假) ≠ -1)
超级列表框1.置标题 (i － 1, 4, “成功”)
超级列表框1.置标题 (i － 1, 4, “失败”)

线程数 ＝ 线程数 － 1
退出许可区 (J_线程_许可证)
删除进入许可证 (J_线程_许可证)
关闭线程句柄 (j_线程句柄)

i支持库列表	支持库注释
iext	扩展界面支持库一
EThread	多线程支持库

.版本 2<br /> .支持库 iext<br /> .支持库 EThread<br /> <br /> .判断循环首 (总执行数 ＜ 超级列表框1.取表项数 ())<br /> <br /> <br />     .判断循环首 (线程数 ＜ 到数值 (编辑框_线程数.内容))<br />         线程数 ＝ 线程数 ＋ 1<br />         J_线程_许可证 ＝ 创建进入许可证 ()<br />         进入许可区 (J_线程_许可证)<br />         启动线程 (&子程序_开始, i, j_线程句柄)<br />     .判断循环尾 ()<br /> <br /> <br /> .判断循环尾 ()<br /> .版本 2<br /> .支持库 EThread<br /> <br /> <br /> .版本 2<br /> .支持库 iext<br /> .支持库 EThread<br /> <br /> .子程序 子程序_开始<br /> .参数 i, 整数型<br /> .局部变量 str, 文本型<br /> .局部变量 o, 整数型<br /> <br /> .如果 (寻找文本 (编码_utf8到gb2312 (str), “zc成功”, , 假) ≠ -1)<br />     超级列表框1.置标题 (i － 1, 4, “成功”)<br /> .否则<br />     超级列表框1.置标题 (i － 1, 4, “失败”)<br /> .如果结束<br /> <br /> 线程数 ＝ 线程数 － 1<br /> 退出许可区 (J_线程_许可证)<br /> 删除进入许可证 (J_线程_许可证)<br /> 关闭线程句柄 (j_线程句柄)

阿杰大大

不是,你补充一下许可证的概念,许可证存在的意义是为了防止共同资源冲突强占造成的异常.你这代码的i就是共同资源.程序集,全局,文件等一系列共同的都属于共同资源.

神女软件定制

不是

黑暗二次元

  

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

线程数 ＝ 0
判断循环首 (总执行数 ＜ 超级列表框1.取表项数 ())
判断循环首 (线程数 ＜ 到数值 (编辑框_线程数.内容))
线程数 ＝ 线程数 ＋ 1
J_线程_许可证 ＝ 创建进入许可证 ()
进入许可区 (J_线程_许可证)
启动线程 (&子程序_开始, , j_线程句柄)
判断循环尾 ()
判断循环尾 ()

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

变量名	类 型	静态	数组	备 注
str	文本型
o	整数型

i ＝ i ＋ 1
如果 (i ＜ 超级列表框1.取表项数 ())
str ＝ 到文本 (网页_访问_对象 (“https://www.bqg.噜阿噜/MemberAction.php”, 1, “action=register&username=” ＋ J_账户 [i] ＋ “&password=” ＋ J_密码 [i] ＋ “&email=” ＋ J_邮箱 [i] ＋ “%40qq.com”, , , , , , , , , , , , , , , , ))
如果 (寻找文本 (编码_utf8到gb2312 (str), “zc成功”, , 假) ≠ -1)
超级列表框1.置标题 (i － 1, 4, “成功”)
超级列表框1.置标题 (i － 1, 4, “失败”)

退出许可区 (J_线程_许可证)
删除进入许可证 (J_线程_许可证)
关闭线程句柄 (j_线程句柄)
线程数 ＝ 线程数 － 1
返回 ()

i支持库列表	支持库注释
iext	扩展界面支持库一
EThread	多线程支持库

.版本 2<br /> .支持库 iext<br /> .支持库 EThread<br /> <br /> .子程序 子程序_线程<br /> <br /> 线程数 ＝ 0<br /> .判断循环首 (总执行数 ＜ 超级列表框1.取表项数 ())<br /> <br />     .判断循环首 (线程数 ＜ 到数值 (编辑框_线程数.内容))<br />         线程数 ＝ 线程数 ＋ 1<br />         J_线程_许可证 ＝ 创建进入许可证 ()<br />         进入许可区 (J_线程_许可证)<br />         启动线程 (&子程序_开始, , j_线程句柄)<br />     .判断循环尾 ()<br /> <br /> .判断循环尾 ()<br /> <br /> <br /> .子程序 子程序_开始<br /> .局部变量 str, 文本型<br /> .局部变量 o, 整数型<br /> <br /> i ＝ i ＋ 1<br /> .如果 (i ＜ 超级列表框1.取表项数 ())<br />     str ＝ 到文本 (网页_访问_对象 (“https://www.bqg.噜阿噜/MemberAction.php”, 1, “action=register&username=” ＋ J_账户 <i> ＋ “&password=” ＋ J_密码 <i> ＋ “&email=” ＋ J_邮箱 <i> ＋ “%40qq.com”, , , , , , , , , , , , , , , , ))<br />     .如果 (寻找文本 (编码_utf8到gb2312 (str), “zc成功”, , 假) ≠ -1)<br />         超级列表框1.置标题 (i － 1, 4, “成功”)<br />     .否则<br />         超级列表框1.置标题 (i － 1, 4, “失败”)<br />     .如果结束<br /> <br />     退出许可区 (J_线程_许可证)<br />     删除进入许可证 (J_线程_许可证)<br />     关闭线程句柄 (j_线程句柄)<br />     线程数 ＝ 线程数 － 1<br /> .否则<br />     返回 ()

黑暗二次元

神一样的女人 发表于 2021-11-11 01:03
不是

呃呃呃呃呃呃呃呃呃呃呃呃呃

afd

好好看教程 听讲解把 你这错的太多了  许可区只能在线程里面用,要不然会卡死,还有其他代码错的太多了

53770zhang

我一般是找一个比较好用的 把代码子程序改成自己的

AnyPopup

进入许可区/退出许可区,这俩一般都是放到组件前后，或有写入冲突变量的前后

  

进入许可区（）
编辑框1.加入文本（“123”）
退出许可区（）

进入许可区（）<br /> 编辑框1.加入文本（“123”）<br /> 退出许可区（）

或是

  

进入许可区（）
全局_变量1=123
程序集_变量1=456
退出许可区（）

进入许可区（）<br /> 全局_变量1=123<br /> 程序集_变量1=456<br /> 退出许可区（）

这东西能少用就少用，太影响效率了

SoloCat

不是

jy896009

那你就理解错了