Перейти к основному контенту
Office

Функция Timer

Возвращает значение типа Single, указывающее число секунд, прошедшее с момента полуночи.

Синтаксис

Timer

Замечания

В Microsoft Windows функция Timer возвращает дробные части секунды. Разрешение таймера для Macintosh — одна секунда.

Пример запроса

Выражение

Результаты:

Выберите Timer () в качестве Секондспаст от Продуктсалес GROUP BY Timer ();

Возвращает количество секунд, прошедшее с полуночи на основе системного времени и отображаемого в столбце Секондспаст.

Пример VBA

Примечание: В примерах ниже показано, как использовать эту функцию в модуле Visual Basic для приложений (VBA). Чтобы получить дополнительные сведения о работе с VBA, выберите Справочник разработчика в раскрывающемся списке рядом с полем Поиск и введите одно или несколько слов в поле поиска.

В этом примере функция Timer используется для приостановки приложения. В примере также используется функция DoEvents для передачи другим процессам во время приостановки.

Dim PauseTime, Start, Finish, TotalTime
If (MsgBox("Press Yes to pause for 5 seconds", _
4)) = vbYes Then
PauseTime = 5 ' Set duration.
Start = Timer ' Set start time.
Do While Timer < Start + PauseTime
DoEvents ' Yield to other processes.
Loop
Finish = Timer ' Set end time.
TotalTime = Finish - Start ' Calculate total time.
MsgBox "Paused for " & TotalTime & " seconds"
Else
End
End If

Примечание:  Эта страница переведена автоматически, поэтому ее текст может содержать неточности и грамматические ошибки. Для нас важно, чтобы эта статья была вам полезна. Была ли информация полезной? Для удобства также приводим ссылку на оригинал (на английском языке).

См. также

Выберите нужную функцию даты

Совершенствование навыков работы с Office
Перейти к обучению
Первоочередный доступ к новым возможностям
Присоединиться к программе предварительной оценки Office

Были ли сведения полезными?

Спасибо за ваш отзыв!

Благодарим за отзыв! Возможно, будет полезно связать вас с одним из наших специалистов службы поддержки Office.

×