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 (自作関数)
UWSC時間 から UNIX時間 を取得します。
uwscToSerial (自作関数)
UWSC時間 を シリアル値 に変換します。
uwscToUNIX (自作関数)
UWSC時間 を UNIX時間 に変換します。
serialToUwsc (自作関数)
シリアル値 を UWSC時間 に変換します。