إخفاء مربع سرد و تحرير في نموذج فرعي

[أبورحيل]

السلام و عليكم أرجو المساعدة ، أريد إخفاء مربع سرد و تحرير في نموذج فرعي كيف ذلك وشكرا و عيد مبارك للجميع إنشاء الله

db2 (2).rar

[qffffq]

للجميع :

عيدكم مبارك ... تقبل الله منا ومنكم صالح الاعمال .

سؤالك غير واضح يا اخي 

لتتم الفائدة حدد المطلوب ووضح ما هو وشكرا

[أبورحيل]

شكرا على التواصل أريد إخفاء مربع سرد و تحرير دائرة  في النموذج الفرعي frm_affectation عندم يكون فارغ و شكرا 

[Shivan Rekany]

3 ساعات مضت, أبورحيل said:

شكرا على التواصل أريد إخفاء مربع سرد و تحرير دائرة  في النموذج الفرعي frm_affectation عندم يكون فارغ و شكرا 

اتفضل

اليك هذا الكود

Private Sub Form_Current()
    If Len(Me.Daira & "") = 0 Then Me.Daira.Visible = False Else Me.Daira.Visible = True
End Sub

لكن هناك سؤال 
مثلا رحت علسجل جديد وهو خالي من البيانات اي سيكون مخفية

كيف تعطيه البيانات فيه ؟

واليك القاعدة بعد اضافة كود الاعلاه

 

 

db2 (2).rar

[أبورحيل]

شكرا أستاذ شفان على الرد بخصوص سؤالك أن عملت حل بإضافة زر عمله في حالة سجل جديد ألغي فيه الإخفاء

أستاذ شفان ربما لم تفهم سؤالي أنا أريد التحكم في مربع سرد و تحرير الدائرة من خلال النموذج الرئيسي frmmowadef  وعفوا إن لم أطرح السؤال بشكل واضح

[Shivan Rekany]

10 ساعات مضت, أبورحيل said:

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

اتفضل اليك هذا

Private Sub Form_Current()
    If Len(Forms!frm_mowadef!subfrm!Daira & "") = 0 Then Forms!frm_mowadef!subfrm!Daira.Visible = False Else Forms!frm_mowadef!subfrm!Daira.Visible = True
End Sub

والمرفق بعد تعديل

 

db2 (2).rar

[أبورحيل]

شكرا أستاذ رشفان على التواصل نجحت الفكرة و عيد مبارك سعيد و دائما إنشاء الله معودنا على العطاء و ربنا يحفظك و يخليك و يجعل هذا العلم في ميزان حسناتك أمين