在vb中链接access数据库进行条件查询, 我想要达到的结果:在文本框中输入条件,点击查询按钮,就能在gatagridview中显示。
但是现在点击查询后在gatagridview中不显示,是为什么
问题相关代码,请勿粘贴截图 Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
Dim da As New OleDb.OleDbDataAdapter
Dim comm As New OleDb.OleDbCommand
Dim ds As New DataSet
comm.CommandText = " select 宿舍号 as 宿舍号,空床数 as 空床数,空房 as 空房,学院,班级, from sushe"
comm.Connection = OleDbConnection1
da.SelectCommand = comm
If TextBox1.Text <> "" Then
comm.CommandText = " Select * from sushe where 宿舍号 like ' " + TextBox1.Text + " % ' "
End If
OleDbConnection1.Open()
da.Fill(ds, "Sushe")
OleDbConnection1.Close()
DataGridView2.DataSource = ds.Tables("Sushe")
End Sub
查询前:
查询后: