暫停執行,以便讓作業系統可以處理其它的事件。
dwMilliseconds | Long | 4 | 可省略 | 1 | 呼叫 Sleep 函數時,睡眠毫秒數。 |
DoEvents 函數會傳回一個Integer,以代表 Visual Basic 的單一版本中所開啟的表單個數,例如, Visual Basic專業版。在其它的應用版本中,DoEvents 會傳回 0。
Do QueryPerformanceCounter nc If bDoEvents Then MyDoEvents End If Loop Until (nc - sc) > tf
本函數包裝 DoEvents ,由於 DoEvents 雖然會允許 VB 進行其他程序作業,但是不會把 CPU 資源放出來,故透過呼叫 Sleep 讓 CPU 資源得以釋出,不致以 100% 來占用系統。
Visual Basic 4 以後 | modTime.bas
|