החזרת משתנה (מספר שלם) המכיל את החלק שצוין של תאריך נתון.
|
אזהרה קיימת בעיה בשימוש בפונקציה זו. ביום שני האחרון בכמה שנים קלנדריות ניתן להחזיר כשבוע 53 כאשר הוא אמור להיות שבוע 1. לקבלת מידע נוסף ופתרון, ראה הפונקציות Format או DatePart יכולות להחזיר מספר שבוע שגוי עבור יום שני שעבר בשנה. |
תחביר
DatePart ( interval, date [, firstdayofweek] [, השבוע הראשון בשנה] )
תחביר הפונקציה DatePart מכיל את הארגומנטים הבאים:
|
ארגומנט |
תיאור |
|
interval |
נדרש. ביטוי מחרוזת שהוא מרווח הזמן שברצונך להחזיר. |
|
date |
נדרש. ערך משתנה (תאריך) שברצונך להעריך. |
|
היום הראשון בשבוע |
אופציונלי. תבנית קבוע המציינת את היום הראשון בשבוע. אם לא צוין, הפונקציה מניחה את יום ראשון. |
|
השבוע הראשון בשנה |
אופציונלי. קבוע המציין את השבוע הראשון בשנה. אם לא צוין, ההנחה היא שהשבוע הראשון הוא השבוע שבו חל 1 בינואר. |
הגדרות
ארגומנט מרווח הזמן כולל את ההגדרות הבאות:
|
הגדרה |
תיאור |
|
yyyy |
שנה |
|
q |
רבעון |
|
m |
חודש |
|
y |
יום בשנה |
|
d |
יום |
|
W |
Weekday |
|
ww |
שבוע |
|
H |
שעה |
|
n |
דקה |
|
s |
שניה |
הארגומנט היום הראשון בשבוע כולל את ההגדרות הבאות:
|
קבוע |
Value |
תיאור |
|
vbUseSystem |
0 |
השתמש בהגדרת ה- API של NLS. |
|
vbSunday |
1 |
יום ראשון (ברירת מחדל) |
|
vbMonday |
2 |
שני |
|
יום שלישי של vb |
3 |
שלישי |
|
vbWednesday |
4 |
רביעי |
|
vbThursday |
5 |
חמישי |
|
יום שישי של vb |
6 |
שישי |
|
vbSaturday |
7 |
שבת |
הארגומנט השבוע הראשון בשנה כולל את ההגדרות הבאות:
|
קבוע |
Value |
תיאור |
|
vbUseSystem |
0 |
השתמש בהגדרת ה- API של NLS. |
|
vbFirstJan1 |
1 |
התחל משבוע שבו חל 1 בינואר (ברירת מחדל). |
|
vbFirstFourDays |
2 |
התחל מהשבוע הראשון הכולל לפחות ארבעה ימים בשנה החדשה. |
|
vbFirstFullWeek |
3 |
התחל מהשבוע המלא הראשון בשנה. |
הערות
באפשרותך להשתמש בפונקציה DatePart כדי להעריך תאריך ולהחזיר מרווח זמן ספציפי. לדוגמה, באפשרותך להשתמש ב- DatePart כדי לחשב את היום בשבוע או את השעה הנוכחית.
הארגומנט היום הראשון בשבוע משפיע על חישובים המשתמשים בסימני מרווחי הזמן "w" ו- "ww".
אם date הוא ליטרל תאריך, השנה שצוינה הופכת לחלק קבוע מתאריך זה. עם זאת, אם date מוקף במרכאות כפולות (" "), ואתה השמטת השנה, השנה הנוכחית נוספת לקוד שלך בכל פעם שביטוי התאריך מוערך. הדבר מאפשר לכתוב קוד שניתן להשתמש בו בשנים שונות.
הערה: עבור תאריך, אם הגדרת המאפיין לוח שנה היא לועזית, התאריך שסופק חייב להיות לועזי. אם לוח השנה הוא איסלמי, התאריך שסופק חייב להיות איסלמי.
חלק התאריך המוחזר הוא ביחידות פרק הזמן של לוח השנה הערבי הנוכחי. לדוגמה, אם לוח השנה הנוכחי הוא איסלמי ותאריך ההחזרה הוא השנה, ערך השנה הוא שנה איסלמית.
דוגמאות שאילתה
|
Expression |
תוצאות |
|
SELECT DatePart("yyyy",[DateofSale]) AS NewDate FROM ProductSales; |
החזרת 'Year' של ערכי התאריך של השדה "DateofSale". |
|
SELECT DatePart("q",[DateofSale]) AS NewDate FROM ProductSales; |
הפונקציה מחזירה את ה- 'Quarter' (בהתבסס על שנת לוח השנה) של ערכי התאריך של השדה "DateofSale". |
|
SELECT DatePart("y",[DateofSale]) AS NewDate FROM ProductSales; |
החזרת 'יום בשנה' (1 עד 365) של ערכי התאריך של השדה "DateofSale". |
|
SELECT DatePart("d",[DateofSale]) AS NewDate FROM ProductSales; |
הפונקציה מחזירה את ה'יום' של ערכי התאריך של השדה "DateofSale". |
|
SELECT DatePart("w",[DateofSale]) AS NewDate FROM ProductSales; |
החזרת 'Weekday' (מ- 1 עד 7 כאשר 1 מייצג את יום ראשון) של ערכי התאריך של השדה "DateofSale". |
|
SELECT DatePart("ww",[DateofSale]) AS NewDate FROM ProductSales; |
החזרת 'מספר שבוע' (מ- 1 עד 52) של ערכי התאריך של השדה "DateofSale". |
|
SELECT DatePart("h",[DateTime]) AS NewDate FROM ProductSales; |
הפונקציה מחזירה את ה- 'Hour' של ערכי התאריך של השדה "DateTime". |
|
SELECT DatePart("n",[DateTime]) AS NewDate FROM ProductSales; |
החזרת 'Minutes' של ערכי התאריך של השדה "DateTime". |
|
SELECT DatePart("s",[DateTime]) AS NewDate FROM ProductSales; |
החזרת ה'שניות' של ערכי התאריך של השדה "DateTime". |
דוגמה ל- VBA
הערה: הדוגמאות הבאות מדגימות את השימוש של פונקציה זו במודול Visual Basic for Applications (VBA). לקבלת מידע נוסף אודות עבודה עם VBA, בחר הפניית מפתח ברשימה הנפתחת שליד חיפוש והזן מונח אחד או יותר בתיבת החיפוש.
דוגמה זו לוקחת תאריך, והשימוש בפונקציה DatePart מציג את רבעון השנה שבו היא מתרחשת.
Dim TheDate As Date ' Declare variables.
Dim Msg
TheDate = InputBox("Enter a date:")
Msg = "Quarter: " & DatePart("q", TheDate)
MsgBox Msg
