تقوم بإرجاع متغير (تاريخ) لسنة معيّنة أو شهر معيّن أو يوم معيّن.
بناء الجملة
DateSerial(year, month, day)
تحذير تأكد من أن الوسيطات موجودة في نطاق القيم الصحيح. يمكن أن ينتج عن وسيطة غير صحيحة نتيجة غير صحيحة.
يحتوي بناء جملة الدالة DateSerial على الوسيطات التالية:
| الوسيطة | الوصف |
|---|---|
| السنة | مطلوبة. عدد صحيح. رقم بين 100 و9999، متضمنا هذين الرقمين، أو تعبير رقمي. |
| الشهر | مطلوبة. عدد صحيح. أي تعبير رقمي. |
| يوم | مطلوبة. عدد صحيح. أي تعبير رقمي. |
ملاحظات
لتحديد تاريخ، مثل 31 ديسمبر 1991، ينبغي أن يكون نطاق الأرقام لكل وسيطة DateSerial في النطاق المقبول للوحدة؛ أي 1-31 للأيام و 1-12 للشهور. ومع ذلك، يمكنك أيضا تحديد تواريخ نسبية لكل وسيطة باستخدام أي تعبير رقمي يمثل بعض أرقام الأيام أو الشهور أو السنوات قبل تاريخ معين أو بعده.
يستخدم المثال التالي تعبيرات رقمية بدلا من أرقام تواريخ مطلقة. ترجع هنا الدالة DateSerial تاريخا وهو اليوم الذي يسبق اليوم الأول (1 - 1)، وشهران قبل أغسطس (8 - 2)، و10 سنوات قبل 1990 (1990 - 10)؛ أو بعبارة أخرى، 31 مايو 1980.
DateSerial(1990 - 10, 8 - 2, 1 - 1)
يتم تفسير وسيطة السنوات المكونة من رقمين للسنة استنادا إلى إعدادات الجهاز المحددة من قبل المستخدم. ويتم تفسير الإعدادات الافتراضية للقيم بين صفر و29، متضمنة هذين الرقمين كسنوات ما بين 2000–2029. ويتم تفسير القيم الافتراضية بين 30 و99 كسنوات ما بين 1930–1999. بالنسبة لكافة وسيطات السنة الأخرى، استخدم السنوات المكونة من أربعة أرقام (على سبيل المثال، 1800).
أما إصدارات Windows الأقدم من Windows 2000، فيتم تفسير السنوات المكونة من أربعة أرقام طبقا للافتراضات الموضحة أعلاه. وللتأكد من إرجاع القيمة الصحيحة، استخدم السنة المكونة من أربعة أرقام.
عندما تتجاوز أي وسيطة النطاق المقبول لتلك الوسيطة، يتم إضافتها إلى الوحدة التالية الأكبر المناسبة. على سبيل المثال، إذا قمت بتحديد 35 يوما، يتم تقييمها كشهر واحد وبعض الأيام، وذلك طبقا لجزء السنة الذي يتم التطبيق عليه. في حالة وجود أي وسيطة فردية خارج النطاق -32,768 إلى 32,767، يحدث خطأ. أما إذا كان التاريخ المحدد بواسطة الثلاث وسائط يقع خارج نطاق التواريخ المقبول، يحدث خطأ.
ملاحظة
بالنسبة إلى السنةوالشهرواليوم، إذا كان إعداد خاصية Calendar ميلاديا، فسيتم افتراض أن القيمة المتوفرة هي الميلادية. إذا كان إعداد خاصية Calendar هجري، فيفترض أن القيمة التي تم توفيرها هي هجرية.
يكون جزء التاريخ الذي يتم إرجاعه في الوحدات الزمنية لتقويم Visual Basic الحالي. على سبيل المثال، إذا كان التقويم الحالي هجريا وجزء التاريخ الذي سيتم إرجاعه هو السنة، تكون قيمة السنة عبارة عن سنة هجرية. بالنسبة لسنة الوسيطة، يتم تفسير القيم بين صفر و99، متضمنة هذين الرقمين كالسنوات 1400-1499. بالنسبة لكافة قيم السنة الأخرى، استخدم السنة المكونة من أربعة أرقام (على سبيل المثال، 1520).
مثال استعلام
| التعبير | النتائج |
|---|---|
| تحديد Dateserial(2018,12,13) AS NewDate من ProductSales; | ترجع "التاريخ" للسنة والشهر واليوم المحدد الذي تم إدخاله في وسيطات الدالة ويعرض في العمود "NewDate". النتيجة: "13/12/2018". |
مثال VBA
ملاحظة
توضح الأمثلة التالية استخدام هذه الدالة في وحدة نمطية ل Visual Basic for Applications (VBA). لمزيد من المعلومات حول استخدام VBA، حدد "مرجع المطور" في القائمة المنسدلة بجوار "بحث" وأدخل مصطلح أو أكثر في مربع البحث.
يستخدم هذا المثال الدالة DateSerial لإرجاع التاريخ الخاص بالسنة والشهر واليوم المحدد.
Dim MyDate ' MyDate contains the date for February 12, 1969. MyDate = DateSerial(1969, 2, 12) ' Return a date.