以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  表达式  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=7524)

--  作者:sophia
--  发布时间:2010/7/5 11:08:00
--  表达式

我想对表A中当前行以上(不包括当前行)所有行的某列求和, 表达式该怎么写?

 


--  作者:狐狸爸爸
--  发布时间:2010/7/5 11:21:00
--  
看看Table的Aggregate方法
--  作者:sophia
--  发布时间:2010/7/5 12:14:00
--  

我想统计受理表中第一行至倒数第二行的"大型数量"这么写不对吗?报错没找到原因

Dim Sum As integer
Dim t As table = tables("受理表")
Sum = t.Aggregate(AggregateEnum.Sum, t.Rows(0), t.cols("大型数量"), t.Rows(t.Rows.Count - 2), t.cols("大型数量"))
OutPut.Show(Sum)


--  作者:sophia
--  发布时间:2010/7/5 14:42:00
--  
以下是引用sophia在2010-7-5 12:14:00的发言:

我想统计受理表中第一行至倒数第二行的"大型数量"这么写不对吗?报错没找到原因

Dim Sum As integer
Dim t As table = tables("受理表")
Sum = t.Aggregate(AggregateEnum.Sum, t.Rows(0), t.cols("大型数量"), t.Rows(t.Rows.Count - 2), t.cols("大型数量"))
OutPut.Show(Sum)

这个Sum结果不应该是integer型吗?怎么提示是Row呢?
图片点击可在新窗口打开查看此主题相关图片如下:未命名1.bmp
图片点击可在新窗口打开查看

--  作者:狐狸爸爸
--  发布时间:2010/7/5 14:48:00
--  

Dim Sum As integer
Dim t As table = tables("受理表")
Dim p AS Index = t.Cols("大型数量").Index
Sum = t.Aggregate(AggregateEnum.Sum,  0,  p,  t.RowSel -1,  p)
OutPut.Show(Sum)


--  作者:czy
--  发布时间:2010/7/5 14:53:00
--  
Dim Sum As Double
With Currenttable
    Sum = .Aggregate(AggregateEnum.Sum,0,.Cols("数量").Index,.Position -1,.Cols("数量").Index)
End With
OutPut.Show(Sum)

--  作者:sophia
--  发布时间:2010/7/5 15:06:00
--  

没有狐爸的帮助,我真是无法前进了!图片点击可在新窗口打开查看