[elgokr]

بكل بساطة اخى larbihamri 

انشاء TextBox 
وتعال فى حدث TextBox1_TextChanged استخدم الكود بهذا الشكل

كود :

       Dim List_ As New AutoCompleteStringCollection
       Nom_pBindingSource.Filter = "nom_p LIKE '%" & TextBox1.Text & "%'"
       For fil = 0 To Nom_pBindingSource.Count - 1
           List_.Add(Nom_pBindingSource(fil)("nom_p").ToString())
       Next
       With TextBox1
           .AutoCompleteCustomSource = List_
           .AutoCompleteMode = AutoCompleteMode.SuggestAppend
           .AutoCompleteSource = AutoCompleteSource.CustomSource
       End With

دون ان تقوم اى تعديلات فى الخصائص

بحيث الكود سيقوم بذلك نيابتاً عنك 

اذهب واكتب فى TextBox ما تريد البحث عنه

وستجد ان TextBox تتعامل معك كما لو انك تستكخدم طريقتك الاخري

وبكده وبكده طول ما الـ TextBox فارغ لا يظهر شئ ولا هتشغل بالك باى شئ وقتها

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

---

---

ايضاً هذا رابط يمكنك الاطلاع عليه سيوضح الشكل النهائي

https://www.youtube.com/watch?v=0X8lcO3qrOY

تحياتى لك

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