以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 求和 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=68429) |
||||
-- 作者:gcc123 -- 发布时间:2015/5/17 21:32:00 -- 求和
怎么不对呢? |
||||
-- 作者:大红袍 -- 发布时间:2015/5/17 21:35:00 -- 数值列,类型改成整数或者双精度小数,就行了。 |
||||
-- 作者:gcc123 -- 发布时间:2015/5/17 23:33:00 --
当数值列行为空白时 , 累计列能否不显示数值? |
||||
-- 作者:大红袍 -- 发布时间:2015/5/17 23:50:00 -- Select Case e.DataCol.Name Case "数值" For Each dr As DataRow In e.DataTable.Select("[_SortKey] >= " & e.DataRow("_SortKey")) If dr.IsNull("数值") Then dr("累计") = Nothing Else Dim Val1 As Double = e.DataTable.Compute("Sum(数值)","[_SortKey] <= " & dr("_SortKey")) dr("累计") = Val1 End If Next End Select |