Я хочу, чтобы результаты поиска были точными. Например, я ввел «L», моя программа показывает только результаты, имеющие букву «L», вместо того, чтобы показывать результаты, что первая буква «L». так как это сделать?Поиск datagrid просмотр точных ключевых слов
Вот мой код:
*** перед началом поиска или набрав на SearchBox, пользователь должен сначала выбрать переключатель для поиска данных из столбца, в моей программе есть 3 кнопка радио (ID, Фамилия, Имя)
Private Sub txtSearch_TextChanged(sender As Object, e As EventArgs) Handles txtSearch.TextChanged
Dim DataTable As New DataTable
Dim DataAdapter As New MySqlDataAdapter
MySqlConn = New MySqlConnection
MySqlConn = New MySqlConnection("server=localhost;user id=root;password=root;database=PatientManagementSystem;")
MySqlConn.Open()
'SEARCH ID
If rdbtnID.Checked = True Then
txtSearch.MaxLength = 9
With cmd
.Connection = MySqlConn
.CommandText = "SELECT * FROM newpatient WHERE ID like '%" & txtSearch.Text & "%'"
End With
DataAdapter.SelectCommand = cmd
DataTable.Clear()
DataAdapter.Fill(DataTable)
dgvRecords.DataSource = DataTable
MySqlConn.Close()
'SEARCH LASTNAME
ElseIf rdbtnLastname.Checked = True Then
txtSearch.MaxLength = 32767
With cmd
.Connection = MySqlConn
.CommandText = "select * from newpatient where Lastname like '%" & txtSearch.Text & "%'"
End With
DataAdapter.SelectCommand = cmd
DataTable.Clear()
DataAdapter.Fill(DataTable)
dgvRecords.DataSource = DataTable
MySqlConn.Close()
'SEARCH FIRSTNAME
ElseIf rdbtnFirstname.Checked = True Then
txtSearch.MaxLength = 32767
With cmd
.Connection = MySqlConn
.CommandText = "SELECT * FROM newpatient WHERE Firstname like '%" & txtSearch.Text & "%'"
End With
DataAdapter.SelectCommand = cmd
DataTable.Clear()
DataAdapter.Fill(DataTable)
dgvRecords.DataSource = DataTable
MySqlConn.Close()
End If
End Sub
спасибо! он работал – exeCUTE
Nice. Не забудьте зеленый галочку! –
Могу ли я получить зеленый тик, если это сработало для вас – chrisl08