GetTickCount

本ページには広告が含まれています。

システムを起動した後の経過時間をミリ秒単位で返します。

構文(VBA)
Declare Function GetTickCount Lib "kernel32" Alias "GetTickCount" () As Long
構文(UWSC)
DEF_DLL GetTickCount(): Dword: kernel32
引数
戻り値

プログラム実行例

アイドル時間を取得

最後にキーボードまたはマウスを操作してから経過した時間をミリ秒で取得します。

UWSC
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関数 (スクリプト関数)
日付、時間を取得します。
getHour関数 (自作関数)
指定された時間のを返します。
getMinute関数 (自作関数)
指定された時間のを返します。
getSecond関数 (自作関数)
指定された時間のを返します。
now関数 (自作関数)
現在の日時のシリアル値を返します。
getSerialTime関数 (自作関数)
UWSC時間からシリアル値を取得します。
getUNIXTime関数 (自作関数)
引数に指定した日時のUNIX時間を取得します。
uwscToSerial関数 (自作関数)
UWSC時間シリアル値に変換します。
uwscToUNIX関数 (自作関数)
UWSC時間UNIX時間に変換します。
serialToUNIX関数 (自作関数)
シリアル値UNIX時間に変換します。