这是我的搜索代码。但它只是在我的字段产品名称中搜索。我想搜索我的所有字段或我的数据库。这是我的其他领域。 ProductNumber,ProductName,GenericName,PrescriptedTo,Weight,StockPiece,PricePiece,DateArrived,Expiry
Private Sub txtSearch_Change()
ListView1.ListItems.Clear
ConnectDB
rs.Open "Select * from inventory where ProductName LIKE '%" & txtSearch & "%' ORDER BY Expiry ASC", db, 3, 3
Do Until rs.EOF
Set list = ListView1.ListItems.Add(, , rs(0))
For x = 1 To 8
list.SubItems(x) = rs(x)
Next x
rs.MoveNext
Loop
Set rs = Nothing
db.Close: Set db = Nothing
End Sub
有什么建议吗?
答案 0 :(得分:0)
您有几个选择:
or
指定您要搜索的每个列。连接您要搜索的所有列。例如:
"... where ProductName+ProductNumber+GenericName like '%" & txtSearch & "%'"
然而,它们需要是字符字段(或转换为字符字段)才能使连接起作用。