sql怎么用变量做查询条件

lovinana

Private Sub 材料名称_AfterUpdate()
  Dim STemp As String
  Dim cailiaomingcheng As String
  cailiaomingcheng = Me![材料名称]
  STemp = "SELECT * FROM 入库资料表 WHERE 材料名称 = " & cailiaomingcheng & " ORDER BY 入库日期 DESC"
  DoCmd.RunSQL STemp
End Sub

我想把材料名称等于我在文本框输入的值，用了个变量做中间量，材料名称需要等于一个带引号的文本，例如"A4纸"，而红色部分实现的是不带引号的文本，所以报错，请问，怎样修改可以实现

rower

还有“操作查询”？什么意思啊

redstone

你都没有一个查询表, 这样操作出的结果显示在什么地方呢?

lovinana

我已经实现了 又加了引号 一共三对双引号 还是谢谢你了

tz-chf

我简直无从下手！你做的还不如用excel画一张表格。

lovinana

我想查出和我输入材料名称一样时间最近的一次入库，并把那次的采购单价做为本次的参考单价，这是我全部的想实现的

lovinana

tz-chf大大，传上来了

tz-chf

还是没看懂，放mdb上来，我来弄。

lovinana

查询出所有材料名称是我输入进文本框的材料名称的条目，以入库日期降序排列

tz-chf

没看出来想要干什么的