Predmet:Re: Combobox as you type

---

Da li postoji neko rešenje za ovo:

ON LOAD

Dim AutoComp As New AutoCompleteStringCollection()
Dim dsSerch As New DataSet

Dim ConStr As String = "Data Source=10.10.60.83;Initial Catalog=INIT_DB;User ID=***;password=***"
Dim sqlCon As New SqlClient.SqlConnection(ConStr)
sqlCon.Open()
Dim Str As String = "Select Naziv FROM Kupci"
Dim SqlCom As New SqlClient.SqlCommand(Str, sqlCon)
Dim sqlAdap As New SqlClient.SqlDataAdapter(SqlCom)
sqlAdap.Fill(dsSerch)
AutoComp.Clear()

For i As Integer = 0 To dsSerch.Tables(0).Rows.Count - 1
AutoComp.Add(dsSerch.Tables(0).Rows(i)(0).ToString())
Next

TextBox1.AutoCompleteMode = AutoCompleteMode.Suggest
TextBox1.AutoCompleteSource = AutoCompleteSource.CustomSource
TextBox1.AutoCompleteCustomSource = AutoComp
**********************************************
ovde mi treba pomoć
ON TEXTCHANGE da primenim filter na AutoComp "[Naziv] like '%" & TextBox1.Text.Trim() & "%'" i dobijem rezultat isto kao i na listbox.