تقوم بإرجاع متغير (عدد صحيح) يحتوي على الجزء المحدد لتاريخ معين.
| تحذير ثمة مشكلة تتعلق باستخدام هذه الدالة. يمكن إرجاع يوم الاثنين الأخير في بعض سنوات التقويم كالأسبوع 53 عندما يجب أن يكون الأسبوع 1. للحصول على مزيد من المعلومات والحل البديل، راجع يمكن أن ترجع الدالات Format أو DatePart رقم أسبوع خاطئ ليوم الاثنين الأخير من السنة. |
|---|
بناء الجملة
DatePart(interval, date [, firstdayofweek] [, firstweekofyear] )
يحتوي بناء جملة الدالة DatePart على الوسيطات التالية:
| الوسيطة | الوصف |
|---|---|
| فاصل | مطلوبة. تعبير سلسلة يمثل الفاصل الزمني الذي تريد إرجاعه. |
| التاريخ | مطلوبة. قيمة المتغير (التاريخ) التي تريد تقييمها. |
| أول أيام الأسبوع | اختيارية. ثابت يحدد اليوم الأول من الأسبوع. إذا لم يكن محددا ، فمن المفترض أن يوم الأحد. |
| أول أسابيع السنة | اختيارية. ثابت يحدد الأسبوع الأول من السنة. إذا لم يكن محددا، فسيتم افتراض أن الأسبوع الأول هو الأسبوع الذي يبدأ ب 1 يناير. |
إعدادات
تتضمن وسيطة الفاصل الزمني هذه الإعدادات:
| الإعداد | الوصف |
|---|---|
| yyyy | السنة |
| q | ربع السنة |
| m | الشهر |
| y | يوم من السنة |
| d | اليوم |
| w | Weekday |
| ww | الأسبوع |
| h | الساعة |
| د | الدقيقة |
| s | الثانية |
تحتوي وسيطة أول أيام الأسبوع على هذه الإعدادات:
| القيمة الثابتة | Value | الوصف |
|---|---|---|
| vbUseSystem | 0 | استخدم إعداد NLS API. |
| vbSunday | 1 | الأحد (افتراضي) |
| vbMonday | 2 | الاثنين |
| vbالثلاثاء | 3 | الثلاثاء |
| vbWednesday | 4 | الأربعاء |
| vbالخميس | 5 | الخميس |
| vbFriday | 6 | الجمعة |
| vbالسبت | 7 | السبت |
تحتوي وسيطة أول أسابيع السنة على هذه الإعدادات:
| القيمة الثابتة | Value | الوصف |
|---|---|---|
| vbUseSystem | 0 | استخدم إعداد NLS API. |
| vbFirstJan1 | 1 | البدء بالأسبوع الذي يبدأ فيه 1 يناير (افتراضي). |
| vbFirstFourDays | 2 | ابدأ بالأسبوع الأول الذي يحتوي على أربعة أيام على الأقل في العام الجديد. |
| vbFirstFullWeek | 3 | ابدأ بأول أسبوع كامل من السنة. |
ملاحظات
يمكنك استخدام الدالة DatePart لتقييم تاريخ وإرجاع فاصل زمني معين. على سبيل المثال، قد تستخدم DatePart لحساب يوم الأسبوع أو الساعة الراهنة.
تؤثر وسيطة أول أيام الأسبوع على العمليات الحسابية التي تستخدم رمزي الفواصل الزمنية "w" و"ww".
إذا كان التاريخ حرفيا، تصبح السنة المحددة جزءا دائما من ذلك التاريخ. ومع ذلك، إذا تم تضمين التاريخ بين علامتي اقتباس مزدوجتين (" ")، وقمت بحذف السنة، فسيتم إدراج السنة الحالية في تعليماتك البرمجية في كل مرة يتم فيها تقييم تعبير التاريخ . هذا يجعل من الممكن كتابة التعليمات البرمجية التي يمكن استخدامها في سنوات مختلفة.
ملاحظة
بالنسبة للتاريخ، إذا كان إعداد خاصية Calendar ميلاديا، فيجب أن يكون التاريخ الموفر ميلاديا. إذا كان التقويم هجريا ، فيجب أن يكون التاريخ المقدم هجري.
يكون جزء التاريخ الذي يتم إرجاعه في الوحدات الزمنية للتقويم العربي الحالي. على سبيل المثال، إذا كان التقويم الحالي هجريا وجزء التاريخ الذي سيتم إرجاعه هو السنة، تكون قيمة السنة عبارة عن سنة هجرية.
أمثلة عن الاستعلام
| التعبير | النتائج |
|---|---|
| SELECT DatePart("yyyy",[DateofSale]) AS NewDate FROM ProductSales; | ترجع "السنة" من قيم تاريخ الحقل "تاريخ البيع". |
| SELECT DatePart("q",[DateofSale]) AS NewDate FROM ProductSales; | ترجع "ربع السنة" (استنادا إلى سنة التقويم) من قيم التاريخ في الحقل "تاريخ البيع". |
| SELECT DatePart("y",[DateofSale]) AS NewDate FROM ProductSales; | ترجع "يوم من السنة" (من 1 إلى 365) من قيم تاريخ الحقل "تاريخ البيع". |
| SELECT DatePart("d",[DateofSale]) AS NewDate FROM ProductSales; | ترجع "اليوم" من قيم تاريخ الحقل "تاريخ البيع". |
| SELECT DatePart("w",[DateofSale]) AS NewDate FROM ProductSales; | ترجع هذه الدالة 'يوم الأسبوع' (من 1 إلى 7 حيث يمثل 1 يوم الأحد) من قيم تاريخ الحقل "تاريخ البيع". |
| SELECT DatePart("ww",[DateofSale]) AS NewDate FROM ProductSales; | ترجع "رقم الأسبوع" (من 1 إلى 52) من قيم تاريخ الحقل "تاريخ البيع". |
| SELECT DatePart("h",[DateTime]) AS NewDate FROM ProductSales; | ترجع "الساعة" من قيم التاريخ في الحقل "DateTime". |
| SELECT DatePart("n",[DateTime]) AS NewDate FROM ProductSales; | إرجاع 'دقائق' من قيم التاريخ في الحقل "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