عدم استجابة اللائحة المنسدلة للفتح؟

اخي الفاضل

تفضل ملفك بعد التعديل بناء على طلبك

استخدم هذا الكود عندما يكون التركيز على القائمة المنسدلة في النموذج الفرعي

Private Sub beda_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 115 Then
Me.Beda.Dropdown
End If
End Sub

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

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
    Dim ctl As Control
        For Each ctl In Me.Controls
        If ctl.ControlType = acTextBox Or ctl.ControlType = acCommandButton Then

             '{pgup.... pgDn}
            Select Case KeyCode
                Case 33, 34
                KeyCode = 0
            End Select

            'F4
            If KeyCode = 115 Then Exit Sub ' ...................  هنا انت قمت بالغاء حدث المفتاح 


            '{F1....F12}
            If KeyCode >= 112 And KeyCode <= 123 Then
                KeyCode = 0
            End If

        End If
       Next ctl
End Sub

za-Ex_62.rar

بالتوفيق

شكرا اختي زهرة على سرعة الاجابة

فعلا الكود الذي تفضلت به جعل اللائحة الخاصة باسم المادة تنسدل عند الضغط على مفتاح F4، وتم حل المشكلة.. الف شكر

ولكن استناداً للشرح الذي تفضلت به، بأن السبب في عدم انسدال اللائحة هو الكود الموضوع،

فقد قمت بمسح كافة الاكـــــــــواد بالكامـــــــــــل... وتفاجئت بأن المشكلة مازالت كما هي ... مما يوحي بأن السبب ليس الكود وانما شئ اخر غريب.

فيما يلي نسخة المثال بعد ان تم حذف كامل الاكواد منه.

ارجو التوضيح

والف الف شكر

Ex_62 A.rar

اخي الفاضل

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

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

هذه ملفك كما هو بدون اضافة اي اكواد برمجية وانما قمنا بتغيير النموذج من ورقة بيانات الى نموذج مستمر ولا يوجد بينهما اي فرق

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

za-Ex_62 A-UP.rar

بالتوفيق

شكرا اختي زهرة على تواصلك

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

السلام عليكم