多线程问题,我两个线程有时其中一个线程会不动,不知道是哪里的原因
请大佬解惑!!!代码如下
变量名 | 类 型 | 静态 | 数组 | 备 注 | 密码 | 文本型 | | | 手机号 | 文本型 | | | 发信返回 | 文本型 | | | 代理ip | 文本型 | | | 短xin | 文本型 | | | zc返回 | 文本型 | | | x | 整数型 | | | cookies | 文本型 | | | 答题结果 | 文本型 | | | 图片 | 文本型 | | | 交易密码 | 文本型 | | | 状态 | 逻辑型 | | | 验证码 | 文本型 | | | 索引 | 整数型 | | | 线程_初始化COM库 ()xkz. 进入 ()索引 = 超级列表框1. 插入表项 (, , , , , )xkz. 退出 ()判断 (选择框3.选中 = 真)ip (代理ip )判断 (选择框1.选中 = 真)密码 = 文本_取随机数字 (9 )密码 = 编辑框_密码.内容 获取手机号 (手机号 )xkz. 进入 ()超级列表框1. 置标题 (索引, 0, 到文本 (索引 + 1 )) 超级列表框1. 置标题 (索引, 1, 手机号 )超级列表框1. 置标题 (索引, 2, 密码 )超级列表框1. 置标题 (索引, 3, “正在zc”)xkz. 退出 ()图片框1.图片 = 网页_访问_对象 (“https://www.cwios.com/app/SecurityCode”, , , , cookies, , , , , , 代理ip, )打码答题 (答题结果 )图片 = 到大写 (答题结果 )调试输出 (图片 )发信返回 = 编码_URL解码 (到文本 (网页_访问_对象 (“https://www.cwios.com/app/SendMessageNew?piccode=” + 图片 + “&mobile=” + 手机号 + “&bl1=” + 文本_取随机数字 (4 ) + “&istype=123”, , , cookies, , #常量1, , , , , 代理ip, )), 真)调试输出 (发信返回 )如果 (寻找文本 (发信返回, “true”, , 假) ≠ -1 )xkz. 进入 ()超级列表框1. 置标题 (索引, 3, “发信成功”)xkz. 退出 ()xkz. 进入 ()超级列表框1. 置标题 (索引, 3, “该手机已zc”)xkz. 退出 ()返回 () x = 0 判断循环首 (状态 = 假)状态 = 短租_获取验证码并不再使用本号 (编辑框_接码账号.内容, token, 手机号, “zyd200519”, 验证码 )程序_延时 (3000 )判断 (状态 = 真)短xin = 截取验证码 (5, 验证码 )xkz. 进入 ()超级列表框1. 置标题 (索引, 3, 短xin )xkz. 退出 ()调试输出 (验证码 )x = x + 1 xkz. 进入 ()超级列表框1. 置标题 (索引, 3, “[第” + 到文本 (x ) + “次获取验证码]”)xkz. 退出 ()判断 (x > 10 )xkz. 进入 ()超级列表框1. 置标题 (索引, 3, “验证码获取超时!”)xkz. 退出 ()跳出循环 ()判断循环尾 ()
|