Funkcija DatePart

Atgriež Variant (Integer) vērtību, kas ietver konkrēta datuma norādīto daļu.

Brīdinājums Šīs funkcijas lietojumā radās problēma. Dažu kalendāro gadu pēdējo pirmdienu var atgriezt kā 53. nedēļu, bet tai vajadzētu būt 1. nedēļai. Papildinformāciju un risinājumu skatiet sadaļā Formāts vai DatePart funkcijas var atgriezt nepareizu nedēļas numuru gada pēdējai pirmdienai.

Sintakse

DatePart(intervāls, datums [, pirmā_nedēļas] [, pirmā_gada_nedēļa] )

Funkcijas DatePart sintaksei ir šādi argumenti:

Arguments	Apraksts
intervāls	Obligāts arguments. Virknes izteiksme, kas ir atgriežamais laika intervāls.
datums	Obligāts arguments. Novērtējamā varianta (datuma) vērtība.
pirmā_nedēļas_diena	Neobligāts arguments. Konstante, kas norāda nedēļas pirmo dienu. Ja nav norādīta, tiek pieņemts, ka tā ir svētdiena.
pirmā_gada_nedēļa	Neobligāts arguments. Konstante, kas norāda gada pirmo nedēļu. Ja nav norādīta, tiek pieņemts, ka pirmā nedēļa ir nedēļa, kurā ir 1. janvāris.

Iestatījumi

Intervāla argumentam ir šādi iestatījumi:

Iestatījums	Apraksts
gggg	Gads
q	Ceturksnis
m	Mēnesis
y	Gada diena
d	Diena
w	Weekday
ww	Nedēļa
h	Stunda
n	Minūte
s	Sekunde

Argumentam pirmā_nedēļas_diena ir šādi iestatījumi:

Konstante	Vērtība	Apraksts
vbUseSystem	0	Izmantojiet NLS API iestatījumu.
vbSunday	1	Svētdiena (noklusējums)
vbPirmdiena	2	Pirmdiena
vbOtrdiena	3	Otrdiena
vbWednesday	4	Trešdiena
vbCeturtdiena	5	Ceturtdiena
vbFriday	6	Piektdiena
vbSestdiena	7	Sestdiena

Argumentam pirmā_gada_nedēļa ir šādi iestatījumi:

Konstante	Vērtība	Apraksts
vbUseSystem	0	Izmantojiet NLS API iestatījumu.
vbPirmaisJan1	1	Sākas ar nedēļu, kurā ir 1. janvāris (noklusējums).
vbFirstFourDays	2	Sāciet ar pirmo nedēļu, kurai ir vismaz četras dienas jaunajā gadā.
vbPirmāPilnā nedēļa	3	Sāciet ar pirmo pilno gada nedēļu.

Piezīmes

Varat izmantot funkciju DatePart , lai novērtētu datumu un atgrieztu noteiktu laika intervālu. Piemēram, varat izmantot DatePart , lai aprēķinātu nedēļas dienu vai pašreizējo stundu.

Arguments pirmā_nedēļas_diena ietekmē aprēķinus, kuros tiek izmantoti intervāla simboli "w" un "ww".

Ja datums ir datuma literālis, norādītais gads kļūst par šī datuma pastāvīgu sastāvdaļu. Tomēr, ja datums ir iekļauts dubultajās pēdiņās (" ") un gads tiek izlaists, katru reizi, kad tiek novērtēta datuma izteiksme, kodā tiek ievietots pašreizējais gads. Tas ļauj uzrakstīt kodu, ko var izmantot dažādos gados.

Atgrieztā datuma daļa ir norādīta pašreizējā arābu kalendāra laika perioda vienībās. Piemēram, ja pašreizējais kalendārs ir Hidžras un atgriežamā datuma daļa ir gads, gada vērtība ir Hidžras gads.

Vaicājumu piemēri

Izteiksme	Rezultāti
SELECT DatePart("yyyy",[DateofSale]) AS NewDate FROM ProductSales;	Atgriež lauka "Pārdošanas datums" datuma vērtību 'Gads'.
SELECT DatePart("q",[Sale_datums]) AS NewDate FROM ProductSales;	Atgriež lauka "Pārdošanas datums" datuma vērtību "Ceturksnis" (atbilstoši kalendāra gadam).
SELECT DatePart("y",[Sale_datums]) AS NewDate FROM ProductSales;	Atgriež lauka "Pārdošana_datums" datuma vērtību 'Gada diena' (no 1 līdz 365).
SELECT DatePart("d",[Sale_datums]) AS NewDate FROM ProductSales;	Atgriež lauka "Pārdošanas datums" datuma vērtību 'Diena'.
SELECT DatePart("w",[Sale_datums]) AS NewDate FROM ProductSales;	Atgriež lauka "DateofSale" datuma vērtību 'Weekday' (no 1 līdz 7, kur 1 apzīmē svētdienu) vērtību 'Weekday' (no 1 līdz 7, kur 1 apzīmē svētdienu)
SELECT DatePart("ww",[DateofSale]) AS NewDate FROM ProductSales;	Atgriež lauka "Pārdošanas datums" datuma vērtību 'Nedēļas numurs' (no 1 līdz 52).
SELECT DatePart("h",[DateTime]) AS NewDate FROM ProductSales;	Atgriež lauka "Datums/laiks" datuma vērtību vērtību "Hour".
SELECT DatePart("n",[DateTime]) AS NewDate FROM ProductSales;	Atgriež lauka "Datums/laiks" datuma vērtību "Minūtes".
SELECT DatePart("s",[DateTime]) AS NewDate FROM ProductSales;	Atgriež lauka "DateTime" datuma vērtību "sekundes".

VBA piemērs

Šajā piemērā tiek iegūts datums, un, izmantojot funkciju DatePart , tiek parādīts tā gada ceturksnis, kurā tas ir.

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

Pareizās datuma funkcijas izvēle