主题：设计统计公式

修改这一行的代码：

 

sum = sum + DataTables("材料交货").Compute("Sum(数量" & i & ")", "品名" & i & " = '" & pd & "' And 客户名称 = '"  & kh & "'")

 

加上日期限制：

 

sum = sum + DataTables("材料交货").Compute("Sum(数量" & i & ")", "品名" & i & " = '" & pd & "' And 客户名称 = '"  & kh & "' And 日期 >= #起始日期# And 日期 <= #结束日期#")

 

你可以做个窗口，输入起始日期和结束日期，然后合成条件表达式。

 

你可以先自己尝试一下，搞不定再说。

 

如果你初学，最好不要先着急处理这样的问题，先把应用篇看透，在逐步学习开发篇，结合实际学习。
 

呵呵，不同的问题，请分别发帖提问，不要跟在别的帖子后面