以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 请教如何统计年累计数 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=38774) |
||||
-- 作者:sxqq123 -- 发布时间:2013/8/6 17:57:00 -- 请教如何统计年累计数
在统计过程中,年累计数无法显示,请教如何处理. |
||||
-- 作者:sxqq123 -- 发布时间:2013/8/6 18:08:00 -- 此主题相关图片如下:qq图片20130806180739.jpg |
||||
-- 作者:y2287958 -- 发布时间:2013/8/6 18:09:00 -- 未带开发版 |
||||
-- 作者:y2287958 -- 发布时间:2013/8/6 18:12:00 -- 总的思路为: 在DataChanghed事件中事件 对compute设置_SortKey的条件即可
|
||||
-- 作者:y2287958 -- 发布时间:2013/8/6 19:53:00 -- DataColChanged事件 DataColChanged Dim dr As DataRow = e.DataRow Select Case e.DataCol.Name Case "计划费用_天计划" Dim y As Integer = dr("日期").Year Dim m As Integer = dr("日期").Month Dim s1 As String = "日期>=#" & m & "/1/" & y & "# And 日期<=#" & dr("日期") & "#" Dim s2 As String = "日期>=#1/1/" & y & "# And 日期<=#12/31/" & y & "#" dr("计划费用_月计划") = e.DataTable.Compute("Sum(计划费用_天计划)",s1) dr("计划费用_年累计") = e.DataTable.Compute("Sum(计划费用_天计划)",s2) End Select |
||||
-- 作者:有点甜 -- 发布时间:2013/8/6 20:35:00 -- 这个问题,弄得有点晕……
|
||||
-- 作者:sxqq123 -- 发布时间:2013/8/7 10:56:00 -- 谢谢有点甜,感觉很甜。 |