本ページには広告が含まれています。
システムを起動した後の経過時間をミリ秒単位で返します。
- 構文(VBA)
- Declare Function GetTickCount Lib "kernel32" Alias "GetTickCount" () As Long
- 構文(UWSC)
- DEF_DLL GetTickCount(): Dword: kernel32
- 引数
- 戻り値
プログラム実行例
アイドル時間を取得
最後にキーボードまたはマウスを操作してから経過した時間をミリ秒で取得します。
DEF_DLL GetTickCount(): Dword: kernel32
DEF_DLL GetLastInputInfo({DWORD, DWORD}): BOOL: user32
DIM t
SETHOTKEY(VK_ESC, EMPTYPARAM, "forceQuit")
WHILE TRUE
GetLastInputInfo(8, t)
FUKIDASI((GetTickCount() - t) + "ms")
SLEEP(0.01)
WEND
//////////////////////////////////////////////////
// 【引数】
//
// 【戻り値】
//
//////////////////////////////////////////////////
PROCEDURE forceQuit()
EXITEXIT
FEND
使用関数
関連記事
- GETTIME関数 (スクリプト関数)
- GETTIMEは日時を取得する関数です。第二引数に指定された基準日から第一引数に指定した日数を加算した値を返します。戻値は2000年1月1日からの秒数です。関数実行後特殊変数に値がセットされ、その特殊変数から日付情報を取得できます。
- getHour関数 (自作関数)
- 指定された日時の「時」を0〜23の間の数値で返します。日付のみ指定された場合は「00」が返ります。
- getMinute関数 (自作関数)
- 指定された日時の「分」を0〜59の間の数値で返します。日付のみ指定された場合は「00」が返ります。
- getSecond関数 (自作関数)
- 指定された日時の「秒」を0〜59の間の数値で返します。日付のみ指定された場合は「00」が返ります。
- now関数 (自作関数)
- 現在の日時のシリアル値を返します。
- getSerialTime関数 (自作関数)
- UWSC時間からシリアル値を取得します。
- getUNIXTime関数 (自作関数)
- 引数に指定した日時のUNIX時間を取得します。
- uwscToSerial関数 (自作関数)
- UWSC時間をシリアル値に変換します。
- uwscToUNIX関数 (自作関数)
- UWSC時間をUNIX時間に変換します。
- serialToUNIX関数 (自作関数)
- シリアル値をUNIX時間に変換します。