Timer Function
자정 이후 경과한 시간(초)을 지정하는 값을 구합니다.
Timer 함수를 호출하려면 먼저 변수를 선언하여 "Long" 데이터 형식을 할당해야 하며, 그렇지 않을 경우 Date 값이 구해집니다.
Timer날짜
Sub ExampleTimer
Dim lSec As Long,lMin As Long,lHour As Long
lSec = Timer
MsgBox lSec, 0, "Seconds since midnight"
lMin = lSec / 60
lSec = lSec Mod 60
lHour = lMin / 60
lMin = lMin Mod 60
MsgBox Right("00" & lHour , 2) & ":"& Right("00" & lMin , 2) & ":" & Right("00" & lSec , 2), 0, "The time is"
End SubThe Timer function measures time in seconds. To measure time in milliseconds use the Timer service available in the ScriptForge library.