Функция DateSerial

DateSerial(Year,Month,Day)

Функция DateSerial используется для получения даты во внутреннем представлении системы по заданным значениям компонентов даты(года,месяца,дня). Дата во внутреннем представлении - это число дней от установленного в системе начального значения. Функция DateSerial вычисляет по значениям компонентов требуемое число дней. Значения любых компонентов могут быть отрицательными или превышать допустимые календарные значения(12 для месяца и 31 для дня), если результат при этот попадает в допустимый диапазон значений Date. Если значение какого-либо компонента превышает допустимое значение для этого компонента, то изменяется другой компонент даты. Например, 33 дня означают 1 месяц и 2 или 3 дня (в зависимости от месяца)

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

Возвращает значение типа Variant(Date). Если полученный результат не попадает допустимый диапазон календарных дат, генерируется ошибка стадии выполнения Invalid procedure call or argument

Параметры
Функция содержит именованные аргументы
Year
Обязательный аргумент типа Integer в диапазоне от 100 до 9999, задающий значение года
Windows98/2000 По умолчанию, при использовании в аргументе двух цифр, функция интерпретирует их следующим образом:
0-29 интервал между 2000 и 2029 годами
30-99 интервал между 1930 и 1999 годами
В остальных случаях используйте четыре цифры(напр., 1147)
Month
Обязательный аргумент типа Integer, задающий значение месяца. Может содержать любое числовое выражение
Day
Обязательный аргумент типа Integer, задающий значение дня. Может содержать любое числовое выражение
Примечание Если любой из аргументов выходит из допустимых значений Integer, генерируется ошибка стадии выполнения Overflow
Пример
' Вычисляем дату, предшествующую 
' на 5 дней дате 1 августа 1966 года 
Dim MyDate
MyDate = DateSerial(1966, 8,1 -4)   ' возвращает 27.07.66
Print MyDate
Смотри также
DateAdd
Категория
Функции дат и времени
Rehau трубы
Как будет строиться ценовая политика производителей труб
комфорт-монтаж.рф
усыпление животных на дому цена
vetvita.ru