Visual Basic, .NET, ASP, VBA, VBScript
 
  Справочники  
  Справочник по Windows API Справочник по Visual Basic  
     
  Функция DateAdd  
 

Функция

DateAdd

Синтаксис

DateAdd(interval, number, date)

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

Параметры

Наименование

Описание

Interval

Обязательный. Строковое выражение, указывающее тип добавляемого временного интервала.

Number

Обязательный. Числовое выражение, указывающее число временных интервалов, которое следует добавить. Оно может быть положительным (для получения более поздних дат) или отрицательным (для получения более ранних дат).

Date

Обязательный. Значение типа Variant (Date) или литерал даты, представляющий дату, к которой добавляется указанный временной интервал.

Замечания

Функция использует именованные аргументы. Функция DateAdd предназначена для добавления или вычитания указанного временного интервала из значения даты. Например, с помощью этой функции можно вычислить дату, на 30 дней более позднюю, чем текущая, или время, на 45 минут более позднее, чем текущее.
Для добавления дней к аргументу date можно задавать временной интервал как день года ("y"), день месяца ("d") или день недели ("w"). Функция DateAdd не возвращает неправильных дат. Следующее выражение добавляет один месяц к 31 января:

DateAdd("m", 1, "31-янв-95")

В данном случае будет возвращена дата 28-фев-95, а не 31-фев-95. Если в качестве аргумента date указать 31-янв-96, то возвращается дата 29-фев-96, поскольку 1996 год является високосным.
Если будет получена дата, более ранняя, чем 100 год (т.е. вычитаемый временной интервал содержит больше лет, чем исходное значение date), возникнет ошибка. Если number не является значением типа Long, оно округляется до ближайшего целого числа перед выполнением операции.
Параметр interval может принамать одно их следующих значений: yyyy -Год, q - Квартал, m - Месяц, y - День года, d - День месяца, w - День недели, ww - Неделя, h - Часы, n - Минуты, s -Секунды.

Пример использования

'в данном примере функция 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

 
     
  VBNet online (всего: 52050)  
 

Логин:

Пароль:

Регистрация, забыли пароль?


В чате сейчас человек
 
     
  VBNet рекомендует  
   
     
  Лучшие материалы  
 
ActiveX контролы (112)
Hitman74_Library (36119)
WindowsXPControls (20739)
FlexGridPlus (19374)
DSMAniGifControl (18295)
FreeButton (15157)
Примеры кода (546)
Parol (18027)
Passworder (9299)
Screen saver (7654)
Kerish AI (5817)
Folder_L (5768)
Статьи по VB (136)
Мое второе впечатление... (11236)
VB .NET: дорога в будущее (11161)
Основы SQL (9225)
Сообщения Windows в Vi... (8788)
Классовая теория прогр... (8619)
 
     
Техническая поддержка MTW-хостинг | © Copyright 2002-2011 VBNet.RU | Пишите нам