多线程操作超级列表框问题，请老师帮助一下

瘦身商城

我想要实现，每个线程不重复提取超级列表框里面的数据去操作，下面是演示代码

.版本 2
.支持库 iext
.支持库 spec
.支持库 EThread
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
.局部变量 i, 整数型
.局部变量 biao, 整数型
.计次循环首 (100, i)
    biao ＝ 超级列表框1.插入表项 (, , , , , )
    超级列表框1.置标题 (biao, 0, 到文本 (i))
.计次循环尾 ()
.子程序 子程序1
.参数 a, 整数型
.局部变量 i, 整数型
.计次循环首 (超级列表框1.取表项数 (), i)
    .如果真 (超级列表框1.取标题 (i － 1, 1) ＝ “” 或 超级列表框1.取标题 (i － 1, 1) ＝ “成功”)
        超级列表框1.置标题 (i － 1, 1, “成功”)
        调试输出 (“线程” ＋ 到文本 (a) ＋ “||操作第几个表项” ＋ 到文本 (i － 1))
        延迟 (1000)
        处理事件 ()
    .如果真结束
.计次循环尾 ()
.子程序 _按钮1_被单击
.局部变量 i, 整数型
.计次循环首 (10, i)
    启动线程 (&子程序1, i, )
    延迟 (500)
    处理事件 ()
.计次循环尾 ()

瘦身商城

别沉啊啊啊啊啊啊啊啊啊啊啊啊啊啊啊啊啊

本文章来自：精易论坛(http://www.3600gz.cn/thread-13624782-1-1.html）请保留此链接, 感谢!

瘦身商城

别沉啊啊啊啊啊啊啊啊啊啊啊啊啊啊啊啊啊

瘦身商城

为什么没有人帮我啊

瘦身商城

3楼代码是我刚改的，这样输出后很多线程都操作同一个表项，怎么能弄每个线程都不操作同一个表项呢
* “线程6||操作第几个表项73”
* “线程1||操作第几个表项72”
* “线程2||操作第几个表项73”
* “线程2||操作第几个表项74”
* “线程3||操作第几个表项74”
* “线程1||操作第几个表项74”
* “线程5||操作第几个表项75”
* “线程6||操作第几个表项75”
* “线程4||操作第几个表项76”
* “线程5||操作第几个表项77”
* “线程6||操作第几个表项77”
* “线程3||操作第几个表项77”
* “线程1||操作第几个表项77”
* “线程2||操作第几个表项78”
* “线程4||操作第几个表项79”
* “线程1||操作第几个表项80”
* “线程6||操作第几个表项80”
* “线程5||操作第几个表项80”
* “线程3||操作第几个表项81”
* “线程4||操作第几个表项82”
* “线程3||操作第几个表项82”
* “线程2||操作第几个表项83”
* “线程5||操作第几个表项83”
* “线程1||操作第几个表项83”
* “线程6||操作第几个表项83”
* “线程1||操作第几个表项84”
* “线程5||操作第几个表项84”
* “线程2||操作第几个表项84”
* “线程6||操作第几个表项84”
* “线程3||操作第几个表项85”
* “线程4||操作第几个表项85”
* “线程7||操作第几个表项86”
* “线程7||操作第几个表项87”
* “线程4||操作第几个表项87”
* “线程3||操作第几个表项88”
* “线程6||操作第几个表项88”
* “线程5||操作第几个表项88”
* “线程1||操作第几个表项88”
* “线程2||操作第几个表项88”
* “线程6||操作第几个表项89”
* “线程1||操作第几个表项89”
* “线程5||操作第几个表项89”
* “线程2||操作第几个表项89”
* “线程3||操作第几个表项89”
* “线程7||操作第几个表项90”
* “线程4||操作第几个表项90”
* “线程4||操作第几个表项91”
* “线程7||操作第几个表项91”
* “线程1||操作第几个表项91”
* “线程3||操作第几个表项92”
* “线程5||操作第几个表项92”
* “线程6||操作第几个表项92”
* “线程2||操作第几个表项92”
* “线程5||操作第几个表项93”
* “线程6||操作第几个表项93”
* “线程3||操作第几个表项93”
* “线程3||操作第几个表项93”
* “线程1||操作第几个表项94”
* “线程7||操作第几个表项94”
* “线程4||操作第几个表项94”

瘦身商城

.版本 2
.支持库 iext
.支持库 spec
.支持库 EThread

.程序集 窗口程序集1

.子程序 __启动窗口_创建完毕
.局部变量 i, 整数型
.局部变量 biao, 整数型

.计次循环首 (100, i)
    biao ＝ 超级列表框1.插入表项 (, , , , , )
    超级列表框1.置标题 (biao, 0, 到文本 (i))
.计次循环尾 ()

.子程序 子程序1
.参数 a, 整数型
.局部变量 i, 整数型

.计次循环首 (超级列表框1.取表项数 (), i)
    .如果真 (超级列表框1.取标题 (i － 1, 1) ＝ “”)
        超级列表框1.置标题 (i － 1, 1, “成功” ＋ 到文本 (i))
        调试输出 (“线程” ＋ 到文本 (a) ＋ “||操作第几个表项” ＋ 到文本 (i － 1))
        延迟 (50)
        处理事件 ()
    .如果真结束

.计次循环尾 ()

.子程序 _按钮1_被单击
.局部变量 i, 整数型

.计次循环首 (10, i)
    启动线程 (&子程序1, i, )
    延迟 (500)
    处理事件 ()
.计次循环尾 ()

瘦身商城

源码弄错了，.如果真 (超级列表框1.取标题 (i － 1, 1) ＝ “” 或 超级列表框1.取标题 (i － 1, 1) <> “成功”)