تغيير مصدر الصف لكمبوبوكس فى نموذج فرعى حسب قيمة حقلين فى نموذج رئيسى

[عبد الفتاح كيرة]

السلام عليكم

فى قاعدة البيانات المرفقة

نموذج رئيسى به حقل الصف و الفصل

و نموذج فرعى به كمبوبوكس مصدر الصف له هو حقل أسماء الطلاب

الكمبوبوكس يظهر أسماء كل الطلاب بكل الصفوف و الفصول

المطلوب

عند كتابة رقم الصف و الفصل فى النموذج الرئيسى

أن يظهر الكمبوبوكس أسماء هذا الصف و الفصل فقط

وليس كل الطلاب

test9.rar

http://getfile1.post...scaled.1000.jpg

تم تعديل نوفمبر 20, 2012 بواسطه أبو لميس

[محمد ايمن]

اخي ابو لميس تحية طيبة

هل هذا هو طلبك ؟

test10.rar

[عبد الفتاح كيرة]

جزاك الله خيراوشكرا لردك الطيب

شكرا

جزاك الله خيرا

هذا هو المطلوب

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

عند فتح النموذج فقط

أريد أن يتم تغيير الأسماء عند تغيير حقل الصف

لأننى أدخل صفا و بعد الانتهاء منه

أدخل صفا جديدا

لكى يتم التغيير أضغط على مفتاح REFRISH

فهل يمكن حدوث ذلك بدون ضغط REFRISH

الحمد لله تم المطلوب

أضفت هذا السطر من الكود لتنشيط الكمبوبوكس

Private Sub nashClass_Change()

[Forms]![tblNashatDETAILS]![TT].[Form]![Stuiid].Requery

End Sub

Private Sub nashClass_Exit(Cancel As Integer)

[Forms]![tblNashatDETAILS]![TT].[Form]![Stuiid].Requery

End Sub[/right]


Private Sub nashSaff_AfterUpdate()

[Forms]![tblNashatDETAILS]![TT].[Form]![Stuiid].Requery

End Sub

Private Sub nashSaff_Change()

[Forms]![tblNashatDETAILS]![TT].[Form]![Stuiid].Requery

End Sub

Private Sub nashSaff_Exit(Cancel As Integer)

[Forms]![tblNashatDETAILS]![TT].[Form]![Stuiid].Requery

End Sub

و الحمد لله

تم تعديل نوفمبر 21, 2012 بواسطه أبو لميس

[Bluemind]

Private Sub nashClass_Change()

[Forms]![tblNashatDETAILS]![TT].[Form]![Stuiid].Requery

End Sub

Private Sub nashClass_Exit(Cancel As Integer)

[Forms]![tblNashatDETAILS]![TT].[Form]![Stuiid].Requery

End Sub[/right]

Private Sub nashSaff_AfterUpdate()

[Forms]![tblNashatDETAILS]![TT].[Form]![Stuiid].Requery

End Sub

Private Sub nashSaff_Change()

[Forms]![tblNashatDETAILS]![TT].[Form]![Stuiid].Requery

End Sub

Private Sub nashSaff_Exit(Cancel As Integer)

[Forms]![tblNashatDETAILS]![TT].[Form]![Stuiid].Requery

End Sub

و الحمد لله

الاخ الفاضل ابو لميس بامكانك اختصار الكود اعلاه الى سطر واحد فقط وذلك باضافه الكود التالي في حدث on got focus لمربع الكومبو بوكس Stuiid

Private Sub Stuiid_GotFocus()

Me.Stuiid.Requery

End Sub

[عبد الفتاح كيرة]

فعلا أستاذنا الفاضل

جزاك الله خيرا

أيهما أفضل فى هذا الموضع

REQUERY

REFRISH

أفادكم الله

[Bluemind]

افضل طبعا

REQUERY

[عبد الفتاح كيرة]

شكرا لك