- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 关于统计个数及总数,谢谢帮助! (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=1679)
-- 发布时间：2009/1/23 15:55:00
-- 关于统计个数及总数,谢谢帮助!
此主题相关图片如下：未命名.jpg
不用表达式如何设置上面的两个公式,谢谢!
1. 统计个数!
2.统计总数!
-- 发布时间：2009/1/23 17:04:00
--
总数是看明白了,个数没看明白.可以学习一下帮助里开发篇的统计章节
手工编码进行统计
\'生成统计表
Dim dtb As New DataTableBuilder("统计")
dtb.AddDef("产品", GetType(String), 32)
dtb.AddDef("数量", GetType(Integer))
dtb.AddDef("金额", GetType(Double))
dtb.Build()
\'填充数据
dim f As New Filler
f.SourceTable = DataTables("订单")
f.SourceCols = "产品"
f.DataTable = DataTables("统计")
f.DataCols = "产品"
f.Fill()
\'统计
For Each dr As Datarow In DataTables("统计").DataRows
dr("数量") = DataTables("订单").Compute("Sum(数量)","[产品] = \'" & dr("产品") & "\'")
dr("金额") = DataTables("订单").Compute("Sum(金额)","[产品] = \'" & dr("产品") & "\'")
Next
MainTable= Tables("统计")
当然，上面的代码如果改用GroupTableBuilder来实现。要容易很多。
之所以提供这样的例子，是为了让你知道，其实你有更多的选择，这样面对一些复杂的统计要求，你也能应付自如。
[此贴子已经被作者于2009-1-23 17:06:17编辑过]