الدالة DateAdd

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

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

بناء الجملة

DateAdd(interval, number, date)

تحتوي الدالة DateAdd على هذه الوسيطات:

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

الإعدادات

تحتوي الوسيطة interval على هذه الإعدادات:

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

ملاحظات

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

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

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

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

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

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

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

ملاحظة

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

ملاحظة

بالنسبة ل date، إذا كان إعداد الخاصية 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; إضافة 10 أيام إلى قيم التاريخ في DateofSale الحقل وإرجاع النتائج في NewDate العمود.
SELECT DateAdd("ww",-1,[DateofSale]) AS NewDate FROM ProductSales; طرح أسبوع أو 7 أيام من قيم التاريخ في DateofSale الحقل وإرجاع النتائج في NewDate العمود.

مثال 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

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

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