auto-complete TextBox از دیتا بیس
یک textbox داریم که می خواهیم زمانی که کاربر داخل آن تایپ میکند برنامه گزینه ها رو از داخل دیتا بیس پیش بینی کند
کد زیر را در قسمت لود فورم مینویسیم



Dim comSelectA As String = "Select Name From tableName"

Dim sqlComSelectA As SqlDataAdapter = New SqlDataAdapter(comSelectA, Connection)
Dim DataTableName As New DataTable
Connection.Open()
sqlComSelectA.Fill(DataTableName)

Connection.Close()

Dim MySource As New AutoCompleteStringCollection()

For Each item As DataRow In DataTableName.Rows

MySource.AddRange(New String() _
{
item(0).ToString
})


Next

With TextBox1
.AutoCompleteCustomSource = MySource
.AutoCompleteMode = AutoCompleteMode.SuggestAppend
.AutoCompleteSource = AutoCompleteSource.CustomSource

End With