多线程里计次循环首（100+，i）有时候会数组成员引用下标超出定义范围

BigBoss007

多线程里计次循环首（100+，i）有时候会数组成员引用下标超出定义范围

如果线程数量不多，计次小于50就不会出现这种情况，我试过执行2个线程，每个线程200次循环，没问题，然后执行3个线程，每个线程循环200次就出错了！

这种怎么解决啊？？？？？？？？？？？？？？？？？？？？？？？？？？？？？？？


补充内容 (2016-12-7 14:34):
源码在楼下

补充内容 (2016-12-7 14:58):
已自行解决，不是线程问题

BigBoss007

  

Sta ＝ “http://qun.qzone.qq.com/cgi-bin/ ... roupPortal&uin=” ＋ Username ＋ “&g_tk=” ＋ G_tk (skey) ＋ “&ua=Mozilla%2F5.0%20(compatible%3B%20MSIE%2010.0%3B%20Windows%20NT%206.2%3B%20Trident%2F6.0)”
POST.Initialization (真)
POST.Open (Sta)
POST.SetRequestHeader (“Cookie”, cookie)
POST.Send ()
Ret ＝ 编码_URL解码 (到文本 (POST.ResponseBody ()), 真)
文本_取中间_批量 (Ret, “groupid” ＋ #引号 ＋ “:”, “,”, QQ群号)
文本_取中间_批量 (Ret, “groupname” ＋ #引号 ＋ “:” ＋ #引号, #引号, QQ群名称)
计次循环首 (取数组成员数 (QQ群号), qqq)
Sta ＝ “http://qiandao.qun.qq.com/cgi-bin/sign”
POST.Initialization (真)
POST.Open (Sta, 真)
POST.SetRequestHeader (“Connection”, “keep-alive”)
POST.SetRequestHeader (“Accept-Language”, “zh-CN”)
' POST.SetRequestHeader (“Content-Type”, “application/xml”)
POST.SetRequestHeader (“Origin”, “http://qiandao.qun.qq.com”)
POST.SetRequestHeader (“Referer”, “http://qiandao.qun.qq.com/index.html?groupUin=” ＋ QQ群号 [qqq] ＋ “&appID=100729587”)
POST.SetRequestHeader (“User-Agent”, “Mozilla/5.0 (Windows NT 6.2; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/29.0.1547.59 QQ/8.6.18804.201 Safari/537.36”)
POST.SetRequestHeader (“Accept-Language”, “en-us,en”)
POST.SetRequestHeader (“Cookie”, “confirmuin=0; ” ＋ cookie)
POST.Send (到字节集 (“&gc=” ＋ QQ群号 [qqq] ＋ “&is_sign=1&bkn=” ＋ bkn加密 (skey) ＋ “&poi=”))
Ret ＝ 到文本 (POST.ResponseBody ())
签到返回 ＝ 文本_取出中间文本 (Ret, “is_sign” ＋ #引号 ＋ “:”, “,”)
如果真 (签到返回 ＝ “0” 或 签到返回 ＝ “”)
Sta ＝ “http://qiandao.qun.qq.com/cgi-bin/sign”
POST.Initialization (真)
POST.Open (Sta, 真)
POST.SetRequestHeader (“Referer”, “http://qiandao.qun.qq.com/index.html?groupUin=” ＋ QQ群号 [qqq] ＋ “&appID=100729587”)
POST.SetRequestHeader (“Cookie”, cookie)
POST.Send (到字节集 (“gc=” ＋ QQ群号 [qqq] ＋ “&is_sign=0&from=1&bkn=” ＋ bkn加密 (skey)))
Ret ＝ 到文本 (POST.ResponseBody ())
Sta ＝ 文本_取出中间文本 (Ret, “is_sign” ＋ #引号 ＋ “:”, “,”)
进入许可区 (许可证)
如果真 (Sta ＝ “1”)
超编框加文本 (4, “[” ＋ Username ＋ “]【QQ群签到：” ＋ QQ群名称 [qqq] ＋ “】签到成功！”)
如果真 (Sta ＝ “0” 或 Sta ＝ “”)
超编框加文本 (1, “[” ＋ Username ＋ “]【QQ群签到：” ＋ QQ群名称 [qqq] ＋ “】签到失败！”)
退出许可区 (许可证)
如果真 (签到返回 ＝ “1”)
进入许可区 (许可证)
超编框加文本 (1, “[” ＋ Username ＋ “]【QQ群签到：” ＋ QQ群名称 [qqq] ＋ “】今天签到过了！”)
退出许可区 (许可证)

计次循环尾 ()
如果真 (取数组成员数 (QQ群号) ＝ 0)
进入许可区 (许可证)
超编框加文本 (1, “[” ＋ Username ＋ “]【QQ群签到】你还没有加入任何群！”)
退出许可区 (许可证)

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

.版本 2<br /> .支持库 EThread<br /> <br /> Sta ＝ “<a href="http://qun.qzone.qq.com/cgi-bin/get_group_list?groupcount=4&count=4&callbackFun=_GetGroupPortal&uin=" rel="nofollow" rel="nofollow" target="_blank">http://qun.qzone.qq.com/cgi-bin/ ... roupPortal&uin=</a>” ＋ Username ＋ “&g_tk=” ＋ G_tk (skey) ＋ “&ua=Mozilla%2F5.0%20(compatible%3B%20MSIE%2010.0%3B%20Windows%20NT%206.2%3B%20Trident%2F6.0)”<br /> POST.Initialization (真)<br /> POST.Open (Sta)<br /> POST.SetRequestHeader (“Cookie”, cookie)<br /> POST.Send ()<br /> Ret ＝ 编码_URL解码 (到文本 (POST.ResponseBody ()), 真)<br /> 文本_取中间_批量 (Ret, “groupid” ＋ #引号 ＋ “:”, “,”, QQ群号)<br /> 文本_取中间_批量 (Ret, “groupname” ＋ #引号 ＋ “:” ＋ #引号, #引号, QQ群名称)<br /> .计次循环首 (取数组成员数 (QQ群号), qqq)<br />     Sta ＝ “<a href="http://qiandao.qun.qq.com/cgi-bin/sign" rel="nofollow" rel="nofollow" rel="nofollow" rel="nofollow" target="_blank">http://qiandao.qun.qq.com/cgi-bin/sign</a>”<br />     POST.Initialization (真)<br />     POST.Open (Sta, 真)<br />     POST.SetRequestHeader (“Connection”, “keep-alive”)<br />     POST.SetRequestHeader (“Accept-Language”, “zh-CN”)<br />     ' POST.SetRequestHeader (“Content-Type”, “application/xml”)<br />     POST.SetRequestHeader (“Origin”, “<a href="http://qiandao.qun.qq.com" rel="nofollow" rel="nofollow" target="_blank">http://qiandao.qun.qq.com</a>”)<br />     POST.SetRequestHeader (“Referer”, “<a href="http://qiandao.qun.qq.com/index.html?groupUin=" rel="nofollow" rel="nofollow" rel="nofollow" rel="nofollow" target="_blank">http://qiandao.qun.qq.com/index.html?groupUin=</a>” ＋ QQ群号 [qqq] ＋ “&appID=100729587”)<br />     POST.SetRequestHeader (“User-Agent”, “Mozilla/5.0 (Windows NT 6.2; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/29.0.1547.59 QQ/8.6.18804.201 Safari/537.36”)<br />     POST.SetRequestHeader (“Accept-Language”, “en-us,en”)<br /> <br />     POST.SetRequestHeader (“Cookie”, “confirmuin=0; ” ＋ cookie)<br />     POST.Send (到字节集 (“&gc=” ＋ QQ群号 [qqq] ＋ “&is_sign=1&bkn=” ＋ bkn加密 (skey) ＋ “&poi=”))<br />     Ret ＝ 到文本 (POST.ResponseBody ())<br />     签到返回 ＝ 文本_取出中间文本 (Ret, “is_sign” ＋ #引号 ＋ “:”, “,”)<br />     .如果真 (签到返回 ＝ “0” 或 签到返回 ＝ “”)<br />         Sta ＝ “<a href="http://qiandao.qun.qq.com/cgi-bin/sign" rel="nofollow" rel="nofollow" rel="nofollow" rel="nofollow" target="_blank">http://qiandao.qun.qq.com/cgi-bin/sign</a>”<br />         POST.Initialization (真)<br />         POST.Open (Sta, 真)<br />         POST.SetRequestHeader (“Referer”, “<a href="http://qiandao.qun.qq.com/index.html?groupUin=" rel="nofollow" rel="nofollow" rel="nofollow" rel="nofollow" target="_blank">http://qiandao.qun.qq.com/index.html?groupUin=</a>” ＋ QQ群号 [qqq] ＋ “&appID=100729587”)<br />         POST.SetRequestHeader (“Cookie”, cookie)<br />         POST.Send (到字节集 (“gc=” ＋ QQ群号 [qqq] ＋ “&is_sign=0&from=1&bkn=” ＋ bkn加密 (skey)))<br />         Ret ＝ 到文本 (POST.ResponseBody ())<br />         Sta ＝ 文本_取出中间文本 (Ret, “is_sign” ＋ #引号 ＋ “:”, “,”)<br />         进入许可区 (许可证)<br />         .如果真 (Sta ＝ “1”)<br />             超编框加文本 (4, “[” ＋ Username ＋ “]【QQ群签到：” ＋ QQ群名称 [qqq] ＋ “】签到成功！”)<br />         .如果真结束<br />         .如果真 (Sta ＝ “0” 或 Sta ＝ “”)<br />             超编框加文本 (1, “[” ＋ Username ＋ “]【QQ群签到：” ＋ QQ群名称 [qqq] ＋ “】签到失败！”)<br />         .如果真结束<br />         退出许可区 (许可证)<br />     .如果真结束<br />     .如果真 (签到返回 ＝ “1”)<br />         进入许可区 (许可证)<br />         超编框加文本 (1, “[” ＋ Username ＋ “]【QQ群签到：” ＋ QQ群名称 [qqq] ＋ “】今天签到过了！”)<br />         退出许可区 (许可证)<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> .如果真 (取数组成员数 (QQ群号) ＝ 0)<br />     进入许可区 (许可证)<br />     超编框加文本 (1, “[” ＋ Username ＋ “]【QQ群签到】你还没有加入任何群！”)<br />     退出许可区 (许可证)

C。

200除3除不断

冯古屋

你最好把源码贴出来看看，听你说看上去都是对的

小明无敌

加许可证了吗            

BigBoss007

小明无敌 发表于 2016-12-7 14:24
加许可证了吗

加了啊...............

幻月工作室

我记得易语言报错下标越界的时候好像有个提示，是哪个变量越界还是哪行来着，根据提示信息去找原因，个人觉得和线程关系不大，有可能是某个函数内部越界导致，因为我看易语言写的软件经常会出现下标越界的情况

小明无敌

天哥软件 发表于 2016-12-7 14:31
加了啊...............

看你讲的 。。看不懂。。

BigBoss007

已自行解决，不是线程问题