Daje tip podataka Varijanta (Datum) za navedenu godinu, mesec i dan.
Sintaksa
DateSerial ( godina, mesec, dan )
Upozorenje Uverite se da su argumenti u ispravnom opsegu vrednosti. Nevažeći argument može dati netačan rezultat.
Sintaksa funkcije DateSerial ima sledeće argumente:
Argument |
Opis |
Godine |
Obavezno. Ceo broj. Broj između 100 i 9999, uklјučivanje ili brojni izraz. |
Meseca |
Obavezno. Ceo broj. Bilo koji numerički izraz. |
Dan |
Obavezno. Ceo broj. Bilo koji numerički izraz. |
Napomene
Da biste naveli datum, kao što je 31. decembar 1991, opseg brojeva za svaki argument datuma trebalo bi da bude u prihvaćenom opsegu za jedinicu; npr. 1–31 za dane i od 1 do 12 za mesece. Međutim, možete da navedete i relativne datume za svaki argument pomoću bilo kog numeričkog izraza koji predstavlja određeni broj dana, meseci ili godina pre ili posle određenog datuma.
Sledeći primer koristi numeričke izraze umesto apsolutnih brojeva datuma. Ovde funkcija DateSerial vraća datum koji je dan pre prvog dana (1 - 1), dva meseca pre avgusta (8 - 2), 10 godina pre 1990. (1990 - 10); drugim rečima, 31.
DateSerial(1990 - 10, 8 - 2, 1 - 1)
Dvocifrena godina za argument godina tumače se na osnovu korisnički definisanih postavki računara. Podrazumevane postavke su da se vrednosti između 0 i 29, uklјuče, tumače kao godine 2000–2029. Podrazumevane vrednosti između 30 i 99 tumače se kao godine 1930–1999. Za sve ostale argumente godine koristite četvorocifrenom godinom (na primer, 1800).
Verzije operativnog sistema Windows starije od operativnog sistema Windows 2000 tumače dvocifrene godine na osnovu podrazumevanih vrednosti opisanih iznad. Da biste bili sigurni da funkcija vraća odgovarajuću vrednost, koristite četvorocifreni broj godina.
Kada neki od argumenata premašuje prihvaćeni opseg za taj argument, on se, po potrebi, povećava na sledeću veću jedinicu. Na primer, ako navedete 35 dana, on se procenjuje kao jedan mesec i neki broj dana, u zavisnosti od toga gde se primenjuje u godini. Ako je neki od argumenata izvan opsega od -32.768 do 32.767, dolazi do greške. Ako datum naveden u tri argumenta ne spada izvan prihvatljivog opsega datuma, dolazi do greške.
Napomena: Za godinu, mesec i dan, ako je postavka svojstva Kalendar gregorijanski, pretpostavlja se da je navedena vrednost gregorijanski. Ako je postavka svojstva Kalendar Hidžra, pretpostavlja se da je navedena vrednost Hidžra.
Dobijeni deo datuma je u jedinicama vremenskog perioda trenutnog Visual Basic kalendara. Na primer, ako je trenutni kalendar hidžra kalendar, a deo sa datumom koji treba da se vrati je godina, vrednost godine je Hidžra godina. Za argumentnu godinu vrednosti između 0 i 99, uklјučene, tumače se kao godine 1400-1499. Za sve ostale vrednosti godine koristite kompletnu četvorocifrenom godinom (na primer, 1520).
Primer upita
Izraz |
Rezultati |
SELECT Dateserial(2018,12,13) AS NewDate FROM ProductSales; |
Daje "datum" za navedenu godinu, mesec i dan uneti u argumente funkcije i prikazuje se u koloni "Novi Datum". Rezultat: "13.12.2018.". |
VBA primer
Napomena: Primeri koji slede pokazuju upotrebu ove funkcije u Visual Basic for Applications (VBA) modulu. Za više informacija o radu sa VBA modulom izaberite stavku Referenca razvojnog programera sa padajuće liste pored stavke Pretraga i unesite termine u polje za pretragu.
Ovaj primer koristi funkciju DateSerial da bi se dobio datum za navedenu godinu, mesec i dan.
Dim MyDate ' MyDate contains the date for February 12, 1969. MyDate = DateSerial(1969, 2, 12) ' Return a date.