有很多程序员都不了解vb中的doevents函数。doevents函数可以临时返回控制器给操作系统,并允许它完成其他可能发生的事件。
当一个程序的代码需要花很长的时间去执行,比如在一个复杂的数学计算的时候,你需要运用doevents函数。在你代码适当的位置调用doevents函数,能够改变程序响应的时间。
这里有一个例子:在vb里创建一个标准的exe文件并放置一个commandbutton和一个textbox,然后,将下面的代码放入commandbutton的单击事件处理程序中:
private sub command1_click()
dim i as long, j as long
for i = 1 to 100
text1.text = i
for j = 1 to 100000
nextnext
text1.text = “done”
end sub
你可以发现这个程序中有嵌套式循环,循环将持续几秒钟。每次,外部循环反复执行i
的值显示在text box中。当循环结束时,done也显示出来了。
在你运行这个程序的时候究竟发生了什么呢?然而,text box不会改变直到done显示
出来。问题在于在执行循环的时候系统非常繁忙,而循环语句中的i要显示在text box里面,这延迟windows队列。当循环完成以后,所有的请求都被执行。
现在在text1.text = i调用doevents函数。当你运行程序的时候,你会发现text box记下了i的值。调用doevents函数可以释放系统内存来完成其他请求,然后将控制器返回给vb程序。
虽然调用doevents函数是以速度为代价,但是可以让程序有时间执行其他的事件,这个代价是值得的。
