TimeSerial
Функция 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)
Категория
Функции дат и времени
|