Clock.TickCount Свойство

Определение

Пространство имен:

Microsoft.VisualBasic.Devices

Сборка:

Microsoft.VisualBasic.Forms.dll

Возвращает значение счетчика миллисекунд таймера системы компьютера.

public:
 property int TickCount { int get(); };

public int TickCount { get; }

member this.TickCount : int

Public ReadOnly Property TickCount As Integer

Значение свойства

Int32

Integer содержит значение счетчика миллисекунд таймера компьютерной системы.

Примеры

В следующем примере свойство используется My.Computer.Clock.TickCount для выполнения задачи в цикле в течение заданного количества секунд, даже если системное время компьютера изменяется во время выполнения.

Public Sub LoopTask(ByVal secondsToRun As Integer)
    Dim startTicks As Integer = My.Computer.Clock.TickCount
    Do While IsTimeUp(startTicks, secondsToRun)
        ' Code to run for at least secondsToRun seconds goes here.
    Loop
End Sub

Private Function IsTimeUp( 
    ByVal startTicks As Integer, 
    ByVal seconds As Integer 
) As Boolean
    ' This function throws an overflow exception if the
    ' tick count difference is greater than 2,147,483,647,  
    ' about 24 days for My.Computer.Clock.TickCount.

    ' Use UInteger to simplify the code for roll over.
    Dim uStart As UInteger = 
        CUInt(CLng(startTicks) - Integer.MinValue)
    Dim uCurrent As UInteger = 
        CUInt(CLng(My.Computer.Clock.TickCount) - Integer.MinValue)

    ' Calculate the tick count difference.
    Dim tickCountDifference As UInteger
    If uStart <= uCurrent Then
        tickCountDifference = uCurrent - uStart
    Else
        ' Tick count rolled over.
        tickCountDifference = UInteger.MaxValue - (uStart - uCurrent)
    End If

    ' Convert seconds to milliseconds and compare.
    Return CInt(tickCountDifference) < (seconds * 1000)
End Function

Комментарии

Свойство TickCount предоставляет доступ к системный таймер компьютера, который запускается, когда компьютер активен. Разрешение таймера не менее 500 миллисекундах.

Это свойство можно использовать, чтобы сделать поведение приложения зависимым от времени его выполнения, или использовать его для маркировки событий, оба из которых не зависят от часов компьютера.

Внимание!

Когда значение свойства достигает максимального целочисленного TickCount значения (MaxValue), оно переходит к минимальному целочисленного значению (MinValue), отрицательному числу и продолжает увеличиваться.

Если компьютер работает непрерывно, TickCount увеличивается с нуля до максимального целочисленного значения примерно за 24,9 дня.

Свойство TickCount увеличивается, только когда работает операционная система; оно приостанавливается, когда компьютер переходит в определенные режимы энергосбережения, такие как режим ожидания или гибернации. Свойство TickCount не связано с параметром часов компьютера.

LocalTime Используйте свойство или GmtTime , чтобы получить текущие локальные дату и время на этом компьютере.

Свойство My.Computer.Clock.TickCount имеет то же поведение, что и Environment.TickCount свойство .

Доступность по типу проекта

Тип проекта	Доступно
Приложение Windows	Да
Библиотека классов	Да
Консольное приложение	Да
Библиотека элементов управления Windows	Да
Библиотека веб-элементов управления	Да
Службы Windows	Да
Веб-сайт	Да

См. также раздел

• TickCount
• Объекты (Visual Basic)