| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 如何全年累计数量 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=38677) |
| -- 作者：sxqq123 -- 发布时间：2013/8/4 9:20:00 -- 如何全年累计数量 从每年的1月1日开始统计全年累计数量代码如下:
Select Case e.DataCol.Name Case "数量" Dim d As DataRow Dim ds As List(of DataRow) d = e.DataTable.Find("日期= #" & e.DataRow("日期").Year & "/1/1# ") e.DataRow("年累计") = e.DataRow("数量") d = e.DataRow ds = e.DataTable.Select("日期 >=#" & e.DataRow("日期").Year & "/1/1# ") For i As Integer = 1 To ds.Count - 1 ds(i)("年累计") =ds(i-1)("年累计") + ds(i)("天成本") Next End Select 如果单位以上月26日到当月25日做为一个统计月度,如何统计全年累计数量(就是从上年度12月26日开始),请教大师指点 |
| -- 作者：y2287958 -- 发布时间：2013/8/4 9:23:00 -- 上个例子呗 |
| -- 作者：lsy -- 发布时间：2013/8/4 9:34:00 -- ("日期 >=#" & e.DataRow("日期").AddYears(-1).Year & "/12/26# ") |
| -- 作者：sxqq123 -- 发布时间：2013/8/4 11:17:00 -- 谢谢大师指教 |