Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]交叉表增加小计（已解决）


  共有4284人关注过本帖树形打印复制链接

主题：[求助]交叉表增加小计（已解决）
帅哥哟，离线，有人找我吗？
yyzlxc
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1530 积分：10639 威望：0 精华：0 注册：2008/9/24 11:16:00 		[求助]交叉表增加小计（已解决）  发帖心情 Post By：2014/4/22 11:27:00 [只看该作者]

以下代码是生成交叉表，能否以此为基础，增加使用单位的小计行，请各位老师指教，谢谢！

Dim sql As String
sql = "Select 使用单位,工具编号,工具名称,工具等级,工具状态  FROM {工具清单}"
'根据临时表生成分类汇总表
Dim b As New CrossTableBuilder("工具分类汇总",sql)
b.HGroups.AddDef("使用单位")
b.HGroups.AddDef("工具名称")
b.VGroups.AddDef("工具等级")
b.VGroups.AddDef("工具状态")
b.Totals.AddDef("工具编号", AggregateEnum.Count, "工具编号")
b.HorizontalTotal = True
b.VerticalTotal = True
b.Build()
MainTable = Tables("工具分类汇总")
Tables("工具分类汇总").AutoSizeCols()

 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.table


[此贴子已经被作者于2014-4-22 11:37:57编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
y2287958
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：狐神 帖子：4840 积分：35094 威望：0 精华：0 注册：2008/8/31 22:44:00 		  发帖心情 Post By：2014/4/22 11:32:00 [只看该作者]

试试：b.VerticalTotal = True

 回到顶部
帅哥哟，离线，有人找我吗？
y2287958
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：狐神 帖子：4840 积分：35094 威望：0 精华：0 注册：2008/8/31 22:44:00 		  发帖心情 Post By：2014/4/22 11:34:00 [只看该作者]

Dim sql As String
sql = "Select *,1 as 统计 FROM {工具清单}"
'根据临时表生成分类汇总表
Dim b As New CrossTableBuilder("工具分类汇总",sql)
b.HGroups.AddDef("使用单位")
b.HGroups.AddDef("工具名称")
b.VGroups.AddDef("工具等级")
b.VGroups.AddDef("工具状态")
b.Totals.AddDef("统计", AggregateEnum.Sum)
b.HorizontalTotal = True
b.VerticalTotal = True
b.Subtotal = True
b.Build()
MainTable = Tables("工具分类汇总")
Tables("工具分类汇总").AutoSizeCols()
 回到顶部
帅哥哟，离线，有人找我吗？
yyzlxc
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1530 积分：10639 威望：0 精华：0 注册：2008/9/24 11:16:00 		  发帖心情 Post By：2014/4/22 11:38:00 [只看该作者]

谢谢y2287958老师，问题解决，再次感谢。

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.03906 秒, 5 次数据查询