Private Sub Command14_Click()
Dim a, b As String
Dim d As Integer
a = Me.备件编号
b = Me.周转单位
d = Me.数量
Dim curdb As Database
Set curdb = CurrentDb
curdb.Execute "update 备件库存 set 数量=数量-" & d & ",[b] =[b] -" & d & " where 备件编号='" & a & "'"
不加[b]=[b]-" & d & "可以修改备件库存表中相应‘数量’字段的值。现在想把b从窗体中取下来后,作为备件库存表的字段名在式子中使用,不能用。不知有什么办法达到这个效果?作者: tz-chf 时间: 2010-6-3 19:08
"update 备件库存 set 数量=数量-" & d & "," & b & " = " & b & " -" & d & " where 备件编号='" & a & "'"
这个建表不好作者: zbwei 时间: 2010-6-3 21:36
试过了,用"& b &"不行,报错作者: wuqili123 时间: 2010-6-3 23:12
safdafsf作者: zbwei 时间: 2010-6-4 09:27
tz-chf,非常感谢,按照你的办法解决了!作者: ycxchen 时间: 2010-6-4 11:13
用变量作字段名还是头一回听说,不知为何要这样?