DateAndTime.Timer Свойство

Определение

Пространство имен:

Microsoft.VisualBasic

Сборка:

Microsoft.VisualBasic.Core.dll

Исходный код:

DateAndTime.vb

Double Возвращает значение, представляющее количество секунд, прошедших с полуночи.

public:
 static property double Timer { double get(); };

public static double Timer { get; }

static member Timer : double

Public ReadOnly Property Timer As Double

Значение свойства

Double

Значение, представляющее количество секунд, истекшее с полуночи.

Примеры

В этом примере свойство используется Timer для приостановки приложения. Он может выполнять другую обработку во время приостановки.

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

Обратите внимание, что необходимо указать свойство Timer с пространством имен Microsoft.VisualBasic, так как Timer также является определенным классом в пространствах имен System.Threading, System.Timers и System.Windows.Forms.

Комментарии

Свойство Timer возвращает как секунды, так и миллисекунд с последней полуночи. Секунды находятся в целой части возвращаемого значения, а миллисекунд находятся в дробной части.

См. также раздел

• Randomize()
• TimeOfDay
• Today
• System
• System.Windows.Forms
• DateTime
• ArgumentException
• ArgumentOutOfRangeException