Функция TimeSerial

TimeSerial(Hour,Minute,Second)

Функция TimeSerial служит для получения времени во внутреннем предствлении системы по значениям заданных компонентов (часов,минут,секунд). Можно использовать числовые выражения для описания времени, на определенное число часов, минут и секунд более позднего или раннего, чем указанное (см.пример)

Возвращаемое значение

Возвращает значение типа Variant (Date), содержащее значение времени, соответствующее указанным часу, минуте и секунде

Параметры
Функция содержит именованные аргументы
HourОбязательный аргумент-значение типа Variant (Integer). Число от 0 (12:00 A.M.) до 23 (11:00 P.M.) включительно или числовое выражение
MinuteОбязательный аргумент-значение типа Variant (Integer). Любое числовое выражение
SecondОбязательный аргумент-значение типа Variant (Integer). Любое числовое выражение
Примечание

Значение каждого аргумента функции TimeSerial должно лежать в соответствующем диапазоне: 0 — 23 для часов и 0 — 59 для минут и секунд.
Если значение какого-либо аргумента превышает максимально допустимое для него, то соответствующим образом увеличивается более старший компонент времени. Например, 75 минут означают 1 час и 15 минут. Однако если значение любого аргумента лежит вне диапазона -32 768 — 32 767, или сочетание всех трех аргументов описывает дату, лежащую вне допустимого диапазона дат, возникает ошибка

Пример

 'В этом примере аргументами функции TimeSerial
' являются не абсолютные значения,
' а числовые выражения. Возвращается время,
' на 6 часов и 15 минут более раннее,
' чем полдень, т.е. 5:45:00
Dim myTime
myTime=TimeSerial(12 - 6, -15, 0)
Категория
Функции дат и времени