[elgokr]

اهلاً بك من جديد

اذا المشكلة لديك انك تريد عند تفريغ الكتابة فى الكمبو

يتم اخفاء جميع نتائج الاستعلام

اولاً لديك حل من الاتى

ان تستبدل الكمبو بـ TextBox وتقوم بتطبيق طريقة الاخ mero5000 

وبكده تكون حليت المشكلة كلياً وظهر العرض بشكل اشيك وبالطريقة التى تريدها

أو انك تقوم بتطبيق الكود بهذا الشكل

كود :

       If ComboBox1.Text = Nothing Then
           ComboBox1.Items.Clear()
       Else
           Nom_pBindingSource.Filter = "nom_p LIKE '%" & ComboBox1.Text & "%'"
           For fil = 0 To Nom_pBindingSource.Count - 1
               ComboBox1.Items.Add(Nom_pBindingSource(fil)("nom_p"))
           Next
       End If

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

لكن افضل ان تستخد الطريقة الاولى وهو استخدام TextBox ستكون اشيك وستقوم بنفس الغرض

واذا كنت ستستخدم الطريقة الكمبو فانت هنا لا تريد تطبيق طريقة الاخ mero5000 هنا

تحياتى لك

وتمنياتى لك التوفيق