以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  合计行问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=5659)

--  作者:xl
--  发布时间:2009/12/26 19:49:00
--  合计行问题
想请教老师一个问题:我不想用其它临时表,只想在当前数据表最末一行:增加合计行,统计除姓名列外的各列数据之和。不知如何操作?
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:222222222222222222.table

[此贴子已经被作者于2009-12-26 19:49:23编辑过]

--  作者:mr725
--  发布时间:2009/12/26 20:05:00
--  
Dim r As Row = CurrentTable.Rows.AddNew()
r("正课")  = CurrentTable.Compute("Sum(正课)")
  
..........
.........
--  作者:czy
--  发布时间:2009/12/26 21:42:00
--  
为何不直接用汇总?
--  作者:xl
--  发布时间:2009/12/26 22:11:00
--  
直接汇总是特简便的,但总感觉又多一张与“流水表”同样的表格,似多余,故作它念。
--  作者:czy
--  发布时间:2009/12/26 22:14:00
--  
直接在这个表中汇总怎么可能会多一张表呢?
--  作者:xl
--  发布时间:2009/12/26 22:14:00
--  
以下是引用mr725在2009-12-26 20:05:00的发言:
Dim r As Row = CurrentTable.Rows.AddNew()
r("正课")  = CurrentTable.Compute("Sum(正课)")
  
..........
.........

如果有DateTable.Compute("Sum(正课),sum(辅导),sum(补课)")   或DateTable.Compute("Sum(正课,辅导,补课......)")之类的函数就好了。  


--  作者:czy
--  发布时间:2009/12/26 22:30:00
--  
感觉好奇怪,下面这样有什么不妥吗?

Dim t As Table = Tables("流水表")
Dim g As SubtotalGroup
t.SubtotalGroups.Clear()
t.GroupAboveData = False
t.TreeVisible = False

g = New SubtotalGroup
g.Aggregate = AggregateEnum.Sum
g.GroupOn = "*"
g.TotalOn = "正课,辅导,补课,甘孜班_守班,甘孜班_补课,甘孜班_辅导,甘孜班_巡查"
g.Caption = "总计"
t.SubtotalGroups.Add(g)

t.Subtotal()


--  作者:xl
--  发布时间:2009/12/26 23:08:00
--  
以下是引用czy在2009-12-26 22:30:00的发言:
感觉好奇怪,下面这样有什么不妥吗?

Dim t As Table = Tables("流水表")
Dim g As SubtotalGroup
t.SubtotalGroups.Clear()
t.GroupAboveData = False
t.TreeVisible = False

g = New SubtotalGroup
g.Aggregate = AggregateEnum.Sum
g.GroupOn = "*"
g.TotalOn = "正课,辅导,补课,甘孜班_守班,甘孜班_补课,甘孜班_辅导,甘孜班_巡查"
g.Caption = "总计"
t.SubtotalGroups.Add(g)

t.Subtotal()

是我错了,在学习中一直以为统计数据类是另创表格,看来还得更深入学习才是。


--  作者:czy
--  发布时间:2009/12/26 23:13:00
--  
以下是引用xl在2009-12-26 23:08:00的发言:

是我错了,在学习中一直以为统计数据类是另创表格,看来还得更深入学习才是。


哈,最简单的你倒忽略了。


--  作者:xl
--  发布时间:2009/12/26 23:20:00
--  

所有设计已完成,请C老师斧正,谢谢!详见消息。