主题：如何在循环中交出控制权

本人写了一个处理程序，这个程序需要一个循环来完成的，但是一旦进入此循环程序，就不能做其他动作，我是很熟悉PB。可以在循环中 加入这么一条语句，就可以了。

for i = 0 to 10 step 1

     statements  '  估算需要三秒钟时间

     yield()   '我在VBA中使用 doevents

next

问题在于，我上面的VBA语句中这样写的话，会出现编译器13的错误：

 

for i=1 to 10 step 1

     statements

     doevents  '  解释执行到这个地方会出现上述问题

next

 

那么如果没有在每次循环加入 循环间隔时间 交出控制权的话，整台就不能做事情了。

 

不知道 doevents 如何使用，或者说还有没有其他办法。

 

金字塔好好完善，将来是一个好的程序化交易系统，那些稳健赢利的人会喜欢本系统的