如何使用VB.NET中的数据库MS Access在dapper中搜索文本框



如何在VB.NET中使用数据库MS Access在dapper中读取Select?我试着在文本框中进行搜索,但没有成功——我的代码出了什么问题。

Private Sub FillDataGridView()
Dim param As New DynamicParameters()
param.Add("SELECT * FROM Contact WHERE @Nme='' OR Nme LIKE '%'+@Nme+'%'", txtSearch.Text.Trim())
Dim list As List(Of Contact) = oledbCon.Query(Of Contact)("Select ContactID,Nme,Mobile,Address from contact", param, commandType:=CommandType.Text).ToList()
dgvContact.DataSource = list
dgvContact.Columns(0).Visible = False
End Sub
Private Sub btnSearch_Click(ByVal sender As Object, ByVal e As EventArgs) Handles btnSearch.Click
If Not Me.btnSearch.IsHandleCreated Then Return
Try
FillDataGridView()
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
End Sub

我以前从未使用过dapper,但他们GitHub自述文件中的第一个示例显示了如何执行查询并将结果映射到强类型列表(此处(。

它看起来像这样:

Dim contacts = oledbCon.Query(Of Contact)("SELECT ContactID, Nme, Mobile, Address FROM contact WHERE Nme='' OR Nme LIKE @NmeLike", New With {
.NmeLike = $"%{txtSearch.Text.Trim()}%"
}).ToList()

最新更新