怎么在计次循环内加入暂停？

29499531

没地方上传,请看源码
窗体控件有:超级列表框1,编辑框1,按钮1,按钮2,按钮3

1. .版本 2
   
2. .支持库 iext
   
3. 
   
4. .程序集 窗口程序集1
   
5. .程序集变量 当前行_记录, 整数型
   
6. .程序集变量 当前行, 整数型
   
7. 
   
8. .子程序 __启动窗口_创建完毕
   
9. 
   
10. 当前行_记录 ＝ 0
    
11. 
    
12. 
    
13. .子程序 _按钮1_被单击, , , 开始按钮
    
14. 
    
15. 当前行 ＝ 当前行_记录
    
16. 编辑框1.内容 ＝ “”  ' 为了让暂停效果明显些,加了这行代码
    
17. .判断循环首 (当前行 ≥ 0 且 当前行 ＜ 超级列表框1.取表项数 ())
    
18.     编辑框1.加入文本 (超级列表框1.取标题 (当前行, 0) ＋ “,” ＋ 超级列表框1.取标题 (当前行, 1) ＋ “,” ＋ 超级列表框1.取标题 (当前行, 2) ＋ #换行符)
    
19.     当前行 ＝ 当前行 ＋ 1
    
20.     处理事件 ()
    
21. .判断循环尾 ()
    
22. 
    
23. .子程序 _按钮2_被单击, , , 超级列表生成数据
    
24. .局部变量 i, 整数型
    
25. 
    
26. 
    
27. .计次循环首 (10000, i)
    
28.     超级列表框1.插入表项 (, , , , , )
    
29.     超级列表框1.置标题 (i － 1, 0, 到文本 (i))
    
30.     超级列表框1.置标题 (i － 1, 1, 到文本 (取随机数 (100, 1000)))
    
31.     超级列表框1.置标题 (i － 1, 2, 到文本 (取随机数 (1000, 10000)))
    
32.     处理事件 ()
    
33. .计次循环尾 ()
    
34. 
    
35. .子程序 _按钮3_被单击, , , 暂停按钮
    
36. 
    
37. 当前行_记录 ＝ 当前行
    
38. 当前行 ＝ -2
    

复制代码

王牌

29499531 发表于 2011-12-21 09:52
没地方上传,请看源码
窗体控件有:超级列表框1,编辑框1,按钮1,按钮2,按钮3

没看懂，不好意思啊，等你

yjd

用变量循环.循环里弄一个标记.成立就跳出来.此时记录下变量循环的变量..再点开始从新把这个值传给变量循环.

29499531

王牌 发表于 2012-1-5 01:31
没看懂，不好意思啊，等你

把源码复制进去，窗体中加入超级列表框1,编辑框1,按钮1,按钮2,按钮3

attracting

很简单，希望 采纳，你把计次循环里面加一个变量，

1. .版本 2
   
2. .支持库 spec
   
3. 
   
4. .子程序 _按钮1_被单击
   
5. .局部变量 是否暂停, 文本型
   
6. 
   
7. .计次循环首 (88, )
   
8.     .判断循环首 (是否暂停 ＝ “是”)  ' 这个你可以放在另一个按钮里控制这个变量，改变这个变量就可以让他不动了
   
9.         延迟 (1000)
   
10.     .判断循环尾 ()
    
11. 
    
12. .计次循环尾 ()
    

复制代码

attracting

谢谢采纳{:3_229:}

forkh

建议楼主还是用线程，简单实用

亦惜风流

{:soso_e127:}  我是用了 按钮点击  暂停  直接窗口关闭了{:3_227:}

Sea·Jelly

我是来看楼上的 真心给力啊哦

吃猫的小鱼

记录循环次数，二次循环判断一下，然后计次从被记录的循环次数开始，这样也许行