|
Функция DateAdd | | Синтаксис DateAdd(interval, number, date) | Возвращает значение типа Variant (Date), содержащее дату, к которой добавлен указанный временной интервал. | Параметры Наименование | Описание | Interval | Обязательный. Строковое выражение, указывающее тип добавляемого временного интервала.
| Number | Обязательный. Числовое выражение, указывающее число временных интервалов, которое следует добавить. Оно может быть положительным (для получения более поздних дат) или отрицательным (для получения более ранних дат).
| Date | Обязательный. Значение типа Variant
(Date) или литерал даты, представляющий дату, к которой добавляется указанный временной интервал. |
| Замечания | Пример использования 'в данном примере функция DateAdd используется для вычисления даты,
'на определенное число месяцев более поздней, чем указанная пользователем
Dim FirstDate As Date 'объявляет переменные
Dim IntervalType As String
Dim Number As Integer
Dim Msg
IntervalType = "м" 'интервал указывается в месяцах
FirstDate = InputBox("Введите дату")
Number = InputBox("Введите число месяцев, которое следует добавить")
Msg = "Новая дата: " & DateAdd(IntervalType, Number, FirstDate)
MsgBox Msg | Дополнительная информация Категория: Обработка данных дата/время Еще функции: Date, DateAdd, DateDiff, DatePart, DateSerial, DateValue, Day, Hour, Minute, Month, MonthName, Now, Second, Time, Timer, TimeSerial, TimeValue, WeekDay, WeekDayName, Year |
|
|