DateAndTime.DateAdd Methode

Definitie

Naamruimte:: Microsoft.VisualBasic

Assembly:: Microsoft.VisualBasic.dll

Belangrijk

Bepaalde informatie heeft betrekking op een voorlopige productversie die aanzienlijk kan worden gewijzigd voordat deze wordt uitgebracht. Microsoft biedt geen enkele expliciete of impliciete garanties met betrekking tot de informatie die hier wordt verstrekt.

Retourneert een Date waarde die een datum- en tijdwaarde bevat waaraan een opgegeven tijdsinterval is toegevoegd.

Overloads

Name	Description
DateAdd(DateInterval, Double, DateTime)	Retourneert een waarde die een datum- en tijdwaarde bevat waaraan een opgegeven tijdsinterval is toegevoegd.
DateAdd(String, Double, Object)	Retourneert een waarde die een datum- en tijdwaarde bevat waaraan een opgegeven tijdsinterval is toegevoegd.

DateAdd(DateInterval, Double, DateTime)

Retourneert een waarde die een datum- en tijdwaarde bevat waaraan een opgegeven tijdsinterval is toegevoegd.

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

Parameters

Interval: DateInterval

Required. Een DateInterval opsommingswaarde of een tekenreeksexpressie die het tijdsinterval vertegenwoordigt dat u wilt toevoegen.

Number: Double

Required. Expressie met drijvende komma die het aantal intervallen aangeeft dat u wilt toevoegen. Dit kan positief zijn (om datum-/tijdwaarden in de toekomst op te halen) of negatief (om datum-/tijdwaarden in het verleden op te halen). Het kan een breukdeel bevatten wanneer Interval uren, minuten of seconden worden opgegeven. Voor andere waarden van Intervalwordt een breukdeel van Number een deel genegeerd.

DateValue: DateTime

Required. Een expressie die de datum en tijd aangeeft waarop het interval moet worden toegevoegd. DateValue zelf wordt niet gewijzigd in het aanroepende programma.

Retouren

DateTime

Een waarde met een datum- en tijdwaarde waaraan een opgegeven tijdsinterval is toegevoegd.

Uitzonderingen

InvalidCastException

DateValue is niet coercible aan Date.

ArgumentException

Interval is ongeldig.

ArgumentOutOfRangeException

De berekende datum ligt vóór 00:00:00 op 1 januari van het jaar 1 of later dan 23:59:59 op 31 december 9999.

Voorbeelden

In dit voorbeeld wordt een datum gebruikt en met behulp van de DateAdd functie wordt een overeenkomstige datum weergegeven met een opgegeven aantal maanden in de toekomst.

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)

Opmerkingen

U kunt de DateAdd functie gebruiken om een opgegeven tijdsinterval op tetellen of af te trekken van een datum. U kunt bijvoorbeeld een datum van 30 dagen vanaf vandaag berekenen of een tijd van 45 minuten voor nu.

Als u dagen wilt toevoegen aan DateValue, kunt u gebruiken DateInterval.Day, DateInterval.DayOfYearof DateInterval.Weekday. Deze worden beschouwd als gelijkwaardig omdat DayOfYear en Weekday geen zinvolle tijdsintervallen zijn.

De DateAdd functie retourneert nooit een ongeldige datum. Indien nodig wordt het daggedeelte van de resulterende datum naar beneden aangepast tot de laatste dag van de resulterende maand in het resulterende jaar. In het volgende voorbeeld wordt één maand opgeteld bij 31 januari:

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

In dit voorbeeld retourneert DateAdd#2/28/1995#, niet #2/31/1995#. Als DateValue dat het is #1/31/1996#, wordt het geretourneerd #2/29/1996# omdat 1996 een schrikkeljaar is.

Note

DateAdd gebruikt de huidige agenda-instelling van de CurrentCulture eigenschap van de CultureInfo klasse in de System.Globalization naamruimte. De standaardwaarden CurrentCulture worden bepaald door Configuratiescherm-instellingen.

Omdat elke Date waarde wordt ondersteund door een DateTime structuur, bieden de bijbehorende methoden u extra opties bij het toevoegen van tijdsintervallen. U kunt bijvoorbeeld een fractioneel aantal dagen, afgerond op de dichtstbijzijnde milliseconden, als volgt toevoegen aan een Date variabele:

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

Het Interval argument kan een van de volgende instellingen hebben.

Opsommingswaarde	String	Tijdsinterval dat moet worden toegevoegd
`DateInterval.Day`	d	Dag; afgekapt tot integrale waarde
`DateInterval.DayOfYear`	y	Dag; afgekapt tot integrale waarde
`DateInterval.Hour`	h	Uur; afgerond op dichtstbijzijnde milliseconden
`DateInterval.Minute`	n	Minuut; afgerond op dichtstbijzijnde milliseconden
`DateInterval.Month`	m	Maand; afgekapt tot integrale waarde
`DateInterval.Quarter`	q	Kwartaal; afgekapt tot integrale waarde
`DateInterval.Second`	s	Tweede; afgerond op dichtstbijzijnde milliseconden
`DateInterval.Weekday`	w	Dag; afgekapt tot integrale waarde
`DateInterval.WeekOfYear`	ww	Week; afgekapt tot integrale waarde
`DateInterval.Year`	yyyy	Jaar; afgekapt tot integrale waarde

Zie ook

Van toepassing op

DateAdd(String, Double, Object)