Возвращает значение типа Variant (Date), содержащее время для определенных значений часов, минут и секунд.
Синтаксис
TimeSerial ( часы, минуты, секунды )
Внимание! Убедитесь, что аргументы находятся в правильном диапазоне значений. Недопустимый аргумент может привести к неправильному результату.
Функция TimeSerial имеет следующие аргументы:
|
Аргумент |
Описание |
|
часы |
Обязательный аргумент. Variant (Integer). Число между 0 (12:00) и 23 (23:00 вечера), включительно или числовое выражение. |
|
минуты |
Обязательный аргумент. Variant (Integer). Любое числовое выражение. |
|
секунды |
Обязательный аргумент. Variant (Integer). Любое числовое выражение. |
Замечания
Чтобы указать время, например 11:59:59, числа для каждого аргумента функции TimeSerial должны находиться в допустимом диапазоне для данного элемента, то есть 0–23 для часов и 0–59 для минут и секунд. Однако можно также указать относительное время для каждого аргумента, используя любое числовое выражение, представляющее количество часов, минут и секунд до или после определенного времени. В следующем примере вместо абсолютных значений, составляющих время, используются выражения. Функция TimeSerial возвращает время за 6 часов (12 - 6) и 15 минут (-15) до полудня, то есть 05:45:00.
TimeSerial(12 - 6, -15, 0)
Если значение аргумента лежит вне допустимого диапазона, изменяется значение следующего по величине элемента. Например, если задано значение 75 минут, оно преобразуется в 1 час 15 минут. Если какой-либо из аргументов имеет значение, лежащее вне диапазона от -32 768 до 32 767, возникает ошибка. Если заданное тремя аргументами время обозначает дату, находящуюся вне допустимого диапазона дат, возникает ошибка.
Пример запроса
|
Expression |
Результаты |
|
SELECT TimeSerial(18,12,10) AS NewTime FROM ProductSales GROUP BY TimeSerial(18,12;10); |
Возвращает значение "Время", состоящее из указанных часов, минут и секунд, введенных в аргументах функции, и отображается в столбце NewTime. Результат: "18:12:10". |
Пример VBA
Примечание: В примерах ниже показано, как использовать эту функцию в модуле Visual Basic для приложений (VBA). Чтобы получить дополнительные сведения о работе с VBA, выберите Справочник разработчика в раскрывающемся списке рядом с полем Поиск и введите одно или несколько слов в поле поиска.
В этом примере функция TimeSerial используется для получения времени, определенного указанными значениями часов, минут и секунд.
Dim MyTime
MyTime = TimeSerial(16, 35, 17)
' MyTime contains serial representation of 4:35:17 PM.
