DateAndTime.Timer Eigenschap
Definitie
Belangrijk
Bepaalde informatie heeft betrekking op een voorlopige productversie die aanzienlijk kan worden gewijzigd voordat deze wordt uitgebracht. Microsoft biedt geen enkele expliciete of impliciete garanties met betrekking tot de informatie die hier wordt verstrekt.
Retourneert een Double waarde die het aantal seconden aangeeft dat is verstreken sinds middernacht.
public:
static property double Timer { double get(); };public static double Timer { get; }static member Timer : doublePublic ReadOnly Property Timer As DoubleWaarde van eigenschap
Een waarde die het aantal seconden aangeeft dat is verstreken sinds middernacht.
Voorbeelden
In dit voorbeeld wordt de Timer eigenschap gebruikt om de toepassing te onderbreken. Tijdens de pauze kan andere verwerkingen worden uitgevoerd.
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
Houd er rekening mee dat u de eigenschap Timer moet kwalificeren met de naamruimte Microsoft.VisualBasic, omdat Timer ook een gedefinieerde klasse is in de System.Threading, System.Timers en System.Windows.Forms naamruimten.
Opmerkingen
De Timer eigenschap retourneert zowel de seconden als de milliseconden sinds de meest recente middernacht. De seconden bevinden zich in het integraal deel van de retourwaarde en de milliseconden bevinden zich in het breukgedeelte.