关于进度条控制的问题！

llb888888

我设计了一月末处理模块，当运行时，大概是因为数据量很大的缘故吧（有几千条），点击开始按钮后，电脑有十几秒没反应！然后就一下子完成了，问题是因为点下按钮后电脑没反应，要是不知道还以为没点了，就一直点下去，然而那样就出问题了，我设计了一进度条，但点击后进度条也没反应（单独试验是可行的），最后一下到头，应该怎样解决呢？请各位大侠帮忙！！！！谢谢！！！
因文件关系内部机密，不能上传！

duzili

在模块中加入"doevents"语句。
例如：有一个很大的循环，需要用进度条显示进度，进度控件名为ProgressBar1。
for i=1 to 100000
doevents'让程序有机会去执行别的事件
<此处加入需要执行的语句>
ProgressBar1.object=ProgressBar1.object+1'在vb中为：ProgressBar1.value=ProgressBar1.value+1
next

p51219

学习学习