يوسف السيد قام بنشر مارس 3, 2018 مشاركة قام بنشر مارس 3, 2018 السلام عليكم في حدث اغلاق النموذج هل يمكن وضع شرط بحيث اذا تحقق يتم اغلاق النموذج وفي حالة عدم التحقق لا يتم اغلاق النموذج علي سبيل المثال كالتالي Private Sub Form_Close() If (smdebit - smcredit) = 0 Then DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70 Else MsgBox "not ok", , "wrong" Exit Sub End If End Sub رابط هذا التعليق شارك More sharing options...
sandanet قام بنشر مارس 3, 2018 مشاركة قام بنشر مارس 3, 2018 تفضل example.mdb 2 رابط هذا التعليق شارك More sharing options...
ابو جودي قام بنشر مارس 4, 2018 مشاركة قام بنشر مارس 4, 2018 4 ساعات مضت, sandanet said: تفضل example.mdb وايه رايك يكون الكود كده يا استاذ @sandanet If (Me.smdebit - Me.smcredit) <> 0 Then MsgBox "not ok", , "wrong" Cancel = True Exit Sub Else End If example.mdb 2 رابط هذا التعليق شارك More sharing options...
sandanet قام بنشر مارس 4, 2018 مشاركة قام بنشر مارس 4, 2018 (معدل) نعم استاذي الفاضل ابا جودي ماتفضلت به افضل بكثير من ناحية تقليل كمية الاكواد المستخدمة .. لكني احببت ان ابين للأستاذ يوسف حالة التراجع عن الاضافة الى الجدول ايضاً في حال عدم تحقق الشرط تم تعديل مارس 4, 2018 بواسطه sandanet 1 رابط هذا التعليق شارك More sharing options...
يوسف السيد قام بنشر مارس 4, 2018 الكاتب مشاركة قام بنشر مارس 4, 2018 الاستاذ الفاضل sandanet شكرا علي كل حلولك الرائعة واكوداك الجميلة وقبل هذا اخلاقك الرفيعة الاستاذ ابا جودي شكرا علي هذا الكود الجميل والحل الرائع 1 رابط هذا التعليق شارك More sharing options...
ابو جودي قام بنشر مارس 4, 2018 مشاركة قام بنشر مارس 4, 2018 رابط هذا التعليق شارك More sharing options...
sandanet قام بنشر مارس 4, 2018 مشاركة قام بنشر مارس 4, 2018 رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.