كيفية عمل شرط مركب فى حقل مستنتج فى استعلام

[محمد طاهر عرفه]

السؤال :

كيف نقوم بعمل استنتاج لقيمة حقل فى الاستعلام بطريقة مركبة

أي

اذا كان تاريخ التسليم خاليا أو اذا كان أكير من 31-12-2003

تكون قيمة الحقل المستنتج Kk تساوي No

و اذا كانت القيمة أقل من 31-12-2003 و ليست خالية

تكون قيمة الحقل المستنتج kk تساوي Yes

الاجابة :

kk: IIf((IsNull([Delivery_Date]) Or [Delivery_Date]>#12/31/2003#),"NO","Yes")

[محمد طاهر عرفه]

الحل بطريقة أخري ( بالكود )

ضع الدالة التالية فى أي وحدة نمطية

Function date2(Mydate)
  If Mydate <= #12/31/2003# Then date2 = "yes"
  If Mydate > #12/31/2003# Then date2 = "No"
    If Mydate = "" Or IsNull(Mydate) Then date2 = "No"
End Function

ثم استخدمها فى الحقل المستنتج كالتالي

kk2: date2([Delivery_Date])