التبديل بين النماذج الفرعية داخل النموذج الرئيسي

[تونسي]

السلام عليكم ورحمة الله وبركاته

اسعد الله واقات الجميع

لدي نموذج رئيس ونماذج اخر مرتبطه جميعها برقم موحد بين الجدول الرئيس والجداول الاخر

ما هي افضل الطرق لستخدام تلك النماذج عبر النموذج الرئيس من غير النموذج الفرعي العادي ؟؟

ولكم افضل التيحات

[samir_samir]

نرجو ان توضح اكتر

[تونسي]

لدي فكرة ان تكون ممكنة

في النموذج الرئيس

نضع فية ازرار امر

1- زر استدعاء النموذج A

2 - . استدعاء النموذج B

3 - زر استدعاء النموذج C

وهكذا :::

بدلاً من وضع عدة نماذج فرعية داخل النموذجالرئيس

امل ان اكون قد شرحت اكثر

[محمد طاهر عرفه]

بالكود التالي

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

Me.SubForm.SourceObject = "Subform1"

حيث SubForm هو اسم كائن انوذج الفرعي

وSubform1 هو اسم النموذج الفرعي المراد ادراجه بدل الموجود

مرفق مثال للتبديل بين نموذجين فرعيين بالكود

ChangeSubForm.rar

[تونسي]

السلام عليكم ورحمه الله وبركاته

جزيل الشكر لك اخي محمد

المرفق لم استطيع تشغيله وكذا ملفات اخرى مثلة في هذا المنتدي .

علما بان جهازي يعمل ونيندوز 89 اوفس مع اجمل التحيات

[محمد طاهر عرفه]

الملف يعمل علي أوفيس 2000 و اكس بي

و الملف المرفق مضغوط ببرنامج وين رار

وهو نظير افضل للوين زيب و يتعامل مع الامتدادين rar ,zip

و لتحميله علي الجهاز

http://www.rarlabs.com/download.htm

وبه تفك الملفات ذات الامتداد rar

[محمد طاهر عرفه]

لعمل أكثر من زر للتبديل ، كل منها يظهر نموذج محدد

If Me.SubForm.SourceObject <> "Subform2" Then

 Me.SubForm.SourceObject = "Subform2"

End If

مع تغيير اسم النموذج الفرعي لكل زر