Funkcija DatePart

Velja za
Access za Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Vrne podatkovni tip Različica (celo število), ki vsebuje navedeni del podanega datuma.

Opozorilo Pri uporabi te funkcije je prišlo do težave. Zadnji ponedeljek v nekaterih koledarskih letih je mogoče vrniti kot teden 53, ko bi moral biti 1 teden. Če želite več informacij in nadomestno rešitev, glejte Funkciji Format ali DatePart lahko vrneta napačno številko tedna za zadnji ponedeljek v letu.

Sintaksa

DatePart(interval, datum [, prvi dan v tednu] [, prvi teden v letu] )

Sintaksa funkcije DatePart ima te argumente:

Argument Opis
Interval Obvezno. Izraz niza, ki je časovni interval, ki ga želite vrniti.
datum Obvezno. Vrednost Variant (datum), ki jo želite ovrednotiti.
prvi dan v tednu Neobvezen. Konstanta, ki določa prvi dan v tednu. Če ni določena, se domneva, da je to nedelja.
Prvi teden v letu Izbirno. Konstanta, ki določa prvi teden v letu. januar.

Nastavitve

Argument intervala ima te nastavitve:

Nastavitev Opis
yyyy Leto
q Četrtletje
m Mesec
y Dan v letu
d Dan
w Delovni dan
ww Teden
h Ura
n Minuta
s Sekunda

Argument prvi dan v tednu ima te nastavitve:

Konstanta Vrednost Opis
vbUseSystem 0 Uporabite nastavitev NLS API.
vbSunday 1 Nedelja (privzeto)
vbMonday 2 Ponedeljek
vbTuesday 3 Torek
vbWednesday 4 Sreda
vbThursday 5 Četrtek
vbFriday 6 Petek
vbSaturday 7 Sobota

Argument prvi teden v letu ima te nastavitve:

Konstanta Vrednost Opis
vbUseSystem 0 Uporabite nastavitev NLS API.
vbFirstJan1 1 Začnite s tednom, v katerem je 1. januar (privzeto).
vbFirstFourDays 2 Začnite s prvim tednom, ki ima vsaj štiri dni v novem letu.
vbFirstFullWeek 3 Začnite s prvim popolnim tednom v letu.

Opombe

Funkcijo DatePart lahko uporabite, da ovrednotite datum in vrnete določen časovni interval. Na primer, funkcijo DatePart lahko uporabite za izračun dneva v tednu ali trenutne ure.

Argument prvi dan v tednu vpliva na izračune, ki uporabljajo simbole intervala »w« in »ww«.

Če je datum dobesedni datum, navedeno leto postane trajen del tega datuma. Vendar pa, če je datum med dvojnimi narekovaji (" "), in izpustite leto, se trenutno leto vstavi v kodo vsakič, ko se ovrednoti izraz datum. To omogoča zapis kode, ki jo je mogoče uporabiti v različnih letih.

Opomba

Če je lastnost Calendar nastavljena na gregorijanski, mora biti za datum podan datum gregorijanskega koledarja. Če gre za islamski koledar, mora biti podan datum iz islamskega koledarja.

Vrnjeni del datuma je v enotah časovnega obdobja trenutnega arabskega koledarja. Na primer, če gre za trenutni islamski koledar in je del datuma, ki ga želite vrniti leto, bo vrednost leta leto islamskega koledarja.

Primeri poizvedb

Izraz Rezultati
SELECT DatePart("yyyy",[DateofSale]) AS NewDate FROM ProductSales; Vrne »Leto« datumskih vrednosti polja »DateofSale«.
SELECT DatePart("q",[DateofSale]) AS NewDate FROM ProductSales; Vrne »Četrtletje« (na osnovi leta koledarjev) datumskih vrednosti polja »DateofSale«.
SELECT DatePart("y",[DateofSale]) AS NewDate FROM ProductSales; Vrne »Dan v letu« (od 1 do 365) datumskih vrednosti polja »DateofSale«.
SELECT DatePart("d",[DateofSale]) AS NewDate FROM ProductSales; Vrne »Dan« datumskih vrednosti polja »DateofSale«.
SELECT DatePart("w",[DateofSale]) AS NewDate FROM ProductSales; Vrne vrednost »Delovni dan« (od 1 do 7, kjer 1 predstavlja nedeljo) datumskih vrednosti polja »DateofSale«.
SELECT DatePart("ww",[DateofSale]) AS NewDate FROM ProductSales; Vrne »Številka tedna« (od 1 do 52) datumskih vrednosti polja »DateofSale«.
SELECT DatePart("h",[DateTime]) AS NewDate FROM ProductSales; Vrne »Ura« datumskih vrednosti polja »DateTime«.
SELECT DatePart("n",[DateTime]) AS NewDate FROM ProductSales; Vrne »Minute« datumskih vrednosti polja »DateTime«.
SELECT DatePart("s",[DateTime]) AS NewDate FROM ProductSales; Vrne »sekunde« datumskih vrednosti polja »DateTime«.

primer VBA

Opomba

V spodnjih primerih je prikazana uporaba te funkcije v modulu Visual Basic for Applications (VBA). Če želite več informacij o delu z modulom VBA, izberite Vsebina za razvijalce na spustnem seznamu ob možnosti Iskanje in v iskalno polje vnesite enega ali več izrazov.

V tem primeru je uporabljen datum in s funkcijo DatePart prikazano četrtletje v letu, v katerem je.

Dim TheDate As Date    ' Declare variables.
Dim Msg    
TheDate = InputBox("Enter a date:")
Msg = "Quarter: " & DatePart("q", TheDate)
MsgBox Msg

Izbira ustrezne funkcije za datum