DateAndTime.Timer Właściwość
Definicja
Ważne
Niektóre informacje odnoszą się do produktu w wersji wstępnej, który może zostać znacząco zmodyfikowany przed wydaniem. Firma Microsoft nie udziela żadnych gwarancji, jawnych lub domniemanych, w odniesieniu do informacji podanych w tym miejscu.
Zwraca wartość reprezentującą Double liczbę sekund, które upłynęły od północy.
public:
static property double Timer { double get(); };public static double Timer { get; }static member Timer : doublePublic ReadOnly Property Timer As DoubleWartość właściwości
Wartość reprezentująca liczbę sekund, które upłynęły od północy.
Przykłady
W tym przykładzie użyto Timer właściwości , aby wstrzymać aplikację. Może wykonywać inne przetwarzanie podczas wstrzymania.
Public Sub waitFiveSeconds()
If TimeOfDay >= #11:59:55 PM# Then
MsgBox("The current time is within 5 seconds of midnight" &
vbCrLf & "The timer returns to 0.0 at midnight")
Return
End If
Dim start, finish, totalTime As Double
If (MsgBox("Press Yes to pause for 5 seconds", MsgBoxStyle.YesNo)) =
MsgBoxResult.Yes Then
start = Microsoft.VisualBasic.DateAndTime.Timer
' Set end time for 5-second duration.
finish = start + 5.0
Do While Microsoft.VisualBasic.DateAndTime.Timer < finish
' Do other processing while waiting for 5 seconds to elapse.
Loop
totalTime = Microsoft.VisualBasic.DateAndTime.Timer - start
MsgBox("Paused for " & totalTime & " seconds")
End If
End Sub
Należy pamiętać, że należy zakwalifikować Timer właściwość do Microsoft.VisualBasic przestrzeni nazw, ponieważ Timer jest również zdefiniowaną klasą w System.Threadingprzestrzeniach nazw , System.Timersi System.Windows.Forms .
Uwagi
Właściwość Timer zwraca zarówno sekundy, jak i milisekundy od ostatniej północy. Sekundy znajdują się w integralnej części wartości zwracanej, a milisekundy znajdują się w części ułamkowej.
