rs.Open "select * from 图书库 where 书名 like '%" & Text1.Text & "%' and 出版社 like '%" & Text2.Text & "%' and 书号= ' " & Text3 & " ' and 作者= ' " & Text4 & " ' and 单价= '" & Text5 & " ' and 类别=' " & Combo1 & " '", db, adOpenStatic, adLockReadOnly由于单价是money型 库存是int型 所以从数据库读出是出现错误请帮解决
"and 库存=" & cint(text6.text)