DateAndTime.DateAdd Метод

Определение

Пространство имен:

Microsoft.VisualBasic

Сборка:

Microsoft.VisualBasic.Core.dll

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

Перегрузки

DateAdd(DateInterval, Double, DateTime)	Возвращает значение, содержащее дату и время, к которым был добавлен заданный период времени.
DateAdd(String, Double, Object)	Возвращает значение, содержащее дату и время, к которым был добавлен заданный период времени.

DateAdd(DateInterval, Double, DateTime)

Исходный код:

DateAndTime.vb

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

public:
 static DateTime DateAdd(Microsoft::VisualBasic::DateInterval Interval, double Number, DateTime DateValue);

public static DateTime DateAdd (Microsoft.VisualBasic.DateInterval Interval, double Number, DateTime DateValue);

static member DateAdd : Microsoft.VisualBasic.DateInterval * double * DateTime -> DateTime

Public Function DateAdd (Interval As DateInterval, Number As Double, DateValue As DateTime) As DateTime

Параметры

Interval

DateInterval

Обязательный. Значение перечисления DateInterval или строковое выражение, представляющее добавляемый период времени.

Number

Double

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

DateValue

DateTime

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

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

DateTime

Значение, содержащее дату и время, к которым был добавлен заданный период времени.

Исключения

InvalidCastException

DateValue не может быть приведен к Date.

ArgumentException

Недопустимый параметр Interval.

ArgumentOutOfRangeException

Вычисленная дата приходится на период до 00:00:00 1 января 1 года или позже 23:59:59 31 декабря 9999 года.

Примеры

В этом примере используется дата и с помощью DateAdd функции отображается соответствующая дата с указанным числом месяцев в будущем.

Dim dateEntered As String =
InputBox("Enter a date", DefaultResponse:=Date.Now.ToShortDateString)
Dim monthsEntered As String =
InputBox("Enter number of months to add", DefaultResponse:="12")

Dim dateValue As Date = Date.Parse(dateEntered)
Dim monthsValue As Integer = Integer.Parse(monthsEntered)

' Add the months to the date.
Dim newDate As Date = DateAdd(DateInterval.Month, monthsValue, dateValue)

' This statement has a string interval argument, and
' is equivalent to the above statement.
'Dim newDate As Date = DateAdd("m", monthsValue, dateValue)

MessageBox.Show("New date: " & newDate.ToShortDateString)

Комментарии

Функцию можно использовать для DateAdd сложения или вычитания указанного интервала времени из даты. Например, можно вычислить дату на 30 дней с сегодняшнего дня или за 45 минут до этого момента.

Чтобы добавить дни к DateValue, можно использовать DateInterval.Day, DateInterval.DayOfYearили DateInterval.Weekday. Они рассматриваются как эквивалентные, так как DayOfYear и Weekday не являются значимыми интервалами времени.

Функция DateAdd никогда не возвращает недопустимую дату. При необходимости часть дня итоговой даты корректируется в сторону последнего дня результирующего месяца в результирующем году. В следующем примере к 31 января добавляется один месяц:

