السلام عليكم إخواني
اريد مساعدة
بخصوص التعديل على كود "الغاء الأمر" يخرج البرنامج نهائي
كما في الصورة
Sub ExitMicrosoftAccess_Click()
If MsgBox("عزيزي المستخدم قبل الخروج ! هل توافق على إجراء نسخة إحتياطية", _
vbQuestion + vbOKCancel, _
"خروج من النظام") = vbOK Then
DoCmd.OpenForm "frmBackupCompact"
End If
End Subالْلَّهُم صَلِّ وَبَارِك وَسَلِم عَلَى سَيِّدِنَا مُحَمَّد وَعَلَى الِه وَصَحْبِه وَسَلِّم
تفضل :)
Sub ExitMicrosoftAccess_Click()
If MsgBox("عزيزي المستخدم قبل الخروج ! هل توافق على إجراء نسخة إحتياطية", _
vbQuestion + vbOKCancel, _
"خروج من النظام") = vbOK Then
DoCmd.OpenForm "frmBackupCompact"
else
docmd.quit
End If
End Subجعفر
شكرا أخي جعفر
بارك الله فيك
الْلَّهُم صَلِّ وَبَارِك وَسَلِم عَلَى سَيِّدِنَا مُحَمَّد وَعَلَى الِه وَصَحْبِه وَسَلِّم
هلا والله :)
جعفر