[CoderMM]

السلام عليكم و رحمة الله و بركاته
بستعمل أوتوكومبليت في تيكست بوكس بيظهر أسماء الأصناف بمجرد كتابة أول حرف من الكلمة
مثل ما في النص

كود :

   Private Sub Autocomplete()
       If con.State = ConnectionState.Closed Then
           con.Open()
       End If

       sql = "SELECT item_name FROM items"
       command = New OleDbCommand(sql, con)
       reader = command.ExecuteReader
       Dim autocomp As New AutoCompleteStringCollection
       While reader.Read
           autocomp.Add(reader("item_name"))
       End While
       reader.Close()
       TextBox2.AutoCompleteMode = AutoCompleteMode.Suggest
       TextBox2.AutoCompleteSource = AutoCompleteSource.CustomSource
       TextBox2.AutoCompleteCustomSource = autocomp
   End Sub

لكن أريد عند كتابة أي جزء من الكلمة تظهر كاملة

مثلا صنف إسمه Oppo G32 - Oppo G45
أريد عند كتابة مثلا G يظهر كل الأصناف التي بها هذا الحرف او الجزء من الكلمة

[CoderMM]

Uppppppppppppppppppp

[قناص المدينة]

استخدم like
sql = "SELECT item_name FROM items where item_name like '% "& textbox1.text &"%' "

'=============================
SELECT item_name FROM items where item_name like '% اكتب اي نص%'

لا تشمل الاكمال التلقائي

[Taha Okla]

إكمال تلقائي و تغيير للمدخلات مع كل إدخال : هذا يجعل البرنامج يدخل بحالة تهنج وعدم استجابة..

عليك إختيار أحد الحالتين : 
- إما عرض بالاكمال التلقائي وهذا كوده.. كما قدمته..
- أو عرض بحسب ما تكتب من مدخلات من أي نقطة من النص : وهذا يحتاج أن تتخلى عن هذا الكود وتصنع كود جديد ويجعل مخرجاته ضمن ListBox وبخبرتك بـ الفيجول بيزك و الـ OOP تستطيع أن تجعله يعرض هذا كما تريد..

وإن كنت لا تعرف الـ OOP فعليك تعلمها حتى تساعدك بصنع بعض ما يخط ببالك وتسهل عليك أكوادك وتبسطها..