DateAndTime.DateSerial(Int32, Int32, Int32) Methode

public:
 static DateTime DateSerial(int Year, int Month, int Day);

public static DateTime DateSerial(int Year, int Month, int Day);

static member DateSerial : int * int * int -> DateTime

Public Function DateSerial (Year As Integer, Month As Integer, Day As Integer) As DateTime

Parameters

Retouren

Een waarde die het opgegeven jaar, de maand en de dag vertegenwoordigt, waarbij de tijdgegevens zijn ingesteld op middernacht (00:00:00).

Voorbeelden

In dit voorbeeld wordt de DateSerial functie gebruikt om de datum voor het opgegeven jaar, de maand en de dag te retourneren.

' DateSerial returns the date for a specified year, month, and day.
Dim aDate As Date
' Variable aDate contains the date for February 12, 1969.
aDate = DateSerial(1969, 2, 12)
Console.WriteLine(aDate)

' The following example uses DateSerial to determine and display
' the last day of the previous month.
' First, establish a starting date.
Dim startDate = #1/23/1994#
' The 0 for the day represents the last day of the previous month.
Dim endOfLastMonth = DateSerial(startDate.Year, startDate.Month, 0)
Console.WriteLine("Last day in the previous month: " & endOfLastMonth)

' The following example finds and displays the day of the week that the 
' 15th day of the following month will fall on.
Dim fifteenthsDay = DateSerial(Today.Year, Today.Month + 1, 15)
Console.WriteLine("The 15th of next month is a {0}", fifteenthsDay.DayOfWeek)

Opmerkingen

Tweecijferige waarden voor het argument worden geïnterpreteerd op basis van door de Year gebruiker gedefinieerde computerinstellingen. De standaardinstellingen zijn dat waarden van 0 tot en met 29 worden geïnterpreteerd als de jaren 2000-2029 en waarden van 30 tot en met 99 worden geïnterpreteerd als de jaren 1930-1999. Als u alle andere jaren wilt ondertekenen, gebruikt u een jaar van vier cijfers, bijvoorbeeld 1924.

In het volgende voorbeeld ziet u negatieve waarden, nul en positieve argumenten. Hier retourneert de DateSerial functie een Date representatie van de dag vóór de eerste dag van maart in het jaar 10 jaar vóór het huidige jaar, met andere woorden, de laatste dag van februari tien jaar geleden.

Dim EndFeb As Date = DateSerial(-10, 3, 0)

Als het normale bereik wordt Month overschreden of Day wordt overschreden, wordt deze indien van toepassing toegepast op de volgende grotere eenheid. Als u bijvoorbeeld 32 dagen opgeeft, wordt deze geëvalueerd als één maand en van één tot vier dagen, afhankelijk van de waarde van Month. Als Year dit groter is dan 9999 of als een van de argumenten buiten het bereik -2.147.483.648 tot en met 2.147.483.647 valt, treedt er een ArgumentException fout op. Als de datum die is opgegeven door de drie argumenten ouder is dan 00:00:00 op 1 januari van het jaar 1 of hoger dan 23:59:59 op 31 december 9999, treedt er een ArgumentOutOfRangeException fout op.

Het Date gegevenstype bevat tijdonderdelen. DateSerial stelt al deze waarden in op 0, dus de geretourneerde waarde vertegenwoordigt het begin van de berekende dag.

Omdat elke Date waarde wordt ondersteund door een DateTime structuur, bieden de bijbehorende methoden u extra opties bij het samenstellen van een Date waarde. U kunt bijvoorbeeld een van de overbelaste DateTime constructors gebruiken om een Date variabele te vullen met behulp van de gewenste combinatie van onderdelen. In het volgende voorbeeld wordt ingesteld NewDateTime op 6 mei 1978 om een tiende van een seconde voor 8:30 in de ochtend:

Dim NewDateTime As Date = New Date(1978, 5, 6, 8, 29, 59, 900)

Zie ook

• DateValue(String)
• Day(DateTime)
• Month(DateTime)
• Now
• TimeSerial(Int32, Int32, Int32)
• TimeValue(String)
• Weekday(DateTime, FirstDayOfWeek)
• Year(DateTime)
• System
• Gegevenstypesamenvatting (Visual Basic)