GetSystemTicks Function

オペレーティングシステムから現在の実行時間 (チック数) を取得して返します。この関数は、プロセスの最適化をする際などに利用できます。

構文:


GetSystemTicks()

戻り値:

Long

Error codes:

5 無効なプロシージャー呼び出しです

例:


Sub ExampleWait
Dim lTick As Long
    lTick = GetSystemTicks()
    Wait 2000
    lTick = (GetSystemTicks() - lTick)
    MsgBox "" & lTick & " Ticks" ,0,"The pause lasted"
End Sub

ScriptForge.Timer service