Функція GetSystemTicks

Повертає число системних тактів, що надається операційною системою. Цю функцію можна використовувати для оптимізації деяких процесів.

Синтаксис:


GetSystemTicks()

Значення, що повертається:

Long

Коди помилок:

5 Неправильний виклик процедури

Приклад:


Sub ExampleWait
Dim lTick As Long
    lTick = GetSystemTicks()
    Wait 2000
    lTick = (GetSystemTicks() - lTick)
    MsgBox "" & lTick & " тактів" ,0,"тривала пауза"
End Sub

Будь ласка, підтримайте нас!