السلام عليكم
كان ليا سؤال بخصوص الكود ده المفروض يطلع صندوق بنعم او لا ولما ادوس نعم يمسح السجل ولما ادوس لا يلغي المسح
دلوقتي لما ادوس على لا برده يمسح السجل
عايز اعرف ايه الغلط في الكود ده
ضروري يا جماعه
MsgBox "Are u want to del......?", vbYesNo, "My project"
On Error Resume Next
If vbYes Then
Data1.Recordset.Delete
Data1.Refresh
ElseIf vbNo Then
Data1.Recordset.CancelUpdate
End If
End Sub
السلام عليكم...
طريقة استعمال الـ MsgBox للحصول على استجابة المستخدم خاطئة. الطريقة الصحيحة كالتالي:
If MsgBox("Do u want to del......?", vbYesNo, "My project") = vbYes The
Data1.Recordset.Delete
Data1.Refresh
End Ifبالإضافة إلى أنك لست في حاجة إلى Else أو CancelUpdate.
نرجو الاستفادة و السلام.
وَ قُلِ اعْمَلُوا فَسَيَرَى اللهُ عَمَلَكُمْ وَ رَسُولُهُ وَ الْمُؤْمِنُونَ
صدق الله العظيم
مشكوووووووووووووووور على سرعه الاستجابه ربنا يجعله في ميزان حسناتك