主题：统计的合计值怎么写入另外一个表

TIANTIAN ，请给个思路： 统计的合计值怎么写入另外一个表

用Compute 直接获得统计结果,就可以随意控制赋值了

谢谢BIN,我看到这一句：

 参考

 

http://www.foxtable.com/help/topics/2720.htm

 

参考帮助http://www.foxtable.com/help/topics/2720.htm

此外，你要掌握表达式的基本语法：

http://www.foxtable.com/help/topics/0102.htm

http://www.foxtable.com/help/topics/1647.htm

 

还要知道合成表达式：

http://www.foxtable.com/help/topics/1284.htm

 

 

Dim Total As Long
Total = DataTables("订单").Compute("Sum(数量)", "产品 = 'PD01' And 日期 >= #1/1/2015# And 日期 <= #1/31/2015#")
Output.Show(Total)

Dim y As Integer = Date.Today.Year
Dim m As Integer = Date.Today.Month
Dim dt1 As New Date(y, m, 1)
Dim dt2 As New Date(y, m, Date.DaysInMonth(y, m)) '获取本月的最后一天
Dim Filter As String
Filter = "日期 >= #" & dt1 & "# And 日期 <= #" & dt2 & "#"
Tables("订单").Filter = Filter

看6楼

Dim y As Integer = Date.Today.Year
Dim m As Integer = Date.Today.Month
Dim dt1 As New Date(y, m, 1)
Dim dt2 As New Date(y, m, Date.DaysInMonth(y, m)) '获取本月的最后一天
Dim Filter As String
Filter = "产品 = 'PD01' And 日期 >= #" & dt1 & "# And 日期 <= #" & dt2 & "#"
Dim Total As Long
Total = DataTables("订单").Compute("Sum(数量)", Filter)

好厉害，一句简单的代码就足够FILTER我要的数据了，非常3Q FOR 您们的帮助。