Funktion Timer

Inhalte
Index 🔎︎

# Timer Function

Liefert einen Wert zurück, der die vergangene Zeit seit Mitternacht in Sekunden angibt.

Um die Funktion Timer aufzurufen, müssen Sie zuerst eine Variable mit dem Typ "Long" deklarieren. Ansonsten wird ein Wert des Typs "Date" zurückgegeben.

### Syntax:

      Timer

### Rückgabewert:

Datum

### Beispiel:

      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 Sub

The Timer function measures time in seconds. To measure time in milliseconds use the Timer service available in the ScriptForge library.

Verwandte Themen

ScriptForge.Timer service