ربط قيمة حقل بمربع تحرير وسرد مصدره آخر

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

اتمنى أن تفيدوني في مشروع تخرجي, وهو لجمعية تحفيظ القرآن الكريم بضمد (جازان) حتى ننال الأجر و الثواب إن شاء الله.

فل نفرض بوجود جدولين

الجدول الأول: بيانات الأعضاء ويحتوي على الحقول التالية:

1- كود العضو , نوعه : ترقيم تلقائي , مفتاح أساسي.

2- اسم العضو , نوعه نص .

3- كود الجنسية , نوعه : رقم , مفتاح أجنبي

الجدول الثاني : ويحتوي على الحقول التالية:

1- كود الجنسية , نوعه :ترقيم تلقائي , مفتاح أساسي.

2-الجنسية , نوعه نص .

///////////

عملت نموذج "الأعضاء" وفيه التالي:-

كود العضو :

اسم العضو:

كود الجنسية :

الجنسية : (مربع تحرير وسرد مصدر الصف الجدول الجنسيات.الجنسية)

المطلوب

عند اختيار الجنسية في مربع التحرير "الجنسية" يتم تعديل قيمة مربع النص "كود الجنسية" مباشرة بكود الجنسية من الجدول الجنسيات.

تقريب

Private Sub الجنسيات_Change()
كود_الجنسية.Value = "SELECT الجنسيات.[كود الجنسية], الجنسيات.الجنسية, *"FROM الجنسياتWHERE (((الجنسيات.الجنسية)="listnat.value"));"
End Sub

ملاحظة البرنامج بالاكسس

اتمنى ان تكون الفكرة واضحة