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)
|