不要在代碼中放置不必要的DoEvents語句，尤其是在時間要求高的循環(huán)中。遵循這個原則，至少能在循環(huán)中的每N次反復(fù)時才執(zhí)行DoEvents語句，從而增強效率。比如使用下面的語句：

If(loopNdxMod10)=0ThenDoEvents

如果只是使用DoEvents來屏蔽鼠標(biāo)以及鍵盤操作，那么就可以在事件隊列中存在待處理項目時調(diào)用它。通過API函數(shù)GetInputState來檢查這個條件的發(fā)生：

DeclareFunctionGetInputStateLib"user32"Alias"GetInputState"()AsLong

'...

IfGetInputState()ThenDoEvents