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 se argumenti nalaze 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 i (12:00 pre podne) i 23 (11:00 posle podne), uključujući i te vrednosti ili numerički 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, na primer 11:59:59, opseg brojeva za svaki argument TimeSerial trebalo bi da bude u normalnom opsegu za jedinicu; To jest, 0–23 za časove i 0–59 za minute i sekunde. Međutim, možete da navedete i relativna vremena za svaki argument pomoću bilo kog numeričkog izraza koji predstavlja neki broj časova, minuta ili sekundi pre ili posle određenog vremena. Sledeći primer koristi izraze umesto apsolutnih brojeva vremena. Funkcija TimeSerial vraća vreme 15 minuta pre (-15), šest sati pre podneva (12 - 6) ili 5:45:00 pre podne.
TimeSerial(12 - 6, -15, 0)
Kada neki od argumenata premaši normalni opseg za taj argument, on se po potrebi povećava na sledeću veću jedinicu. Na primer, ako navedete 75 minuta, procenjuje se jedan čas i 15 minuta. Ako je neki pojedinačni argument izvan opsega od -32,768 do 32,767, dobija se greška. Ako vreme određeno pomoću tri argumenta uzrokuje da datum padne izvan prihvatljivog opsega datuma, dobija se greška.
Query example
| Izraz | Rezultati |
|---|---|
| SELECT TimeSerial(18,12,10) AS NewTime FROM ProductSales GROUP BY TimeSerial(18,12,10); | Daje "Vreme" koje se sastoji od navedenih časova, minuta i sekundi unetih u argumente funkcije i prikazuje se u koloni "NovoVreme". Rezultat: "18:12:10 PM". |
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 sekund.
Dim MyTime
MyTime = TimeSerial(16, 35, 17)
' MyTime contains serial representation of 4:35:17 PM.