سلام دوست عزیز
این
قسمت یه نگاهی بیندازید
دوست عزیزم aliebrahimi1900
توی پست سه شنبه 12 تیر 1397, 23:36 عصر قشنگ توضیح دادن
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