الدالة DatePart

تقوم بإرجاع متغير ‏(عدد صحيح) يحتوي على الجزء المحدد لتاريخ معين.

ملاحظه    هناك مشكله في استخدام هذه الدالة. يمكن إرجاع آخر يوم الاثنين في بعض سنوات التقويم علي انه أسبوع 53 عندما يجب ان يكون الأسبوع 1. للحصول علي مزيد من المعلومات والحل البديل ، راجع يمكن ان يرجع الدالة Format أو DatePart رقم أسبوع غير صحيح لأول يوم في السنه.

بناء الجملة

DatePart ( interval, date [, أسبوع] [, أول أسابيع] )

يحتوي بناء جمله الدالة DatePart علي الوسيطتين التاليتين:

الوسيطة

الوصف

interval

مطلوبة. تعبير سلسله أحرف يمثل الفاصل الزمني الذي تريد إرجاعه.

تاريخ

مطلوبة. القيمة Variant (تاريخ) التي تريد تقييمها.

أسبوع

اختيارية. ثابت يحدد اليوم الأول من الأسبوع. إذا لم يتم تحديد هذا الخيار ، سيتم افتراض اليوم.

أول أسابيع

اختيارية. ثابت يحدد الأسبوع الأول من السنه. إذا لم يتم تحديد هذا الخيار ، سيتم افتراض ان الأسبوع الأول هو الأسبوع الذي يقع فيه يناير 1.

الإعدادات

تتضمن الوسيطة interval الإعدادات التالية:

الإعداد

الوصف

yyyy

السنة

q

ربع السنة

m

الشهر

y

يوم من السنه

d

يوم

w

Weekday

ww

الأسبوع

h

الساعة

د

الدقيقة

s

الثانية

تتضمن الوسيطة أسبوع الإعدادات التالية:

ثابت

القيمة

الوصف

فبوسيسيستيم

0

استخدم الاعداد الخاص ب واجهه برمجه التطبيق الخاصة ب NLS.

فبسونداي

1

الأحد (افتراضي)

فبمونداي

2

الاثنين

فبتويسداي

3

الثلاثاء

فبويدنيسداي

4

الأربعاء

فبثورسداي

5

الخميس

فبفريداي

6

الجمعة

فبساتورداي

7

السبت

تتضمن الوسيطة أول أسابيع الإعدادات التالية:

ثابت

القيمة

الوصف

فبوسيسيستيم

0

استخدم الاعداد الخاص ب واجهه برمجه التطبيق الخاصة ب NLS.

vbFirstJan1

1

البدء بالأسبوع الذي يحدث فيه يناير 1 (افتراضي).

فبفيرستفوردايس

2

البدء بالأسبوع الأول الذي يحتوي علي أربعه أيام علي الأقل في السنه الجديدة.

فبفيرستفولويك

3

البدء بالأسبوع الكامل الأول من السنه.

ملاحظات

يمكنك استخدام الدالة DatePart لتقييم تاريخ وإرجاع فاصل زمني معين. علي سبيل المثال ، قد تستخدم DatePart لحساب يوم الأسبوع أو الساعة الحالية.

تؤثر الوسيطة أسبوع علي العمليات الحسابية التي تستخدم رموز الفاصل "w" و "ww".

إذا كانت قيمه العبارة التي تم تحديدها في البيانات ، فان السنه المحدد أحرف التاريخ ه تصبح جزءا دائما من هذا التاريخ ومع ذلك ، إذا كان التاريخ محاطا بعلامات اقتباس مزدوجة ("") ، وقامت بحذف السنه ، سيتم ادراج السنه الحالية في التعليمات البرمجية في كل مره يتم فيها تقييم تعبير التاريخ . يؤدي ذلك إلى امكانيه كتابه التعليمات البرمجية التي يمكن استخدامها في سنوات مختلفه.

ملاحظة: بالنسبة إلى التاريخ، إذا كان اعداد خاصيه التقويم ميلاديا ، فيجب ان يكون التاريخ ميلاديا. إذا كان التقويم هجريا ، يجب ان يكون التاريخ هجريا.

يكون جزء التاريخ الذي يتم إرجاعه في الوحدات الزمنيه للتقويم العربي الحالي. علي سبيل المثال ، إذا كان التقويم الحالي هجريا وكان جزء التاريخ الذي سيتم إرجاعه هو السنه ، ستكون قيمه السنه سنه هجرية.

أمثله استعلام

التعبير

النتائج

حدد DatePart ("yyyy", [داتيوفسالي]) ك نيوداتي من برودوكتساليس;

ترجع ' Year ' لقيم التاريخ للحقل "داتيوفسالي".

حدد DatePart ("q", [داتيوفسالي]) ك نيوداتي من برودوكتساليس;

ترجع "ربع السنه" (بالاستناد إلى سنه تقويم) لقيم التاريخ للحقل "داتيوفسالي".

حدد DatePart ("y", [داتيوفسالي]) ك نيوداتي من برودوكتساليس;

ترجع "يوما من السنه" (1 إلى 365) لقيم تاريخ الحقل "داتيوفسالي".

حدد DatePart ("d", [داتيوفسالي]) ك نيوداتي من برودوكتساليس;

ترجع الدالة ' Day ' من قيم التاريخ للحقل "داتيوفسالي".

حدد DatePart ("w", [داتيوفسالي]) ك نيوداتي من برودوكتساليس;

إرجاع ' يوم الأسبوع ' (من 1 إلى 7 حيث يمثل اليوم 1) قيم التاريخ للحقل "داتيوفسالي".

حدد DatePart ("ww", [داتيوفسالي]) كنيوداتي من برودوكتساليس ؛

إرجاع ' رقم الأسبوع ' (من 1 إلى 52) لقيم التاريخ للحقل "داتيوفسالي".

حدد DatePart ("h", [DateTime]) AS نيوداتي FROM برودوكتساليس;

ترجع هذه الدالة ' ساعة ' لقيم التاريخ للحقل "DateTime".

حدد DatePart ("n", [DateTime]) ك نيوداتي من برودوكتساليس;

ترجع هذه الدالة ' دقائق ' لقيم التاريخ للحقل "DateTime".

حدد DatePart ("s", [DateTime]) نيوداتي FROM برودوكتساليس;

ترجع هذه الدالة القيمتين ' ثواني ' للحقل ' 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

انظر أيضاً

اختيار الدالة date الصحيحة

تعزيز مهارات Office
استكشاف التدريب
الحصول على الميزات الجديدة أولاً
الانضمام إلى Office Insider

هل كانت المعلومات مفيدة؟

نشكرك على ملاحظاتك!

شكراً لك على الملاحظات! يبدو أنه من المفيد إيصالك بأحد وكلاء دعم Office لدينا.

×