Dim NextMonth As Date = DateAdd(DateInterval.Month, 1, #1/31/1995#)  

В этом примере DateAdd возвращает #2/28/1995#, а не #2/31/1995#. Если DateValue имеет значение #1/31/1996#, он возвращается #2/29/1996# , так как 1996 год является високосным годом.

Примечание

DateAdd использует текущий параметр календаря из CurrentCulture свойства CultureInfo класса в System.Globalization пространстве имен. Значения по умолчанию CurrentCulture определяются панель управления параметрами.

Так как каждое Date значение поддерживается структурой DateTime , ее методы предоставляют дополнительные возможности для добавления интервалов времени. Например, можно добавить дробное число дней, округленное до ближайшей миллисекунды, к переменной Date следующим образом:

Dim NextTime As Date = Now        ' Current date and time.  
NextTime = NextTime.AddDays(3.4)  ' Increment by 3 2/5 days.  

Аргумент Interval может иметь один из следующих параметров.

Значение перечисления	Строка	Единица добавляемого интервала времени
DateInterval.Day	d	День; усечено до целочисленного значения
DateInterval.DayOfYear	да	День; усечено до целочисленного значения
DateInterval.Hour	h	Час; округление до ближайшей миллисекунда
DateInterval.Minute	n	Минуту; округление до ближайшей миллисекунда
DateInterval.Month	m	Месяц; усечено до целочисленного значения
DateInterval.Quarter	q	Квартал; усечено до целочисленного значения
DateInterval.Second	s	Второй; округление до ближайшей миллисекунда
DateInterval.Weekday	w	День; усечено до целочисленного значения
DateInterval.WeekOfYear	ww	Неделю; усечено до целочисленного значения
DateInterval.Year	гггг	Год; усечено до целочисленного значения

См. также раздел

• DateDiff
• DatePart
• Day(DateTime)
• Format(Object, String)
• Now
• Weekday(DateTime, FirstDayOfWeek)
• Year(DateTime)
• Сводка типов данных (Visual Basic)

DateAdd(String, Double, Object)

Исходный код:

DateAndTime.vb

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

public:
 static DateTime DateAdd(System::String ^ Interval, double Number, System::Object ^ DateValue);

public static DateTime DateAdd (string Interval, double Number, object? DateValue);

static member DateAdd : string * double * obj -> DateTime

Public Function DateAdd (Interval As String, Number As Double, DateValue As Object) As DateTime

Параметры

Interval

String

Обязательный. Значение перечисления DateInterval или строковое выражение, представляющее добавляемый период времени.

Number

Double

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

DateValue

Object

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

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

DateTime

Значение, содержащее дату и время, к которым был добавлен заданный период времени.

Исключения

InvalidCastException

DateValue не может быть приведен к Date.

ArgumentException

Недопустимый параметр Interval.

ArgumentOutOfRangeException

Вычисленная дата приходится на период до 00:00:00 1 января 1 года или позже 23:59:59 31 декабря 9999 года.

Примеры

В этом примере используется дата и с помощью DateAdd функции отображается соответствующая дата с указанным числом месяцев в будущем.

Dim dateEntered As String =
InputBox("Enter a date", DefaultResponse:=Date.Now.ToShortDateString)
Dim monthsEntered As String =
InputBox("Enter number of months to add", DefaultResponse:="12")

Dim dateValue As Date = Date.Parse(dateEntered)
Dim monthsValue As Integer = Integer.Parse(monthsEntered)

' Add the months to the date.
Dim newDate As Date = DateAdd(DateInterval.Month, monthsValue, dateValue)

' This statement has a string interval argument, and
' is equivalent to the above statement.
'Dim newDate As Date = DateAdd("m", monthsValue, dateValue)

MessageBox.Show("New date: " & newDate.ToShortDateString)

Комментарии

Функцию можно использовать для DateAdd сложения или вычитания указанного интервала времени из даты. Например, можно вычислить дату на 30 дней с сегодняшнего дня или за 45 минут до этого момента.

Чтобы добавить дни к DateValue, можно использовать DateInterval.Day, DateInterval.DayOfYearили DateInterval.Weekday. Они рассматриваются как эквивалентные, так как DayOfYear и Weekday не являются значимыми интервалами времени.

Функция DateAdd никогда не возвращает недопустимую дату. При необходимости часть дня итоговой даты корректируется в сторону последнего дня результирующего месяца в результирующем году. В следующем примере к 31 января добавляется один месяц:

Dim NextMonth As Date = DateAdd(DateInterval.Month, 1, #1/31/1995#)  

В этом примере DateAdd возвращает #2/28/1995#, а не #2/31/1995#. Если DateValue имеет значение #1/31/1996#, он возвращается #2/29/1996# , так как 1996 год является високосным годом.

Примечание

DateAdd использует текущий параметр календаря из CurrentCulture свойства CultureInfo класса в System.Globalization пространстве имен. Значения по умолчанию CurrentCulture определяются панель управления параметрами.

Так как каждое Date значение поддерживается структурой DateTime , ее методы предоставляют дополнительные возможности для добавления интервалов времени. Например, можно добавить дробное число дней, округленное до ближайшей миллисекунды, к переменной Date следующим образом:

Dim NextTime As Date = Now        ' Current date and time.  
NextTime = NextTime.AddDays(3.4)  ' Increment by 3 2/5 days.  

Аргумент Interval может иметь один из следующих параметров.

Значение перечисления	Строка	Единица добавляемого интервала времени
DateInterval.Day	d	День; усечено до целочисленного значения
DateInterval.DayOfYear	да	День; усечено до целочисленного значения
DateInterval.Hour	h	Час; округление до ближайшей миллисекунда
DateInterval.Minute	n	Минуту; округлено до ближайшей миллисекунды
DateInterval.Month	m	Месяц; усечено до целочисленного значения
DateInterval.Quarter	q	Квартал; усечено до целочисленного значения
DateInterval.Second	s	Второй; округлено до ближайшей миллисекунды
DateInterval.Weekday	w	День; усечено до целочисленного значения
DateInterval.WeekOfYear	ww	Неделю; усечено до целочисленного значения
DateInterval.Year	гггг	Год; усечено до целочисленного значения

См. также раздел

• DateDiff
• DatePart
• Day(DateTime)
• Format(Object, String)
• Now
• Weekday(DateTime, FirstDayOfWeek)
• Year(DateTime)
• Сводка типов данных (Visual Basic)