Повертає значення типу 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 повертає час на 15 хвилин до (-15) за шість годин до полудня (12 - 6) або 5:45:00.
TimeSerial(12 - 6, -15, 0)
Коли будь-який аргумент перевищує нормальний діапазон для цього аргументу, він відповідно збільшується до наступної більшої одиниці. Наприклад, якщо вказати 75 хвилин, вона обчислюється як година та 15 хвилин. Якщо будь-який один аргумент виходить за межі діапазону від –32 768 до 32 767, станеться помилка. Якщо час, указаний трьома аргументами, призводить до того, що дата виходить за межі прийнятного діапазону дат, стається помилка.
Приклад запиту
|
Вираз |
Результати |
|
SELECT TimeSerial(18,12,10) AS NewTime FROM ProductSales GROUP BY TimeSerial(18,12,10); |
Повертає значення часу, що складається з указаних годин, хвилин і секунд, введених в аргументах функції, і відображається в стовпці NewTime. Результат: "18:12:10". |
Приклад VBA
Примітка.: У прикладах нижче показано використання цієї функції в модулі Visual Basic for Applications (VBA). Щоб отримати докладні відомості про використання модуля VBA, клацніть пункт Довідник розробника в розкривному списку поряд із полем Пошук і введіть у поле пошуку принаймні один термін.
У цьому прикладі використано функцію TimeSerial , щоб повернути час для вказаної години, хвилини та секунди.
Dim MyTime
MyTime = TimeSerial(16, 35, 17)
' MyTime contains serial representation of 4:35:17 PM.
