以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  统计累计问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=25214)
--  作者：maomaoxw
--  发布时间：2012/11/3 18:06:00
--  统计累计问题

老师，您好，我有一个表，需要统计每个编号当前行月份往前12个月的数量，年月列格式为：“2012-11”，我的思路是先定义一个行集合，集合赋值用datatables的select方法，然后定义一个变量，用for each遍历所有已select的行，累计变量的值，即可得到当前行往前12个月的累计数，比如当前行年月2012-11.则需要统计2011-12至2012-11的累计数，今天试了很久，编写出的select表达式总是出错，望老师赐教

 

dim drs  as new list(of datarow)=datatables("表A").select("编号=\'" & e.datarow("编号") & ”’ and ...  )

dim t as double

for each dr as datarow in drs

t=t+dr("第3列")

next

messagebox.show("当前行往前累计12个月的累计数：" & t ,"结果"）

年月 编号 金额
2011-11 A1 10
2011-12 A2 20
2012-01 A3 10
2012-02 A4 20
--  作者：sloyy
--  发布时间：2012/11/3 18:43:00
--  
思路不好,应该这样:先筛选出前12个月的记录,然后按编号分组统计
--  作者：狐狸爸爸
--  发布时间：2012/11/5 9:01:00
--  

Dim dt As Date = Tables("表A").Current("日期")
dt = dt.AddMonths(-12)
Dim v AS double = DataTables("表A").Compute("Sum(数量)", "日期 >= # " & dt & "#")

MessageBox.show(v)