خطاء message

أوضح السؤال جيدا إذا سمحت

ياخ بكل بساطة الكود يعمل عند اختير الامر حزف ثم yes

الكود تمام انما عند اختيار الامر حزف ثم no

تاتى رسالة تم الحزف ok

انا لا اريد تلك الرسالة اللى هى تم الحزف ok

ارجو ان تجرب الفورم

الكود يعمل عند ضغط الامر delete ووو؟؟؟ ام افهم بعد الرجاء اعطاء معلومات ادق

ماذا تعني بyes no لو سمحت ارفق screen shots؟

أهلين

حسب مافهمت إنت ماأنهيت الامر NO

في نهاية الأمر NO ضع EXIT SUB

عشان ينهي الأمر

وإذا مانفع ياليت تكتب الكود

هذا هو كود الحزف

Dim x

x = MsgBox(" هل تريد حذف السجل الحالي؟", vbYesNo)

If x = vbYes Then Data1.Recordset.Delete

MsgBox ("تم الحذف")

Data1.Refresh

السلام عليكم

عدل الكود

Dim x
x = MsgBox(" هل تريد حذف السجل الحالي؟", vbYesNo)
If x = vbYes Then 
Data1.Recordset.Delete
MsgBox ("تم الحذف")
end if
Data1.Refresh

شكرا ياخى الكود تمام