Clock.TickCount Özellik

Tanım

Ad Alanı:

Microsoft.VisualBasic.Devices

Bütünleştirilmiş Kod:

Microsoft.VisualBasic.Forms.dll

Bilgisayarın sistem zamanlayıcısından milisaniye sayısını alır.

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

public int TickCount { get; }

member this.TickCount : int

Public ReadOnly Property TickCount As Integer

Özellik Değeri

Int32

Integer Bilgisayarın sistem zamanlayıcısından milisaniye sayısını içeren.

Örnekler

Aşağıdaki örnekte, bilgisayarın sistem süresi çalışırken değişse bile, belirli bir sayıda saniye boyunca bir görevi döngüde çalıştırmak için özelliği kullanılır 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

Açıklamalar

TickCount özelliği, bilgisayar etkin olduğunda çalışan bilgisayarın sistem zamanlayıcısına erişim sağlar. Süreölçer çözünürlüğü 500 milisaniyeden az değildir.

Uygulamanızın davranışını çalışmakta olduğu süreye bağlı hale getirmek için bu özelliği kullanabilir veya her ikisi de bilgisayarın saatinden bağımsız olan olayları etiketlemek için kullanabilirsiniz.

Dikkat

Özelliğin TickCount değeri en büyük tamsayı değerine ()MaxValue ulaştığında, minimum tamsayı değerine ()MinValue atlar, negatif bir sayıya atlar ve artmaya devam eder.

Bilgisayar sürekli çalışıyorsa, TickCount yaklaşık 24,9 gün içinde sıfırdan maksimum tamsayı değerine çıkar.

TickCount Özellik yalnızca işletim sistemi çalışırken artar; bilgisayar bekleme veya hazırda bekleme gibi belirli güç tasarrufu modlarına gittiğinde duraklatılır. TickCount Özelliğin bilgisayarın saat ayarıyla ilgisi yok.

LocalTime Bu bilgisayardaki geçerli yerel tarih ve saati almak için özelliğini veya GmtTime özelliğini kullanın.

My.Computer.Clock.TickCount özelliği, özelliğiyle aynı davranışa Environment.TickCount sahiptir.

Proje Türüne Göre Kullanılabilirlik

Proje türü	Kullanılabilir
Windows Uygulaması	Evet
Sınıf Kitaplığı	Evet
Konsol Uygulaması	Evet
Windows Denetim Kitaplığı	Evet
Web Denetim Kitaplığı	Evet
Windows Hizmeti	Evet
Web Sitesi	Evet

Ayrıca bkz.

• TickCount
• Nesneler (Visual Basic)