搜索
编程论坛
→
开发语言
→
『 VB6论坛 』
→ For 循环速度问题
标题:
For 循环速度问题
只看楼主
zhuiis
等 级:
业余侠客
威 望:
1
帖 子:201
专家分:286
注 册:2008-11-8
结帖率:
82.14%
楼主
已结贴
√
问题点数:20 回复次数:7
For 循环速度问题
请问,程序执行的速度能加速吗?
如:
For i=1 to 50000
Richtxtbox1.txt="A" & I
next i
以上循环需要近十分钟才能结束,
问题2,以其未结束时,要如何终止循环?
搜索更多相关主题的帖子:
For
速度
2010-10-04 09:13
ta8607
等 级:
业余侠客
帖 子:377
专家分:244
注 册:2007-9-22
第
2
楼
得分:5
exit for
不理会流言蜚语,努力做好份内事情,只做自己.
2010-10-04 09:57
zhuiis
等 级:
业余侠客
威 望:
1
帖 子:201
专家分:286
注 册:2008-11-8
第
3
楼
得分:0
回复 2楼 ta8607
谢谢,我怎么忘了这么简单终止!
2010-10-04 11:02
不说也罢
等 级:
贵宾
威 望:
39
帖 子:1481
专家分:4989
注 册:2007-10-7
第
4
楼
得分:5
回复 楼主 zhuiis
For i=1 to 50000
Richtxtbox1.txt="A" & I
next i
以上循环需要近十分钟才能结束??? 不会要十分钟吧
===================================================
讨厌C#的行尾的小尾巴;和一对大括号{ }
===================================================
2010-10-04 12:54
zhuiis
等 级:
业余侠客
威 望:
1
帖 子:201
专家分:286
注 册:2008-11-8
第
5
楼
得分:0
Richtxtbox1.txt="A" & I
可能是这里赋值有问题,实际是这样写的
Richtxtbox1.txt=Richtxtbox1.txt & "A" & I & Vbcrlf
2010-10-04 15:57
jiashie
等 级:
贵宾
威 望:
10
帖 子:237
专家分:999
注 册:2009-4-30
第
6
楼
得分:5
dim iLen as long
ilen= len(richTextBox1.Text)
for i = 0 to 50000
ilen= ilen + len("A" & i & vbCrlf)
richTextBox1.selStart= iLen
richTextBox.SelText="A" & i & vbCrlf
'doevents
next
2010-10-06 11:33
zhuiis
等 级:
业余侠客
威 望:
1
帖 子:201
专家分:286
注 册:2008-11-8
第
7
楼
得分:0
回复 6楼 jiashie
'dim iLen as long
'ilen= len(richTextBox1.Text)
for i = 0 to 50000
'ilen= ilen + len("A" & i & vbCrlf)
'richTextBox1.selStart= iLen
richTextBox.SelText="A" & i & vbCrlf
'doevents
next
2010-10-06 14:36
风吹过b
等 级:
贵宾
威 望:
364
帖 子:4912
专家分:29900
注 册:2008-10-15
第
8
楼
得分:5
For i=1 to 50000
Richtxtbox1.txt="A" & I
next i
以上循环需要近十分钟才能结束??? 不会要十分钟吧
对控件的属性访问是比较慢的。如果这里要快些运行,那么只能
dim s as string
for i=1 to 50000
s=s & "A" & I & vbcrlf
next i
Richtxtbox1.text=s
对变量的字符串操作还是比较快的。
授人于鱼,不如授人于渔
早已停用QQ了
2010-10-06 14:57
8
1/1页
1
参与讨论请移步原网站贴子:
https://bbs.bccn.net/thread-321945-1-1.html
关于我们
|
广告合作
|
编程中国
|
清除Cookies
|
TOP
|
手机版
编程中国
版权所有,并保留所有权利。
Powered by
Discuz
, Processed in 0.019830 second(s), 8 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved