Funkcija DateSerial

Atgriež Variant (Date) vērtību norādītajam gadam, mēnesim un dienai.

Sintakse

DateSerial ( gads, mēnesis, diena )

Brīdinājums    Pārliecinieties, vai argumenti ir pareizajā vērtību diapazonā. Nederīgs arguments var izraisīt nepareizus rezultātus.

Funkcijas DateSerial sintaksei ir šādi argumenti.

Arguments

Apraksts

gads

Obligāts. Vesels skaitlis. Skaitlis no 100 līdz 9999, ieskaitot vai skaitliska izteiksme.

mēnesis

Obligāts. Vesels skaitlis. Jebkāda skaitliska izteiksme.

diena

Obligāts. Vesels skaitlis. Jebkāda skaitliska izteiksme.

Piezīmes

Lai norādītu datumu, piemēram, 31. decembris, 1991, skaitļu diapazons katram DateSerialarguments ir jāiekļauj vienības akceptētajā diapazonā; tas ir, 1 – 31 dienām un 1 – 12 mēnešiem. Taču varat arī norādīt relatīvos datumus katram argumentam, izmantojot jebkuru skaitlisku izteiksmi, kas apzīmē noteiktu dienu, mēnešu vai gadu skaitu pirms vai pēc noteikta datuma.

Tālāk sniegtajā piemērā tiek izmantotas skaitliskas izteiksmes, nevis absolūto datumu numuri. Šeit funkcija DateSerial atgriež datumu, kas ir diena pirms pirmās dienas (1 - 1), divus mēnešus pirms augusta (8 - 2) 10 gadus pirms 1990 (1990 - 10). citiem vārdiem, 31. maijs, 1980.

DateSerial(1990 - 10, 8 - 2, 1 - 1)

Gadskaitli gada divciparu gadskaitli tiek interpretēti, ņemot vērā lietotāja definētos datora iestatījumus. Noklusējuma iestatījumi ir, ka vērtības no 0 līdz 29 ieskaitot, tiek interpretētas kā gadi no 2000 līdz 2029. Noklusējuma vērtības no 30 līdz 99 tiek interpretētas kā 1930. – 1999. gadā. Visiem pārējiem gada argumentiem izmantojiet četrciparu gadskaitli (piemēram, 1800).

Windows versijas, kas vecākas par Windows 2000, interpretē divciparu gadus atkarībā no iepriekš aprakstītajiem noklusējumiem. Lai pārliecinātos, vai funkcija atgriež atbilstošo vērtību, izmantojiet četrciparu gadskaitli.

Ja kāds no argumentiem pārsniedz šī argumenta akceptēto diapazonu, tas pakāpeniski pāriet uz nākamo lielāko mērvienību. Piemēram, ja norādāt 35 dienas, tas tiek novērtēts kā viens mēnesis un noteikts dienu skaits atkarībā no tā, kur gadā tas tiek lietots. Ja kāds arguments ir ārpus diapazona-32 768 līdz 32 767, rodas kļūda. Ja trīs argumentu norādītais datums ir ārpus akceptējamā datumu diapazona, rodas kļūda.

Piezīme.: Ja kalendāra rekvizīta iestatījums ir Gregora kalendārs, piemēram, gads, Mēnesisundiena, tiek pieņemts, ka norādītā vērtība ir Gregora. Ja kalendāra rekvizīta iestatījums ir Hidžras Kalendārs , tiek pieņemts, ka norādītā vērtība ir Hidžras sistēmā.

Atgrieztā datuma daļa ir pašreizējā Visual Basic kalendāra laika perioda vienībās. Piemēram, ja pašreizējā kalendāra ir Hidžras kalendārs un atgriežamā datuma daļa ir gads, gada vērtība ir Hidžras gads. Argumenta gadāvērtības no 0 līdz 99, ieskaitot, tiek interpretētas kā years 1400-1499. Visu pārējo gadu vērtībām izmantojiet pilnu četrciparu gadskaitli (piemēram, 1520).

Vaicājuma piemērs

Izteiksme

Rezultāti

ATLASIET DateSerial (2018, 12, 13) kā NewDate no ProductSales.

Tiek atgriezts datums, kas norādīts ar norādīto gadu, mēnesi un dienu un tiek parādīts kolonnā "NewDate". Rezultāts: "13/12/2018".

VBA piemērs

Piezīme.: Turpmākajos piemēros redzama šīs funkcijas izmantošana Visual Basic for Applications (VBA) modulī. Lai iegūtu papildinformāciju par darbu ar VBA, nolaižamajā sarakstā atlasiet Uzziņas materiāli izstrādātājiem blakus meklēšanas lodziņam un ievadiet šajā lodziņā vienu vai vairākus vārdus.

Šajā piemērā funkcija DateSerial tiek izmantota, lai atgrieztu norādītā gada, mēneša un dienas datumu.

Dim MyDate ' MyDate contains the date for February 12, 1969. MyDate = DateSerial(1969, 2, 12) ' Return a date.

Piezīme.:  Šī lapa ir tulkota automatizēti, un tajā var būt gramatiskas kļūdas un neprecizitātes. Mūsu nolūks ir šo saturu padarīt jums noderīgu. Vai jūs varat mūs informēt, vai informācija bija noderīga? Šeit ir raksts angļu valodā jūsu atsaucei.​

Skatiet arī

Pareizās datuma funkcijas izvēle

Paplašiniet savas Office prasmes
Iepazīties ar apmācību
Esiet pirmais, kas saņem jaunās iespējas
Pievienoties Office Insider programmai

Vai šī informācija bija noderīga?

Paldies par jūsu atsauksmēm!

Paldies par atsauksmēm! Šķiet, ka jums varētu būt noderīgi sazināties ar kādu no mūsu Office atbalsta speciālistiem.

×