Contents

# Timer Function

Trả về một giá trị mà ghi rõ số giây đã qua kể từ nửa đêm.

Trước tiên bạn cần phải khai báo một biến để gọi hàm Timer và gán cho nó kiểu dữ liệu « Long » (dài), không thì trả về một giá trị Ngày.

### Syntax:

      Timer

### Return type:

Ngày

### Example:

      Sub ExampleTimer
          Dim lSec As Long,lMin As Long,lHour As Long
          lSec = Timer
          MsgBox lSec, 0, "Seconds since midnight"
          lMin = Int(lSec / 60)
          lSec = lSec Mod 60
          lHour = Int(lMin / 60)
          lMin = lMin Mod 60
        MsgBox Format(lHour,"00") & ":"& Format(lMin,"00") & ":" & Format(lSec,"00"),  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.

Chủ đề Liên quan

ScriptForge.Timer service