用SQLCompute对内部表进行后台数据统计,
Case "工程名称","分项工程","施工部位","施工日期","规格型号"
If dr.IsNull("工程名称") OrElse dr.IsNull("分项工程") OrElse dr.IsNull("施工部位") OrElse dr.IsNull("施工日期") Then
dr("实耗量") = Nothing
Else
Dim filter As String
filter = "[工程名称] = '" & dr("工程名称") & " ' And [分项工程] = '" & dr("分项工程") & " ' And [施工部位] = '" & dr("施工部位") & " ' And [施工日期] = '" & dr("施工日期") & " ' And [强度等级] = '" & dr("规格型号") & " ' And [出场拌合站] = '" & dr("出场拌合站") & " ' "
dr("实耗量") = DataTables("混凝土出场台账").Compute("Sum(运输方量)", Filter)
End If
SQLCompute("Sum(运输方量)", Filter) 提示错误,该怎么调整 [施工日期] = '" & dr("施工日期") & " '有没问题呢