مساعدة فى البحث فى القائمة المنسدلة

[safwat Maher]

عندى برنامج بسيط للفواتير

يوجد قائمة منسدلة

لازم اكتب اول كلمة  علشان يظهر المتشابة

محتاج لو كتبت اى كلمة من اسم المنتج سؤاء اول كلمة او كلمة فى الوسط او عدة حروف منها\

يظهر كل المتشابة

معمولة فى البحث المنفصل عندى

لكن من القائمة مش عارف تجى ازاى

شكرا للمساعدة

 

[SEMO.Pa3x]

عليكم السلام.

أولاً: قم بوضع Combobox مربع سرد وتحرير ولا تقم بإعطاءه اي بيانات

ثانياً: قم بوضع عدد الأعمدة فيه 2

ثالثاً: قم بوضع عرض الأعمدة 0;5cm

رابعاً: في حدث ( عند مفتاح للأعلى ) أو ( KeyUp ) ضع الكود الآتي

 

Private Sub comb_model_KeyUp(KeyCode As Integer, Shift As Integer)
    'test number of characters entered - if greater then 2 then assign rowsource
    If Len(Me.comb_model.Text) > 2 Then
        
        'set the rowsource to match user search criteria
        Me.comb_model.RowSource = "SELECT * FROM tbl_models WHERE model_name LIKE '*" & Me.comb_model.Text & "*'"
        
        'show the search in real-time
        Me.comb_model.Dropdown
    Else
        'set to no
        Me.comb_model.RowSource = ""
    End If
End Sub

 

تم تعديل مايو 5, 2021 بواسطه SEMO.Pa3x

[safwat Maher]

شكرا اخى الفاضل بارك الله فيك

اشتغلت كويس ولكن ؟؟

كان بعد تحديث القائمة ووضع اسم المنتج

يتم تحديث كود المنتج

وسعر الجملة

لكن بالطريقة الجديدة لا يتم

وبتظهر الرسالة دى