DateAndTime.DateAdd Metoda

Definicja

Przestrzeń nazw:

Microsoft.VisualBasic

Zestaw:

Microsoft.VisualBasic.Core.dll

Date Zwraca wartość zawierającą wartość daty i godziny, do której został dodany określony interwał czasu.

Przeciążenia

DateAdd(DateInterval, Double, DateTime)	Zwraca wartość zawierającą wartość daty i godziny, do której dodano określony interwał czasu.
DateAdd(String, Double, Object)	Zwraca wartość zawierającą wartość daty i godziny, do której dodano określony interwał czasu.

DateAdd(DateInterval, Double, DateTime)

Źródło:

DateAndTime.vb

Zwraca wartość zawierającą wartość daty i godziny, do której dodano określony interwał czasu.

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

Parametry

Interval

DateInterval

Wymagane. DateInterval Wartość wyliczenia lub wyrażenie ciągu reprezentujące interwał czasu, który chcesz dodać.

Number

Double

Wymagane. Wyrażenie zmiennoprzecinkowe reprezentujące liczbę interwałów, które chcesz dodać. Może to być dodatnie (aby uzyskać wartości daty/godziny w przyszłości) lub ujemne (aby uzyskać wartości daty/godziny w przeszłości). Może zawierać część ułamkową, gdy Interval określa godziny, minuty lub sekundy. W przypadku innych wartości elementu każda Intervalczęść Number ułamkowa elementu jest ignorowana.

DateValue

DateTime

Wymagane. Wyrażenie reprezentujące datę i godzinę dodania interwału. DateValue sama nie jest zmieniana w programie wywołującym.

Zwraca

DateTime

Wartość zawierająca wartość daty i godziny, do której dodano określony interwał czasu.

Wyjątki

InvalidCastException

DateValue nie jest coercible do Date.

ArgumentException

Interval jest nieprawidłowa.

ArgumentOutOfRangeException

Data obliczeniowa jest przed 00:00:00 1 stycznia roku 1 lub nowsza niż 23:59:59 w dniu 31 grudnia 9999 r.

Przykłady

Ten przykład przyjmuje datę i przy użyciu DateAdd funkcji wyświetla odpowiednią datę określoną liczbę miesięcy w przyszłości.

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)

Uwagi

Możesz użyć DateAdd funkcji , aby dodać lub odjąć określony interwał czasu od daty. Na przykład możesz obliczyć datę 30 dni od dzisiaj lub godzinę 45 minut wcześniej.

Aby dodać dni do DateValueprogramu , możesz użyć DateInterval.Daypolecenia , DateInterval.DayOfYearlub DateInterval.Weekday. Są one traktowane jako równoważne, ponieważ DayOfYear i Weekday nie są znaczącymi interwałami czasu.

Funkcja DateAdd nigdy nie zwraca nieprawidłowej daty. W razie potrzeby część dnia wynikowej daty zostanie skorygowana w dół do ostatniego dnia wynikowego miesiąca w wynikowym roku. Poniższy przykład dodaje miesiąc do 31 stycznia:

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

W tym przykładzie DateAdd zwraca wartość #2/28/1995#, a nie #2/31/1995#. Jeśli DateValue to #1/31/1996#, zwraca wartość #2/29/1996# , ponieważ rok 1996 jest rokiem przestępnym.

Uwaga

DateAdd używa bieżącego ustawienia kalendarza z CurrentCulture właściwości CultureInfo klasy w System.Globalization przestrzeni nazw. Wartości domyślne CurrentCulture są określane przez ustawienia Panel sterowania.

Ponieważ każda Date wartość jest obsługiwana DateTime przez strukturę, jej metody zapewniają dodatkowe opcje dodawania interwałów czasu. Na przykład można dodać liczbę ułamkową dni zaokrągloną do najbliższej milisekundy do zmiennej Date w następujący sposób:

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

Argument Interval może mieć jedno z następujących ustawień.

Wartość wyliczenia	Ciąg	Jednostka interwału czasu do dodania
DateInterval.Day	d	Dzień; obcięty do wartości całkowitej
DateInterval.DayOfYear	Y	Dzień; obcięty do wartości całkowitej
DateInterval.Hour	h	Godziny; zaokrąglone do najbliższej milisekundy
DateInterval.Minute	n	Minut; zaokrąglone do najbliższej milisekundy
DateInterval.Month	m	Miesiąc; obcięty do wartości całkowitej
DateInterval.Quarter	q	Kwartale; obcięty do wartości całkowitej
DateInterval.Second	s	Drugi; zaokrąglone do najbliższej milisekundy
DateInterval.Weekday	w	Dzień; obcięty do wartości całkowitej
DateInterval.WeekOfYear	ww	Tygodniu; obcięty do wartości całkowitej
DateInterval.Year	yyyy	Roku; obcięty do wartości całkowitej

