Clock.TickCount プロパティ
アセンブリ: Microsoft.VisualBasic (microsoft.visualbasic.dll 内)


詳細については、Visual Basic のトピック「My.Computer.Clock.TickCount プロパティ」を参照してください。
TickCount プロパティを使用すると、コンピュータがアクティブになったときに実行されるシステム タイマにアクセスできます。タイマは 500 ミリ秒以上の解像力を備えています。
このプロパティを使用すると、コンピュータの時計が示す時刻ではなく、起動以降の経過時間によってアプリケーションの動作を変えたり、経過時間に基づいてイベントを識別したりできます。
![]() |
---|
TickCount プロパティの値が整数の最大値 (MaxValue) に達すると、再び整数の最小値 (MinValue) に戻ってカウントを続行します。整数の最小値は負数になります。 |
コンピュータを終了せずに実行し続けた場合、TickCount はゼロから整数の最大値 (約 24.9 日) の範囲でインクリメントされます。
TickCount プロパティがインクリメントされるのは、オペレーティング システムが実行されている間だけです。コンピュータが省電力モード (スタンバイまたは休止状態など) に移行した場合、カウントは一時中断されます。TickCount プロパティは、コンピュータの時計設定とは関係ありません。
このコンピュータの現在のローカルな日付と時刻を取得するには、My.Computer.Clock.LocalTime プロパティ プロパティまたは My.Computer.Clock.GmtTime プロパティ プロパティを使用します。
My.Computer.Clock.TickCount プロパティと Environment.TickCount プロパティの動作は同じです。

次の例では、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

Windows 98, Windows 2000 SP4, Windows Millennium Edition, Windows Server 2003, Windows XP Media Center Edition, Windows XP Professional x64 Edition, Windows XP SP2, Windows XP Starter Edition
開発プラットフォームの中には、.NET Framework によってサポートされていないバージョンがあります。サポートされているバージョンについては、「システム要件」を参照してください。


- Clock.TickCount プロパティのページへのリンク