الدالة DAvg

يمكنك استخدام الدالة DAvg لحساب متوسط مجموعة من القيم في مجموعة محددة من السجلات (مجال). استخدم الدالة DAvg في وحدة نمطية في Visual Basic for Applications (VBA) أو في ماكرو أو في تعبير استعلام أو في عنصر تحكم محسوب.

على سبيل المثال، يمكنك استخدام الدالة DAvg في صف المعايير في استعلام تحديد حول تكلفة الشحن لتقييد النتائج بحيث تصل إلى تلك السجلات حيث تتجاوز تكلفة الشحن المتوسط. أو يمكنك استخدام تعبير تضمين الدالة DAvg في عنصر تحكم محسوب وعرض متوسط قيمة الطلبات السابقة إلى جانب القيمة الخاصة بطلب جديد.

بناء الجملة

DAvg(expr, domain [, criteria] )

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

الوسيطة	الوصف
expr	مطلوبة. تعبير يحدد الحقل الذي يحتوي على البيانات الرقمية التي تريد حساب المتوسط لها. يمكن أن تكون تعبير سلسلة تعرف حقلا في جدول أو استعلام، أو يمكن أن تكون تعبيرا يقوم بإجراء عملية حسابية على البيانات الموجودة في هذا الحقل. في expr، يمكنك تضمين اسم حقل في جدول أو عنصر تحكم في نموذج أو ثابت أو دالة. إذا تضمن expr دالة، يمكن أن تكون إما مضمنة أو معرفة من قبل المستخدم، ولكن ليس مجال مجمع آخر أو دالة SQL تجميعية.
مجال	مطلوبة. تعبير سلسلة يعرف مجموعة السجلات التي تشكل المجال. ويمكن أن يكون اسم جدول أو اسم استعلام لاستعلام لا يتطلب معلمة.
معايير	اختيارية. تعبير سلسلة يستخدم لتقييد نطاق البيانات الذي يتم تنفيذ الدالة DAvg عليه. على سبيل المثال، غالبا ما تكون المعايير مكافئة لجملة WHERE في تعبير SQL، بدون كلمة WHERE. إذا تم حذف المعايير ، تقوم الدالة DAvg بتقييم expr مقابل المجال بأكمله. يجب أن يكون أي حقل مضمن في المعايير أيضا حقلا في المجال؛ وإلا، فإن الدالة DAvg ترجع قيمة خالية.

    

ملاحظات

لا يتم تضمين السجلات التي تحتوي على قيم خالية في حساب المتوسط.

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

يمكنك استخدام الدالة DAvg لتحديد المعايير في صف المعايير لاستعلام ما. على سبيل المثال، افترض أنك تريد عرض قائمة بجميع المنتجات المطلوبة بكميات أكبر من متوسط كمية الطلب. يمكنك إنشاء استعلام في جداول الطلبات وتفاصيل الطلب والمنتجات، وتضمين حقل "اسم المنتج" وحقل "الكمية"، مع التعبير التالي في صف "المعايير" أسفل حقل "الكمية":

>DAvg("[Quantity]", "Orders")

يمكنك أيضا استخدام الدالة DAvg داخل تعبير حقل محسوب في استعلام، أو في الصف "تحديث إلى" الخاص باستعلام تحديث.

استخدم الدالة DAvg في عنصر تحكم محسوب عندما تحتاج إلى تحديد معايير لتقييد نطاق البيانات الذي يتم تنفيذ الدالة DAvg عليه. على سبيل المثال، لعرض متوسط تكلفة الشحن للشحنات المرسلة إلى كاليفورنيا، قم بتعيين الخاصية ControlSource لمربع النص إلى التعبير التالي:

=DAvg("[Freight]", "Orders", "[ShipRegion] = 'CA'")

إذا أردت ببساطة حساب متوسط كل السجلات في المجال، فاستخدم الدالة Avg .

يمكنك استخدام الدالة DAvg في وحدة نمطية أو ماكرو أو في عنصر تحكم محسوب في نموذج إذا كان الحقل الذي تحتاج إلى عرضه غير موجود في مصدر السجلات الذي يستند إليه النموذج. على سبيل المثال، لنفترض أن لديك نموذجا يستند إلى جدول "الطلبات"، وتريد تضمين حقل "الكمية" من جدول "تفاصيل الطلب" لكي تتمكن من عرض متوسط عدد العناصر التي طلبها عميل معين. يمكنك استخدام الدالة DAvg لإجراء هذه العملية الحسابية وعرض البيانات في النموذج.

تلميحات

• إذا كنت تستخدم الدالة DAvg في عنصر تحكم محسوب، فقد ترغب في وضع عنصر التحكم في رأس النموذج أو تذييله حتى لا تتم إعادة حساب قيمة عنصر التحكم هذا في كل مرة تنتقل فيها إلى سجل جديد.
• إذا كان نوع بيانات الحقل الذي اشتق expr منه رقما، ترجع الدالة DAvg نوع بيانات "مزدوج". إذا كنت تستخدم الدالة DAvg في عنصر تحكم محسوب، فقم بتضمين دالة تحويل نوع البيانات في التعبير لتحسين الأداء.
• على الرغم من أنه يمكنك استخدام الدالة DAvg لتحديد متوسط القيم في حقل في جدول خارجي، فقد يكون من الأفضل إنشاء استعلام يحتوي على كل الحقول التي تحتاج إليها ثم إنشاء النموذج أو التقرير بالاستناد إلى ذلك الاستعلام.

مثال

ترجع الدالة التالية متوسط تكلفة الشحن للطلبات المشحونة في تاريخ معين أو بعده. المجال عبارة عن جدول طلبات. تقيد وسيطة المعايير مجموعة السجلات الناتجة استنادا إلى البلد/المنطقة المعينة وتاريخ الشحن. لاحظ أنه الكلمة الأساسية AND مضمنة في السلسلة لفصل الحقول المتعددة في وسيطة المعايير . سيكون لكل السجلات المضمنة في حساب الدالة DAvg كلا المعيارين.

Public Function AvgFreightCost _
    (ByVal strCountryRegion As String, _
     ByVal dteShipDate As Date) As Double
    AvgFreightCost = DAvg("[Freight]", "Orders", _
        "[ShipCountryRegion] = '" & strCountryRegion & _
        "'AND [ShippedDate] >= #" & dteShipDate & "#")
End Function

لاستدعاء الدالة، استخدم السطر التالي من التعليمة البرمجية في النافذة الفورية:

:AvgFreightCost "UK", #1/1/96#