DatePart funkcija

Pateikia variantą (sveikąjį skaičių), kuriame yra nurodyta duotos datos dalis.

Sintaksė

DatePart ( intervalas, data [, firstdayofweek] [, firstweekofyear] )

Funkcijos DatePart sintaksė turi tokius argumentus:

Argumentas

Aprašas

intervalas

Būtinas. Eilutės išraiška, kuri yra laiko tarpas, kurį norite grąžinti.

data

Būtinas. Variant (Data) reikšmė, kurią norite įvertinti.

firstdayofweek

Pasirinktinai. konstanta, nurodanti pirmąją savaitės dieną. Jei nenurodyta, ja laikoma sekmadienis.

firstweekofyear

Pasirinktinai. Konstanta, nurodanti pirmąją metų savaitę. Jei nenurodyta, pirmąja savaite laikoma savaitė, kurią yra sausio 1 d.

Parametrai

Intervalas argumentas turi šiuos parametrus:

Parametras

Aprašas

yyyy

Metai

q

Ketvirtis

m

Mėnuo

y

Metų diena

d

Diena

w

Weekday

ww

Savaitė

h

Valanda

n

Minutė

s

Sekundė

Argumentas firstdayofweek turi šiuos parametrus:

Konstanta

Reikšmė

Aprašas

vbUseSystem

0

Naudokite parametrą NLS API.

vbSunday

1

Sekmadienis (numatytasis parametras)

vbMonday

2

Pirmadienis

Vbantradienis

3

Antradienis

Vbtrečiadienis

4

Trečiadienis

Vbketvirtadienį

5

Ketvirtadienis

vbFriday

6

Penktadienis

vbSaturday

7

Šeštadienis

Argumentas firstweekofyear turi šiuos parametrus:

Konstanta

Reikšmė

Aprašas

vbUseSystem

0

Naudokite parametrą NLS API.

vbFirstJan1

1

Pradėkite nuo savaitės, kurioje atsiranda sausio 1 d. (numatytoji reikšmė).

vbFirstFourDays

2

Pradėkite nuo pirmos savaitės, kurios Naujieji metai turi mažiausiai keturias dienas.

vbFirstFullWeek

3

Pradėkite nuo pirmosios visos metų savaitės.

Pastabos

Galite naudoti funkciją DatePart , kad įvertintumėte datą ir grąžintumėte konkretų laiko intervalą. Pavyzdžiui, galite naudoti DatePart , kad apskaičiuotumėte savaitės arba dabartinės valandos dieną.

Argumentas firstdayofweek turi įtakos skaičiavimams, kuriuose naudojami intervalo simboliai "w" ir "ww".

Jei date yra datos literalas, nurodyti metai tampa nuolatine tos datos dalimi. Tačiau, jei data yra dvigubose kabutėse (""), ir jūs nenurodote metų, į kodą įterpiami dabartiniai metai kiekvieną kartą, kai įvertinamas datos reiškinys. Tai leidžia rašyti kodą, kurį galima naudoti skirtingais metais.

Pastaba: Data, jei ypatybės Kalendorius parametras yra Grigaliaus, pateikta data turi būti Grigaliaus. Jei kalendorius yra Hidžri, pateikta data turi būti Hidžri.

Grąžinama datos dalis yra dabartinio arabiško kalendoriaus laikotarpio vienetais. Pvz., jei esamas kalendorius yra Hidžri, o grąžinama datos dalį sudaro metai, metų reikšmė yra Hidžri metai.

Užklausos pavyzdžiai

Reiškinys

Rezultatai

Pasirinkite DatePart ("MMMM", [DateofSale]) kaip NewDate iš ProductSales;

Pateikia lauko "DateofSale" datos reikšmių metus.

Pasirinkite DatePart ("q", [DateofSale]) kaip NewDate iš ProductSales;

Grąžina lauko "DateofSale" datų reikšmes "ketvirtis" (pagal kalendoriaus metus).

Pasirinkite DatePart ("y", [DateofSale]) kaip NewDate iš ProductSales;

Pateikia lauko "DateofSale" datų reikšmes (nuo 1 iki 365).

Pasirinkite DatePart ("d", [DateofSale]) kaip NewDate iš ProductSales;

Pateikia lauko "DateofSale" datos reikšmių "diena".

Pasirinkite DatePart ("w", [DateofSale]) kaip NewDate iš ProductSales;

Pateikia lauko "DateofSale" datos reikšmių datą "WEEKDAY" (nuo 1 iki 7, kur 1 yra sekmadienis).

Pasirinkite DatePart ("ww", [DateofSale]) kaip NewDate iš ProductSales;

Grąžina lauko "DateofSale" datos reikšmių savaitės numerį (nuo 1 iki 52).

Pasirinkite DatePart ("h", [DateTime]) kaip NewDate iš ProductSales;

Pateikia lauko "DateTime" datų reikšmių "valandą".

Pasirinkite DatePart ("n", [DateTime]) kaip NewDate iš ProductSales;

Pateikia lauko "DateTime" datos reikšmių minutes.

Pasirinkite DatePart ("s", [DateTime]) kaip NewDate iš ProductSales;

Grąžina lauko "DateTime" datų reikšmių "sekundes".

VBA pavyzdys

Pastaba: Pateiktuose pavyzdžiuose parodyta, kaip naudoti šią funkciją „Visual Basic for Applications“ (VBA) modulyje. Daugiau informacijos apie darbą su VBA rasite išplečiamajame sąraše pasirinkę Kūrėjų nuoroda (šalia Ieškos) ir ieškos lauke įvedę vieną ar daugiau sąlygų.

Šiame pavyzdyje nurodyta data ir, naudojant funkciją DatePart , rodomas metų, kuriais jis įvyksta, ketvirtis.

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

Pastaba:  Šis puslapis išverstas automatiškai, todėl gali būti gramatikos klaidų ar netikslumų. Mūsų tikslas – padaryti, kad šis turinys būtų jums naudingas. Prašome mus informuoti, ar radote reikiamos informacijos. Čia yra straipsnis anglų kalba, kuriuo galite pasinaudoti kaip nuoroda.

Tobulinkite savo „Office“ įgūdžius
Ieškoti mokymo
Pirmiausia gaukite naujų funkcijų
Prisijunkite prie „Office Insider“ dalyvių

Ar ši informacija buvo naudinga?

Dėkojame už jūsų atsiliepimus!

Dėkojame už jūsų atsiliepimą! Panašu, kad gali būti naudinga jus sujungti su vienu iš mūsų „Office“ palaikymo agentų.

×