多线程操作只执行最后一个线程，前面都都不执行

woshidengchao

  

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

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

判断 (按钮1.标题 ＝ “抢购中”)
按钮1.标题 ＝ “开始抢购”
按钮2.禁止 ＝ 假
判断 (按钮1.标题 ＝ “开始抢购”)
按钮1.标题 ＝ “抢购中”
按钮2.禁止 ＝ 真
计次循环首 (超级列表框_时藏ntf.取表项数 (), ss)
判断 (超级列表框_时藏ntf.取标题 (ss － 1, 3) ≠ “”)
超级列表框_时藏ntf.置标题 (ss － 1, 0, “1”)
tbs ＝ ss － 1
启动线程 (&xc, 创建进入许可证 (), Qjb)
延时 (30)




ss ＝ ss ＋ 1
计次循环尾 ()

子程序名	返回值类型	公开	备 注
xc
参数名	类 型	参考	可空	数组	备 注
许可证	整数型

变量名	类 型	静态	数组	备 注
xcjb	整数型
xcss	整数型
xcphonemb	文本型
xcck	文本型
xcmegs	文本型
xcserid	文本型
xcbody	文本型
xcys	文本型
局_网址	文本型
协议头	文本型
json	类_json

xcys ＝ 编辑框2.内容
xcbody ＝ 编辑框1.内容
xcss ＝ tbs
xcjb ＝ Qjb
协议头 ＝ #HEADER_COMMON2
进入许可区 (许可证)
xcphonemb ＝ 超级列表框_时藏ntf.取标题 (xcss, 1)
xcck ＝ 超级列表框_时藏ntf.取标题 (xcss, 2)
' xcmegs ＝ 超级列表框_时藏ntf.取标题 (xcss, 3)
xcserid ＝ 超级列表框_时藏ntf.取标题 (xcss, 4)
判断循环首 (按钮1.标题 ＝ “抢购中”)
局_网址 ＝ “https://collection.chinaso.com/collection-app/order/create”
json.解析 (编码_utf8到gb2312 (到文本 (网页_访问_对象 (局_网址, 1, xcbody, xcck, , 子文本替换 (协议头, “[商品ID]”, json.取属性 (“productId”).取数据文本 (), , , 真), , , , , , , , , , , 真, , ))))
超级列表框_时藏ntf.置标题 (xcss, 3, 时间_时间戳转文本 (时间_取现行时间戳 ()) ＋ “:” ＋ 取文本右边 (时间_取现行时间戳 (), 3) ＋ “>” ＋ “status：” ＋ json.取属性 (“status”).取数据文本 () ＋ “|msg：” ＋ json.取通用属性 (“msg”))
延时 (到整数 (xcys))
处理事件 ()
判断循环尾 ()
线程_挂起 (xcjb)
线程_销毁 (xcjb)
退出许可区 (许可证)

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

.版本 2<br /> .支持库 iext<br /> .支持库 EThread<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 ss, 整数型<br /> <br /> <br /> .判断开始 (按钮1.标题 ＝ “抢购中”)<br />     按钮1.标题 ＝ “开始抢购”<br />     按钮2.禁止 ＝ 假<br /> .判断 (按钮1.标题 ＝ “开始抢购”)<br />     按钮1.标题 ＝ “抢购中”<br />     按钮2.禁止 ＝ 真<br />     .计次循环首 (超级列表框_时藏ntf.取表项数 (), ss)<br />         .判断开始 (超级列表框_时藏ntf.取标题 (ss － 1, 3) ≠ “”)<br />             超级列表框_时藏ntf.置标题 (ss － 1, 0, “1”)<br /> <br />             tbs ＝ ss － 1<br />             启动线程 (&xc, 创建进入许可证 (), Qjb)<br /> <br /> <br />             延时 (30)<br /> <br />         .默认<br /> <br />         .判断结束<br /> <br /> <br />         ss ＝ ss ＋ 1<br /> <br />     .计次循环尾 ()<br /> <br /> <br /> <br /> .默认<br /> <br /> .判断结束<br /> <br /> <br /> <br /> <br /> <br /> .子程序 xc<br /> .参数 许可证, 整数型<br /> .局部变量 xcjb, 整数型<br /> .局部变量 xcss, 整数型<br /> .局部变量 xcphonemb, 文本型<br /> .局部变量 xcck, 文本型<br /> .局部变量 xcmegs, 文本型<br /> .局部变量 xcserid, 文本型<br /> .局部变量 xcbody, 文本型<br /> .局部变量 xcys, 文本型<br /> .局部变量 局_网址, 文本型<br /> .局部变量 协议头, 文本型<br /> .局部变量 json, 类_json<br /> <br /> <br /> <br /> xcys ＝ 编辑框2.内容<br /> xcbody ＝ 编辑框1.内容<br /> xcss ＝ tbs<br /> xcjb ＝ Qjb<br /> 协议头 ＝ #HEADER_COMMON2<br /> 进入许可区 (许可证)<br /> xcphonemb ＝ 超级列表框_时藏ntf.取标题 (xcss, 1)<br /> xcck ＝ 超级列表框_时藏ntf.取标题 (xcss, 2)<br /> ' xcmegs ＝ 超级列表框_时藏ntf.取标题 (xcss, 3)<br /> xcserid ＝ 超级列表框_时藏ntf.取标题 (xcss, 4)<br /> <br /> .判断循环首 (按钮1.标题 ＝ “抢购中”)<br />     局_网址 ＝ “https://collection.chinaso.com/collection-app/order/create”<br />     json.解析 (编码_utf8到gb2312 (到文本 (网页_访问_对象 (局_网址, 1, xcbody, xcck, , 子文本替换 (协议头, “[商品ID]”, json.取属性 (“productId”).取数据文本 (), , , 真), , , , , , , , , , , 真, , ))))<br /> <br />     超级列表框_时藏ntf.置标题 (xcss, 3, 时间_时间戳转文本 (时间_取现行时间戳 ()) ＋ “:” ＋ 取文本右边 (时间_取现行时间戳 (), 3) ＋ “>” ＋ “status：” ＋ json.取属性 (“status”).取数据文本 () ＋ “|msg：” ＋ json.取通用属性 (“msg”))<br /> <br /> <br />     延时 (到整数 (xcys))<br /> <br />     处理事件 ()<br /> .判断循环尾 ()<br /> <br /> 线程_挂起 (xcjb)<br /> 线程_销毁 (xcjb)<br /> <br /> <br /> 退出许可区 (许可证)

291367048

你这个超级列表框的 任务数 一多 就会堆栈溢出, 多线程不是这样用的,首先多线程尽量不要操作界面上的控件,把所需要的内容可以保存到全局变量中,再利用 线程启动传进去一个整数型的变量 用于读取全局变量数据

白天很傻很天真

别的不知道  你这个许可证用的 只能单线程执行

qck易语言

你这个不是哪里改改的问题，纯粹是靠想象写的程序么，得下载个多线程例子，完全重构

一C

一步步调试，有时候位置不对就出现这问题

小方叻

多线程并发 你可以试试把许可证去掉再看看。。

山行

多线程例子

XZ6

  

启动线程 (&xc, ss － 1, )  ' 子线程用一个参数去接受列表框的下标，也就是你写的许可证变量

启动线程 (&xc, ss － 1, )  ' 子线程用一个参数去接受列表框的下标，也就是你写的许可证变量