modTime 函式庫 風禹科技驗證有限公司 網站 提供 .Net 原始碼

MyWait 函數

說明

等待延遲函數

本函數之引數列表

引數 型態 位元組 選項 預設值 說明
mySecond Variant 16 必須 (無) 可以使用實數秒數,直接用秒比較習慣
bDoEvents Boolean 2 可省略 True 是否允許 CPU 處理其他事件,允許時會呼叫 MyDoEvents
dwMilliseconds Long 4 可省略 0 呼叫 Sleep 函數時,睡眠毫秒數。

傳回值

傳回實際等待秒數

範例

For i = 1 To 10
	Debug.Print MyWait(0.00001, False)
Next
 1.03719229961778E-05 
 1.00996704311054E-05 
 1.01869778632339E-05 
 1.02596229785164E-05 
 1.01419912092746E-05 
 1.04169096501371E-05 
 1.03769215132844E-05 
 1.01943090216569E-05 
 1.03242704664283E-05 
 1.02742852953624E-05 

For i = 1 To 10
	Debug.Print MyWait(0.001)
Next
 0.001002172688769 
 1.00071545441519E-03 
 1.00023826264875E-03 
 1.00125296162139E-03 
 1.00120031057453E-03 
 1.00142790972012E-03 
 1.00207771694397E-03 
 1.00173281926362E-03 
 1.00215536057636E-03 
 1.00205505699976E-03

更進一步

  本函數為精確計時。以誤差小於 5 % 為基準時,不允許 CPU 處理其他事件時,最小等待時間解析度小於 0.01 ms ,允許 CPU 處理其他事件時,最小等待時間解析度小於 1 ms,最大有效時距大於 244,951 年。

基本條件

Visual Basic 4 以後 | modTime.bas

請參閱

modTime 函式庫