الدالة DateAdd

ينطبق على
Access لـ Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

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

بناء الجملة

DateAdd(interval, number, date)

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

الوسيطة الوصف
فاصل مطلوبة. تعبير السلسلة الذي هو الفاصل الزمني الذي تريد إضافته.
number مطلوبة. تعبير رقمي هو عدد الفواصل الزمنية التي تريد إضافتها. يمكن أن يكون إيجابيا (للحصول على التواريخ في المستقبل) أو سالب (للحصول على التواريخ في الماضي).
تاريخ مطلوبة. متغير (تاريخ) أو قيمة حرفية تمثل التاريخ الذي تتم إضافة الفاصل الزمني إليه.

الإعدادات

تحتوي وسيطة الفاصل الزمنيعلى هذه الإعدادات:

الإعداد الوصف
yyyy السنة
q ربع السنة
m الشهر
y يوم من السنة
d اليوم
w Weekday
ww الأسبوع
h الساعة
د الدقيقة
s الثانية

ملاحظات

يمكنك استخدام الدالة DateAdd لإضافة فاصل زمني محدد أو طرحه من تاريخ. على سبيل المثال، يمكنك استخدام DateAdd لحساب تاريخ 30 يوما من اليوم أو وقت 45 دقيقة من الآن.

لإضافة أيام إلى التاريخ، يمكنك استخدام يوم السنة ("y") أو اليوم ("d") أو Weekday ("w").

لن ترجع الدالة DateAdd تاريخا غير صالح. يضيف المثال التالي شهرا واحدا إلى 31 يناير:


DateAdd("m", 1, "31-Jan-95")

في هذه الحالة، ترجع DateAdd 28-فبراير-95، وليس 31 فبراير-95. إذا كان التاريخ هو 31-يناير-96، فإنه يرجع 29 فبراير-96 لأن عام 1996 هو سنة كبيسة.

إذا كان التاريخ المحسوب يسبق السنة 100 (أي أنك تطرح سنوات أكثر من التاريخ)، يحدث خطأ.

إذا لم يكن الرقم قيمة طويلة، يتم تقريبه إلى أقرب عدد صحيح قبل تقييمه.

ملاحظة

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

ملاحظة

بالنسبة للتاريخ، إذا كان إعداد الخاصية Calendar ميلاديا، يجب أن يكون التاريخ المقدم ميلاديا. إذا كان التقويم هجريا، فيجب أن يكون التاريخ المقدم هو التاريخ الهجري. إذا كانت قيم الشهر أسماء، فيجب أن يكون الاسم متناسقا مع إعداد الخاصية Calendar الحالي. لتقليل إمكانية تعارض أسماء الأشهر مع إعداد الخاصية Calendar الحالي، أدخل قيم الشهر الرقمية (تنسيق التاريخ القصير).

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

التعبير النتائج
SELECT DateAdd("YYYY",1,[DateofSale]) AS Expr1 FROM ProductSales; ترجع النتائج عن طريق إضافة سنة واحدة إلى قيم التاريخ للحقل "DateofSale".
SELECT DateAdd("YYYY",-1,[DateofSale]) AS Expr1 FROM ProductSales; إرجاع النتائج عن طريق طرح سنة واحدة إلى قيم التاريخ للحقل "DateofSale".
SELECT DateAdd("d",10,[DateofSale]) AS NewDate FROM ProductSales; إرجاع النتائج في العمود "NewDate" عن طريق إضافة 10 أيام إلى قيم التاريخ للحقل "DateofSale".
SELECT DateAdd("ww",-1,[DateofSale]) AS NewDate FROM ProductSales; إرجاع النتائج في العمود "NewDate" عن طريق طرح أسبوع واحد (7 أيام) من قيم التاريخ للحقل "DateofSale".

مثال VBA

ملاحظة

توضح الأمثلة التالية استخدام هذه الدالة في وحدة Visual Basic for Applications (VBA). لمزيد من المعلومات حول العمل مع VBA، راجع مرجع Access VBA.

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


Dim FirstDate As Date    ' Declare variables.
Dim IntervalType As String
Dim Number As Integer
Dim Msg
IntervalType = "m"    ' "m" specifies months as interval.
FirstDate = InputBox("Enter a date")
Number = InputBox("Enter number of months to add")
Msg = "New date: " & _
    DateAdd(IntervalType, Number, FirstDate)
MsgBox Msg

اطلع أيضاً على

اختر دالة التاريخ المناسبة