如何将值赋给变量

闲人　发表于：2013-07-24 20:56:53 　

你好：老师

下列语句，总是要我输入cur1 值，我不知道错在哪里？请帮我改改, 谢谢了

str3 = Me.工时定额 * 7
Select Case Me.难度系数
Case 1
cur1 = 100 / str3
Case 2
cur1 = 100 / str3
Case 3
cur1 = 80 / str3
End Select

ssql1 = "update 产品工价登记表 set 工价= cur1 where 产品工价登记表.零件图号=forms.产品定额登记表.零件图号 and 产品工价登记表.工序名称=forms.产品定额登记表.工序名称"
DoCmd.RunSQL ssql1

cspa 发表于：2013-07-24 22:30:53

这样改试试：

ssql1 = "update 产品工价登记表 set 工价= " & cur1 & ＂where 产品工价登记表.零件图号='＂ & forms.产品定额登记表.零件图号 & ＂' and 产品工价登记表.工序名称='＂ & forms.产品定额登记表.工序名称 & "'＂

access写字符串时如有变量要用&相联，以识别变量值。如是字符型变量前后还要加'。

总记录：1篇页次：1/1 9 1 :

Access交流中心