目的:查询在textbox中的文本,在datagridview中显示出来
Private Sub Slt()
DataGridView1.Rows.Clear()
Dim oledb As String = "SELECT * FROM kucun WHERE [hname] = " & NameTxt.Text
cmd = New OleDbCommand(oledb, con)
'Try
con.Open()
Dim ds As New DataSet
adapter = New OleDbDataAdapter(cmd)
adapter.Fill(ds, "kucun")
adapter.SelectCommand = con.CreateCommand
adapter.SelectCommand.CommandText = oledb
adapter.Update(ds, "kucun")
DataGridView1.DataSource = ds.Tables("kucun")
con.Close()
' dt.Rows.Clear()
' Catch ex As Exception
'MsgBox(ex.Message)
con.Close()
'End Try
End Sub
运行查询的时候在 adapter.Fill(ds, "kucun") 的地方报错:“至少一个参数没有指定值”。找了好久也不知道少了什么,也不知道如何解决。
希望大佬能帮帮我QAQ