كود إخفاء وإظهار حقل في نموذج مستمر

[CrazyAccess]

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

* استخدام خاصية التنسيق الشرطي لا يعطينا خيار إخفاء وإظهار الحقل  فقط تفعيل أو تعطيل الحقل.

أريد تعديل الكود ليتفاعل مع السجل المحدد فقط للإخفاء والإظهار
 
الكود :
 

If Me.Cheldren = -1 Then
Me.CheldrenNo.Visible = True

Else: Me.CheldrenNo.Visible = False
    
    End If

 ومرفق المثال أيضاً
 
تقبلوا شكري وتقديري

Visible Current Record.rar

[.Azhar]

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

بعدها يتم استدعاء الدالة الفرعية من خلال . حدث في الحالي للفورم , وحدث بعد التحديث لمربع الاختيار .

طبعا تغير اسماء الحقول حسب ما موجود في نموذج عملك . 

Private Sub CustomerCB_AfterUpdate()
 GetTrue
End Sub

Private Sub Form_Current()
 GetTrue
End Sub
Sub GetTrue()
If Me.CustomerCB Then
  Me.CustomerFirstName.Visible = True
  Me.CustomerLastName.Visible = True
  Me.CustomerPhone.Visible = True
Else
  Me.CustomerFirstName.Visible = False
  Me.CustomerLastName.Visible = False
  Me.CustomerPhone.Visible = False
End If
Exit Sub
End Sub

[ابوخليل]

اخوي ازهر ، مع الشكر والتقدير

ممكن  تطبق الكود على المثال المرفق

[علي المصري]

الاستاذ الفاضل : أبوخليل

لقد قمت بتجربة عدة طرق ومنها الطريقة المعروضة في الموضوع

ولم تصلح أي منهم

فهل من طريقة لعمل ذلك  في الفورم في طريقة عرض السجلات المتتالية

[.Azhar]

صباح الخير 

استاذ ابو خليل / استاذ علي 

هذا هو مثال 2003 

Check.rar

[ابوخليل]

اخونا ازهر

 

السؤال من العضو CrazyAccess واضح  تماما

ومثاله الذي قدمه للعلاج رائع

 

ونريدك ان تعدل على مثاله وتطبق الكود الذي تفضلت به

[CrazyAccess]

مساء الخير

 

أشكركم جميعا أخواني وبالأخص أزهر لطرحه الحل

وشكرا لمشرفنا أبو خليل لإهتمامه ومتابعته

 

طبقت العملية أخي الكريم أزهر   لكنها لم تزبط معي كوني أستخدم نموذج مستمر..

فالكود لايزال يظهر الحقل لجميع السجلات وليس فقط السجل الحالي !

 

بانتظار الحل الشافي

 

تحياتي

تم تعديل أكتوبر 7, 2014 بواسطه CrazyAccess

[علي المصري]

الاكواد التي جربتها لم تفلح إلا في حالة واحدة وهي وضع الفورم على    Single Form 

[CrazyAccess]

  أعتقد يفترض ربط عملية الإظهار والإخفاء بناءً على رقم السجل

لربما هكذا سيعمل لكني لست خبير في الأكواد :)

[علي المصري]

جرب الطريقة التالية عن طريق التنسيق الشرطي

Visible Current Record.rar

[CrazyAccess]

مرحبا من جديد

 

اشكرك كثيرا أخي الكريم علي

 

العملية سليمة في حالة وجود حقل واحد فقط مثل المثال المرفق

ولكن هدفي هو اخفاء حقل واظهار حقل آخر

ولكن لكوني توقعت أن يكون هناك كود لذلك لم أضف حقل آخر في المثال

 

أتمنى وجود طريقة لإخفاء حقل واظهار حقل آخر

[.Azhar]

اخي العزيز .

تحيه لك . لا يمكن اخفاء حقل لسجل في نموذج مستمر لكن المثال الذي رفقته لك , عند التنقل بين السجلات سوف تلاحظ اخفاء الحقول عند التنقل .

اما في حالة النماذج المستمرة لا يمكن تنفيذ ذلك .

[sanabelo]

اريد تعلم الغه البرمجيه للاكسس هل فيه ملخص لذلك

 

[Ali_flw]

On 10/6/2014 at 9:45 PM, .Azhar said:

 Sub GetTrue(

السلام عليكم

ممكن اعرف هاي منين اجتSub GetTrue(

في كود الاخقاء

 

مع شكري وتقديري

[Ali_flw]

7 minutes ago, Ali_flw said:

السلام عليكم

ممكن اعرف هاي منين اجتSub GetTrue(

في كود الاخقاء استاذ ازهر

 

مع شكري وتقديري

 

[samrati1]

اخي في الله ممكن المرفق بدون ضغط 

لأني عندي مشكلة في برنامج فك الضغط من فضلك لو تكرمت 

[حامل المسك]

واجهتني نفس المشكلة قبل أيام واقترح أساتذتنا في المنتدى هذا الحل ولعله الأقرب.. وهو تجميد الحقل عن طريق التنسيق الشرطي

 

 

Visible Current Record.mdb