不要在代码中放置不必要的DoEvents语句,尤其是在时间要求高的循环中。遵循这个原则,至少能在循环中的每N次反复时才执行DoEvents语句,从而增强效率。比如使用下面的语句:
If(loopNdxMod10)=0ThenDoEvents
(本文来源于图老师网站,更多请访问http://m.tulaoshi.com/bianchengyuyan/)如果只是使用DoEvents来屏蔽鼠标以及键盘操作,那么就可以在事件队列中存在待处理项目时调用它。通过API函数GetInputState来检查这个条件的发生:
DeclareFunctionGetInputStateLib"user32"Alias"GetInputState"()AsLong
'...
(本文来源于图老师网站,更多请访问http://m.tulaoshi.com/bianchengyuyan/)IfGetInputState()ThenDoEvents
->