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