搜索代码datasheed

-4

我无法按字母搜索。像果酱一样。我必须写出像詹姆斯这样的全名。有人可以帮我改变代码，这样我就可以用字母搜索。搜索代码datasheed

这是我的代码

Private Sub btnSearch_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSearch.Click 

    Dim Load As SearchFromTable = New SearchFromTable 

    With Me.DataGridView1 
     .DataSource = Load.GetMyData _ 
     ("Select *" _ 
     + " From tblInfo Where Fname='" & Trim(Me.txtSearch.Text) & "'" _ 
     + " or Lname='" & Trim(Me.txtSearch.Text) & "'" _ 
     + " or Department='" & Trim(Me.txtSearch.Text) & "'" _ 
     + " or Company='" & Trim(Me.txtSearch.Text) & "'") 
    End With 

End Sub

来源

2017-10-10 johnny sterckx

在您要搜索的文本后面添加％。顺便注射。 –

您应该使用'LIKE' ra比'=' – Jaxi

像Jaxi说，使用这样的：

Private Sub btnSearch_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSearch.Click 

    Dim Load As SearchFromTable = New SearchFromTable 

    With Me.DataGridView1 
     .DataSource = Load.GetMyData _ 
     ("Select *" _ 
     + " From tblInfo Where Fname like '%" & Trim(Me.txtSearch.Text) & "%'" _ 
     + " or Lname like '%" & Trim(Me.txtSearch.Text) & "%'" _ 
     + " or Department like '%" & Trim(Me.txtSearch.Text) & "%'" _ 
     + " or Company like '%" & Trim(Me.txtSearch.Text) & "%'") 
    End With 

End Sub

我给你发的代码将包含“大灌篮”的字符串任何回报，例如改变“詹姆斯”，“一个果酱”，“在一个果酱”，我与乐队一起果酱“...等......

来源

2017-10-10 17:42:09

你是我的英雄，Thx队友。 –

也许再多一次，当我从Access工作表加载数据时，它会插入所有列。我不想插入第一个。是否有插入除“第一列”之外的所有列或列名除外的选项？ –

私人小组btnLoad_Click（BYVAL发件人为System.Object的，BYVALË作为System.EventArgs）把手btnLoad.Click 昏暗载荷SearchFromTable =新SearchFromTable 随着Me.DataGridView1 .DataSource = Load.GetMyData _ （“选择* From tblInfo“） End With End Sub –

搜索代码datasheed

回答

相关问题