Daje tip podataka Varijanta (Datum) koji sadrži vreme za određeni čas, minut i sekund.
Sintaksa
TimeSerial ( čas, minut, sekunda )
Upozorenje Uverite se da su argumenti u ispravnom opsegu vrednosti. Nevažeći argument može dati netačan rezultat.
Sintaksa funkcije TimeSerial ima sledeće argumente:
Argument |
Opis |
Sat |
Obavezno. Varijanta (Ceo broj). Broj između 0 (12:00 A.M.) i 23 (11:00), uklјučivanje ili brojni izraz. |
Minut |
Obavezno. Varijanta (Ceo broj). Bilo koji numerički izraz. |
Drugi |
Obavezno. Varijanta (Ceo broj). Bilo koji numerički izraz. |
Napomene
Da biste naveli vreme, kao što je 11:59:59, opseg brojeva za svaki argument TimeSerial trebalo bi da bude u normalnom opsegu za jedinicu; to jesti, 0–23 za časove i 0–59 za minute i sekunde. Međutim, možete da navedete i relativna vremena za argument koristeći bilo koji numerički izraz koji predstavlja određeni broj časova, minuta ili sekundi pre ili posle određenog vremena. Sledeći primer koristi izraze umesto apsolutnih vremenskih brojeva. Funkcija TimeSerial vraća vreme 15 minuta pre (-15) šest sati pre podneva (12 - 6) ili 5:45:00 pre podneva (12 - 6) ili 5:45:00 pre podneva.
TimeSerial(12 - 6, -15, 0)
Kada neki od argumenata premašuje normalni opseg za taj argument, on se, po potrebi, povećavan na sledeću veću jedinicu. Na primer, ako navedete 75 minuta, procenjuje se kao jedan čas i 15 minuta. Ako je neki od argumenata izvan opsega od -32.768 do 32.767, dolazi do greške. Ako vreme navedeno u tri argumenta uzrokuje da datum bude izvan prihvatljivog opsega datuma, dolazi do greške.
Primer upita
Izraz |
Rezultati |
SELECT TimeSerial(18,12,10) AS NewTime FROM ProductSales GROUP BY TimeSerial(18,12,10); |
Vraća "Vreme" koji se sastoji od navedenog sata, minuta i drugog unetog u argumente funkcije i prikazuje se u koloni "Novovreme". Rezultat: "18:12:10". |
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 TimeSerial kako bi vratio vreme za navedeni čas, minut i sekundu.
Dim MyTime
MyTime = TimeSerial(16, 35, 17) ' MyTime contains serial representation of 4:35:17 PM.