DateAndTime.DateSerial(Int32, Int32, Int32) Metoda

Reference

Definice

Obor názvů:: Microsoft.VisualBasic

Sestavení:: Microsoft.VisualBasic.Core.dll

Sestavení:: Microsoft.VisualBasic.dll

Zdroj:: DateAndTime.vb

Zdroj:: DateAndTime.vb

Zdroj:: DateAndTime.vb

Důležité

Některé informace platí pro předběžně vydaný produkt, který se může zásadně změnit, než ho výrobce nebo autor vydá. Microsoft neposkytuje žádné záruky, výslovné ani předpokládané, týkající se zde uváděných informací.

Date Vrátí hodnotu představující zadaný rok, měsíc a den s časovými informacemi nastavenými na půlnoc (00:00:00).

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

Parametry

Year: Int32

Povinná hodnota. Celočíselný výraz od 1 do 9999. Akceptují se ale také hodnoty pod tímto rozsahem. Pokud Year je hodnota 0 až 99, je interpretována jako mezi lety 1930 a 2029, jak je vysvětleno v části "Poznámky". Pokud Year je menší než 1, odečte se od aktuálního roku.

Month: Int32

Povinná hodnota. Celočíselný výraz od 1 do 12. Přijaty jsou však i hodnoty mimo tento rozsah. Hodnota Month se odsadí o 1 a použije se na leden počítaného roku. Jinými slovy se k lednu přidá (Month – 1). V případě potřeby se rok přepočítá. Tento efekt znázorňují následující výsledky:

Pokud Month je 1, výsledkem je leden počítaného roku.

Pokud Month je hodnota 0, výsledek je prosinec předchozího roku.

Pokud Month je hodnota -1, výsledek je listopad předchozího roku.

Pokud Month je 13, výsledek je leden následujícího roku.

Day: Int32

Povinná hodnota. Celočíselný výraz od 1 do 31. Přijaty jsou však i hodnoty mimo tento rozsah. Hodnota Day se odsadí o 1 a použije se na první den počítaného měsíce. Jinými slovy se k prvnímu v měsíci přidá (Day - 1). V případě potřeby se měsíc a rok přepočítávají. Tento efekt znázorňují následující výsledky:

Pokud Day je 1, výsledkem je první den počítaného měsíce.

Pokud Day je hodnota 0, výsledkem je poslední den předchozího měsíce.

Pokud Day je hodnota -1, výsledkem je předposlední den předchozího měsíce.

Pokud Day je po konci aktuálního měsíce, výsledkem je odpovídající den následujícího měsíce. Pokud Month je například 4 a Day je 31, výsledek je 1. květen.

Návraty

DateTime

Hodnota, která představuje zadaný rok, měsíc a den s časovými informacemi nastavenými na půlnoc (00:00:00).

Příklady

Tento příklad používá DateSerial funkci k vrácení data pro zadaný rok, měsíc a den.

' 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)

Poznámky

Dvouciferné hodnoty argumentu Year jsou interpretovány na základě nastavení počítače definovaného uživatelem. Výchozí nastavení je, že hodnoty od 0 do 29 se interpretují jako roky 2000–2029 a hodnoty od 30 do 99 se interpretují jako roky 1930–1999. Pokud chcete znamenat všechny ostatní roky, použijte čtyřciferný rok, například 1924.

Následující příklad ukazuje záporné, nulové a kladné hodnoty argumentu. DateSerial Funkce vrátí Date den před prvním březnovým dnem v roce 10 let před aktuálním rokem, jinými slovy poslední den února před deseti lety.

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

Pokud nebo MonthDay překročí jeho normální rozsah, použije se podle potřeby na další větší jednotku. Pokud například zadáte 32 dnů, vyhodnotí se jako jeden měsíc a od jednoho do čtyř dnů v závislosti na hodnotě Month. Pokud Year je větší než 9999 nebo pokud je některý argument mimo rozsah -2 147 483 648 až 2 147 483 647, ArgumentException dojde k chybě. Pokud je datum zadané třemi argumenty dřívější než 00:00:00 1. ledna roku 1 nebo později než 23:59:59 31. prosince 9999, ArgumentOutOfRangeException dojde k chybě.

Datový Date typ zahrnuje časové komponenty. DateSerial nastaví všechny tyto hodnoty na 0, takže vrácená hodnota představuje začátek počítaného dne.

Vzhledem k tomu, že každá Date hodnota je podporována strukturou DateTime , její metody poskytují další možnosti při sestavování Date hodnoty. Můžete například použít jeden z přetížených DateTime konstruktorů k naplnění Date proměnné pomocí požadované kombinace komponent. Následující příklad nastaví NewDateTime na 6. května 1978 v desetině sekundy před 8:30 ráno:

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

Platí pro

Sdílet prostřednictvím