如何加快程序运行速度? '在循环里加个DoEvents语句试试for i=0 to 10for j=0 to 10 DoEvents//进行计算//将计算结果添加到textbox中next jnext i 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 在循环里加个 DoEvents 语句试试for i=0 to 10for j=0 to 10//进行计算//将计算结果添加到textbox中DoEventsnext jnext i 取消 “DoEvents” 能提高很多速度。 用“DoEvents”结果类同于中断,反使CPU做分时去处理别的进程或线程,时间会加长。VB的语句虽然简单但后台处理比较复杂,又是解释语言结构,所以程序即使简单可能时间也会比较长。用数组或采用指针方式会快一些。 “将计算结果添加到textbox中” 添加的方法有多种,有的很费时间,有的很简单,不知你用哪种,贴出来看看。我觉得这才是影响你的速度的地方! 我觉得这种简单的循环,用什么都很难提高速度;关键在于运算那方面和最后的处理;DoEvents不会提高速度,反而影响速度;但是不建议去掉,毕竟系统不能只是为了你一个人的程序工作啊; 为什么都提到用数组?我在Form1_load()里面给一个数组赋值:r(1)=...r(2)=........计算结果添加到textbox中是这样的:textbox1.text=textbox1.text+vbcrlf+"f("+str(i)+")="+str(f(i))+...是不是计算中有开方,而数据都是 double型的才很费时间? Dim ss As String 'textbox1.text=textbox1.text+vbcrlf+"f("+str(i)+")="+str(f(i))+... '改为 这样 看看 ss=ss+vbcrlf+"f("+str(i)+")="+str(f(i))+... ........ ........ textbox1.Text = ss 声援clear_zero,还她版主职位。 combobox选择项的问题 DLL问题 救救!到底什么地方出现问题?(一个ActiveX Exe 例子) vb 把反斜杠”\“后面的数据也读出来怎么做? 超级奇怪: SendMessage 和 "振荡波" 补丁有冲突? 请教各位高人!怎么样用VB遍些下面这种类型的演示动画??? VB程序与WinSock控件 我想给U盘改个名字 如何用VB实现某些打字练习软件的效果最好有源代码!给高分! ★★★各位大虾救命,怎样得到某月最后一天的日期?? 在线等待有关时间问题!!!!
for i=0 to 10
for j=0 to 10
//进行计算
//将计算结果添加到textbox中
DoEvents
next j
next i
关键在于运算那方面和最后的处理;DoEvents不会提高速度,反而影响速度;但是不建议去掉,毕竟系统不能只是为了你一个人的程序工作啊;
我在
Form1_load()里面给一个数组赋值:
r(1)=...
r(2)=....
....
计算结果添加到textbox中是这样的:
textbox1.text=textbox1.text+vbcrlf+"f("+str(i)+")="+str(f(i))+...
是不是计算中有开方,而数据都是 double型的才很费时间
?
'textbox1.text=textbox1.text+vbcrlf+"f("+str(i)+")="+str(f(i))+...
'改为 这样 看看
ss=ss+vbcrlf+"f("+str(i)+")="+str(f(i))+...
........
........
textbox1.Text = ss