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

[عيسى بن عمر]

اخوتي الكرام أعضاء المنتدى والسادة االمشرفين السلام عليكم في طرح جديد

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

 

مثال عن المكتبة.rar

[رمهان]

كل عام وانتم بخير اولا

ثانيا : اضف السطر الجديد للكود خلف زر تحديث ليصبح كالتالي :

Private Sub أمر33_Click()
If MsgBox("تاكيد العملية ؟ ", vbYesNo) = vbNo Then Undo
DoCmd.Requery
End Sub

بالتوفيق

تم تعديل يوليو 21, 2015 بواسطه رمهان

[عيسى بن عمر]

زادنا الله من فيض علمك يا أستاذنا الخبير هذا بالضبط ماأبحث عنه بارك الله فيك وجزاك الله عنا وعن الإسلام كل خير شكرا.  

[عيسى بن عمر]

زادنا الله من فيض علمك يا أستاذنا الخبير هذا بالضبط ماأبحث عنه بارك الله فيك وجزاك الله عنا وعن الإسلام كل خير شكرا.  

[رمهان]

زادنا الله من فيض علمك يا أستاذنا الخبير هذا بالضبط ماأبحث عنه بارك الله فيك وجزاك الله عنا وعن الإسلام كل خير شكرا.  

 

بارك الله فيك اخ عيسى ولك اجمل التحايا !