Clock.TickCount Vlastnost

Definice

Obor názvů:

Microsoft.VisualBasic.Devices

Sestavení:

Microsoft.VisualBasic.Forms.dll

Získá počet milisekund ze systémového časovače počítače.

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

public int TickCount { get; }

member this.TickCount : int

Public ReadOnly Property TickCount As Integer

Hodnota vlastnosti

Int32

Obsahuje Integer počet milisekund ze systémového časovače počítače.

Příklady

Následující příklad používá My.Computer.Clock.TickCount vlastnost ke spuštění úlohy ve smyčce po daný počet sekund, a to i v případě, že se systémový čas počítače během běhu změní.

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

Poznámky

Vlastnost TickCount poskytuje přístup k systémovému časovači počítače, který se spustí, když je počítač aktivní. Rozlišení časovače není menší než 500 milisekund.

Tuto vlastnost můžete použít k tomu, aby chování aplikace bylo závislé na době, po kterou běží, nebo ji můžete použít k označení událostí, které jsou nezávislé na hodinách počítače.

Upozornění

Když hodnota TickCount vlastnosti dosáhne maximální celočíselné hodnoty (MaxValue), přeskočí se na minimální celočíselnou hodnotu (MinValue), záporné číslo a pokračuje v přírůstku.

Pokud počítač běží nepřetržitě, TickCount přírůstky od nuly k maximální celočíselné hodnotě přibližně za 24,9 dne.

Vlastnost se TickCount zvýší pouze v případě, že je operační systém spuštěný; pozastaví se, když počítač přejde do určitých režimů úspory energie, jako je pohotovostní režim nebo hibernace. Vlastnost TickCount nesouvisí s nastavením hodin počítače.

LocalTime Pomocí vlastnosti nebo GmtTime vlastnosti získejte aktuální místní datum a čas v tomto počítači.

Vlastnost My.Computer.Clock.TickCount má stejné chování jako Environment.TickCount vlastnost.

Dostupnost podle typu projektu

Typ projektu	K dispozici.
Aplikace pro systém Windows	Ano
Knihovna tříd	Ano
Konzolová aplikace	Ano
Knihovna ovládacích prvků Windows	Ano
Knihovna webových ovládacích prvků	Ano
Služba systému Windows	Ano
Webu	Ano

Viz také

• TickCount
• Objekty (Visual Basic)