استدعاء زر امر في النموذج الرئيس

[كوماندير]

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

 

اذا كان لدي زر امر Btn2 على النموذج الرئيس Mfrm واردت استدعائه ( النقر عليه ) من النموذج الفرعي SubFrm

[عبدالرحمن هاشم]

وعليكم السلام

اعذرني اخي الكريم أرى أن الطلب غير واضح بالمرة

ما هو أمر الزر من الأساس وماذا تريد من النموذج الفرعي بتنفيذ هذا الزر ؟

[jjafferr]

وعليكم السلام شباب ، ممكن ادلو بدلوي  

 

1. يجب ان تحول SUB الزر من Private الى Public:

من

Private Sub Btn2_Click()


الى

Public Sub Btn2_Click()

بعدين تقدر تناديه هكذا:

call Forms!Mfrm!Form_Btn2_Click

وطبعا الكود غير مجرب بالدقة ، لأنه ما عندنا شئ نقدر نجربه عليه 

 

 

جعفر

[كوماندير]

الى كل من حاول عموما

 

والى الاخ جعفر خصوصا

 

الف الف شكر

 

وبالنسبة لكود استدعاء امر الزر فلم يضبط وقد جربت الكود التالي فعمل جيدا

Call Me.Parent.Btn2_Click

وبهذا تكون المشكلة قد حُلت لكن هل لي ان اعرف ماهو الفرق بين Private   و Public ؟

[jjafferr]

انا قلت لك:

وطبعا الكود غير مجرب بالدقة ، لأنه ما عندنا شئ نقدر نجربه عليه

 

 

وبدل ما تساعدنا وتسهل علينا بقاعدة بياناتك ، اضطررت ان اعمل قاعدة بيانات خاصة لك ، فقط لأوضح ،

بعد التجربة ، اتضح ان هذا هو الكود الصحيح:

call Form_Mfrm.Btn2_Click

لاحظ في الصورة التالية:

 

 

عندي نموذج رئيسي اسمه frm_1 والزر الذي عليه يعطي الرسالة الموضحة ،

يوجد نموذج فرعي sfrm_1 داخل هذا النموذج ، ولما نضغط على الزر فيه ، فانه يطلق رسالة زر frm_1.

 

الى هنا والكود حقك يشتغل ويتوقف ، ولن يشتغل على الخطوات التالية 

 

اما الان ، فخلي النموذج frm_1 مفتوحا او مغلقا ،

افتح frm_2 ، واضغط على الزر ، فانه سيطلق رسالة زر frm_1 كذلك 

 

والكود في sfrm_1 و frm_2 هو نفسه بدون اي تغيير ، وهو الذي وضحته لك في اعلى هذه المشاركة.

 

 

Private sub

معناه ان الكود بداخل هذا الـ sub خاص بهذا النموذج  فقط ، ولا يستطيع اي نموذج آخر ان يرى محتواه ،

 

Public sub

معناه انه يسمح لجميع النماذج ان ترى الكود داخل هذا الـ sub ، واستعماله ، سواء كان النموذج مفتوحا او مغلقا 

 

 

جعفر

22.Click_Main_from_Sub.mdb.zip

[سعيد صواب]

رائع كعادتك استاذ جعفر 

 

اطال الله عمرك وادام صحته عليك 

 

واطال الله عمر هذا الفيس   الذي دائما مايسبقه الكثير من المعلومات القيمة والمفيدة ..

 

[jjafferr]

رائع كعادتك استاذ جعفر 

 

اطال الله عمرك وادام صحته عليك 

 

واطال الله عمر هذا الفيس   الذي دائما مايسبقه الكثير من المعلومات القيمة والمفيدة ..

 

 

الله ان شاء الله يطول عمرك 

 

واشكرك على جميل كلماتك 

[كوماندير]

اشكرك ايها المبدع دوما جعفر

 

لكن الكود

call Forms!Mfrm!Form_Btn2_Click

ليس ك الكود الثاني الذي استخدمته في مثالك :

call Form_Mfrm.Btn2_Click

عموما

 

اكرر شكري وتقديري لمجهودك .

والمهم ان الفكرة وصلت .

[goldposition]

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

[محمد أبوعبدالله]

4 دقائق مضت, goldposition said:

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

 

في ١٣‏/٣‏/٢٠١٥ at 20:47, jjafferr said:

1. يجب ان تحول SUB الزر من Private الى Public:

تحياتي

[goldposition]

شكرا

 

تم تعديل أكتوبر 2, 2020 بواسطه goldposition