السلام عليكم
أخي توفيرا للوقت و الجهد على الأعضاء يفضل أن ترفق أنت مثالك ليتم الاطلاع عليه و التعديل على الكود
لكن عامة يمكنك استخدام الكود التالي :
if not isnull(dlookup("flateid","gest_tbl" )) then
F=Dlast("OccDate","gest_tbl" ,"[FlateID]=" & me.flat)
else
f=null
end if
حيث
OccDate تاريخ استئجار الشقة الأخير
[FlateID] رقم الشقه في الجدول ( و ليس رقم العقد )
flat اسم حقل الشقه في جدول العقود