دالة Dlookup

[أبو عبدالله الحلوانى]

استخدمت هذا الكود فى الاستعلام عن قيمة بالجدول وكنت أرجو أن تصبح قيمة المتغير عند خلو الجدول من القيم null

ولكنى فوجئت برسالة خطأ (invaild use of null) أرجو المساعدة لمعرفت موطن الخلل وجزاكم الله خيرا ونفع بكم

الكود هو:

Dim m

M = Dlookup("cod","cod_info")0

If isnull(m) then

End if

الكود خالى من التفاصيل ولكن المهم لماذا لم تصبح قيمة المتغير m = null عند خلو الجدول من البيانات؟

وهل هناك وسيلة أخرى تؤدى الغرض الذى أخفقت فيه Dlookup؟

[ابوخليل]

جرب هذه :

Dim m
M = NZ(Dlookup("cod","cod_info"))
If  m = 0 then
End if

[أبو عبدالله الحلوانى]

جزاك الله خيرا أستاذنا أبا خليل زادك الله من فضله ورفع قدرك

تم المراد