[轻风]多条件查询衍生出的批量修改，请高手指点错误

轻风

搞不懂你那代码写的是什么意思，看看改成这样是不是符合你的要求：

1. Private Sub Command194_Click()
   
2.     Dim ssql As String
   
3.     Dim strwh As String
   
4.     strwh = Nz(Me.Child1.Form.Filter, "True")
   
5. 
   
6.     ssql = "update 产品 set 标准成本=" & Me.Text195 & " where " & strwh
   
7.     DoCmd.RunSQL ssql
   
8. 
   
9. End Sub
   

复制代码