共用方式為


Clock.TickCount 屬性

定義

取得電腦系統計時器的毫秒計數。

public:
 property int TickCount { int get(); };
public int TickCount { get; }
member this.TickCount : int
Public ReadOnly Property TickCount As Integer

屬性值

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 控制項程式庫
Web 控制項程式庫
Windows 服務
網站

適用於

另請參閱