إظهار رســالة تنبيه في حاله عدم وجود ناتج للبحث

[alsobaie77]

أريد أن أضع كود يظهر لي رسالة في حال لم يوجد الرقم من ضمن البحث (الرقم غير موجود)

وشكرا... أرجو المساعدة ..

مرفق صورة تبين الكود الحالي للكومبو تبع البحث

[alsobaie77]

???????

[osama ababneh]

اخي الكريم

على فرض ان الرقم الذي تريد البحث عنة عنوانة Sn_Num

انشئ مربع نص في النموذج وليكن اسمة AA

والكود التالي سيحل المشكلة ان شاء الله

Sn_Num.SetFocus

DoCmd.FindRecord aa, acEntire, False, acSearchAll, False, acCurrent, True

If aa <> SN_Num Then

MsgBox "sory this number not avaliable"

End If

[alsobaie77]

عفواً أخي الكريم نوع حقل البحث هو كومبو

أريد أن يكون التعديل في الكود

[رياض الراوي]

السلام عليكم:

أرفق مثال أرجو أن يلبي طلبك.

ComboBoxSearch.rar

[farouk450]

السلام عليكم:

أرفق مثال أرجو أن يلبي طلبك.

ممتاز النموذج يا استاذ رياض

بجد زى الفل تسلم ايديك