小弟初来乍到 最后一步
想做个查询 通过选择已知条件 来把整个表都显示出来
[解决办法]
Dim a As String
a = ComboBox1.Text
Dim conn As New SqlConnection
Dim comm As New SqlCommand
conn.ConnectionString = "uid=sa;pwd=;database=自己的数据库;server=127.0.0.1 "
comm.Connection = conn
If ComboBox1.Text <> " " Then
conn.Open()
comm.CommandText = "select * from 仓库表 where 仓库名称= ' " & a & " ' "
Dim reader As SqlDataReader = comm.ExecuteReader
Dim str, i
While reader.Read()
For i = 0 To reader.FieldCount - 1
str &= reader.Item(i) & " "
Next
str &= vbCrLf
End While
MessageBox.Show(str)
conn.Close()
End If
这个可以简单的查询某个表中符合combobox1.text的记录，不知道能不能帮到你！