Zobacz też

• DateDiff
• DatePart
• Day(DateTime)
• Format(Object, String)
• Now
• Weekday(DateTime, FirstDayOfWeek)
• Year(DateTime)
• Typ danych — Podsumowanie (Visual Basic)

DateAdd(String, Double, Object)

Źródło:

DateAndTime.vb

Zwraca wartość zawierającą wartość daty i godziny, do której został dodany określony interwał czasu.

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

Parametry

Interval

String

Wymagane. DateInterval Wartość wyliczenia lub wyrażenie ciągu reprezentujące interwał czasu, który chcesz dodać.

Number

Double

Wymagane. Wyrażenie zmiennoprzecinkowe reprezentujące liczbę interwałów, które chcesz dodać. Number może być dodatni (aby uzyskać wartości daty/godziny w przyszłości) lub ujemne (aby uzyskać wartości daty/godziny w przeszłości). Może zawierać część ułamkową, gdy Interval określa godziny, minuty lub sekundy. W przypadku innych wartości elementu każda Intervalczęść Number ułamkowa elementu jest ignorowana.

DateValue

Object

Wymagane. Wyrażenie reprezentujące datę i godzinę dodania interwału. DateValue sama nie jest zmieniana w programie wywołującym.

Zwraca

DateTime

Wartość zawierająca wartość daty i godziny, do której został dodany określony interwał czasu.

Wyjątki

InvalidCastException

DateValue nie jest coercible do Date.

ArgumentException

Interval jest nieprawidłowa.

ArgumentOutOfRangeException

Data obliczeniowa jest przed 00:00:00 1 stycznia roku 1 lub nowsza niż 23:59:59 w dniu 31 grudnia 9999 r.

Przykłady

Ten przykład przyjmuje datę i przy użyciu DateAdd funkcji wyświetla odpowiednią datę określoną liczbę miesięcy w przyszłości.

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)

Uwagi

Możesz użyć DateAdd funkcji , aby dodać lub odjąć określony interwał czasu od daty. Na przykład możesz obliczyć datę 30 dni od dzisiaj lub godzinę 45 minut wcześniej.

Aby dodać dni do DateValueprogramu , możesz użyć DateInterval.Daypolecenia , DateInterval.DayOfYearlub DateInterval.Weekday. Są one traktowane jako równoważne, ponieważ DayOfYear i Weekday nie są znaczącymi interwałami czasu.

Funkcja DateAdd nigdy nie zwraca nieprawidłowej daty. W razie potrzeby część dnia wynikowej daty zostanie skorygowana w dół do ostatniego dnia wynikowego miesiąca w wynikowym roku. Poniższy przykład dodaje miesiąc do 31 stycznia:

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

W tym przykładzie DateAdd zwraca wartość #2/28/1995#, a nie #2/31/1995#. Jeśli DateValue to #1/31/1996#, zwraca wartość #2/29/1996# , ponieważ rok 1996 jest rokiem przestępnym.

Uwaga

DateAdd używa bieżącego ustawienia kalendarza z CurrentCulture właściwości CultureInfo klasy w System.Globalization przestrzeni nazw. Wartości domyślne CurrentCulture są określane przez ustawienia Panel sterowania.

Ponieważ każda Date wartość jest obsługiwana DateTime przez strukturę, jej metody zapewniają dodatkowe opcje dodawania interwałów czasu. Na przykład można dodać liczbę ułamkową dni zaokrągloną do najbliższej milisekundy do zmiennej Date w następujący sposób:

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

Argument Interval może mieć jedno z następujących ustawień.

Wartość wyliczenia	Ciąg	Jednostka interwału czasu do dodania
DateInterval.Day	d	Dzień; obcięty do wartości całkowitej
DateInterval.DayOfYear	Y	Dzień; obcięty do wartości całkowitej
DateInterval.Hour	h	Godziny; zaokrąglone do najbliższej milisekundy
DateInterval.Minute	n	Minut; zaokrąglone do najbliższej milisekundy
DateInterval.Month	m	Miesiąc; obcięte do wartości całkowitej
DateInterval.Quarter	q	Kwartale; obcięte do wartości całkowitej
DateInterval.Second	s	Drugi; zaokrąglone do najbliższej milisekundy
DateInterval.Weekday	w	Dzień; obcięty do wartości całkowitej
DateInterval.WeekOfYear	ww	Tygodniu; obcięte do wartości całkowitej
DateInterval.Year	yyyy	Roku; obcięte do wartości całkowitej

Zobacz też

• DateDiff
• DatePart
• Day(DateTime)
• Format(Object, String)
• Now
• Weekday(DateTime, FirstDayOfWeek)
• Year(DateTime)
• Typ danych — Podsumowanie (Visual Basic)