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