|
沙发
发表于 2013-1-18 15:59:04
|
只看该作者
广东省佛山市
两条线程和十条线程不同.没有处理多线程冲突问题.
多线程.rar
(1.7 KB, 下载次数: 6)
[e]
.版本 2
.支持库 iext
第一线次数 = 取整 (超级列表框1.取表项数 () ÷ 2)
第二线次数 = 超级列表框1.取表项数 () - 第一线次数
.如果 (第几线 = 1)
.计次循环首 (第一线次数, i)
超级列表框1.置标题 (i - 1, 1, “正在计算”)
超级列表框1.置标题 (i - 1, 2, 到文本 (句柄1))
延时 (2000)
超级列表框1.置标题 (i - 1, 1, “计算完成”)
.如果真 (停止)
返回 ()
.如果真结束
.计次循环尾 ()
.否则
.计次循环首 (第二线次数, i)
超级列表框1.置标题 (第一线次数 + i - 1, 1, “正在计算”)
超级列表框1.置标题 (第一线次数 + i - 1, 2, 到文本 (句柄2))
延时 (2000)
超级列表框1.置标题 (第一线次数 + i - 1, 1, “计算完成”)
.如果真 (停止)
返回 ()
.如果真结束
.计次循环尾 ()
[/e] |
|