Функция GetTickCount

Declare Function GetTickCount Lib "kernel32.dll" () As Long

Платформа

GetTickCount возвращает время,истекшее с последней загрузки Windows в миллисекундах.

Пример

' Определяем,сколько времени прошло с последней загрузки Window
Dim retval as Long  'возвращаемое значение
'Полученное значение преобразуем в минуты
    retval = GetTickCount
    MsgBox Str$(retval / 60000) + " минут."

Категория
Время

В начало