Foxtable(狐表)用户栏目专家坐堂 → 只显示小计栏,怎样改


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

主题:只显示小计栏,怎样改

帅哥哟,离线,有人找我吗?
a6931628
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:7 积分:111 威望:0 精华:0 注册:2012/10/22 13:59:00
只显示小计栏,怎样改  发帖心情 Post By:2012/10/24 15:08:00 [只看该作者]

图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
a6931628
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:7 积分:111 威望:0 精华:0 注册:2012/10/22 13:59:00
  发帖心情 Post By:2012/10/24 15:09:00 [只看该作者]

Dim t As Table = Tables("返修资料")
Dim g As Subtotalgroup
t.SubtotalGroups.Clear()
g = New Subtotalgroup
g.Aggregate = AggregateEnum.Sum 
g.GroupOn = "商品名称"
g.TotalOn = "数量" 
g.Caption = "{0} 小计" 
t.SubtotalGroups.Add(g)
g = New Subtotalgroup
g.Aggregate = AggregateEnum.Sum
g.GroupOn = "*" 
g.TotalOn = "数量"
g.Caption = "总计"
t.SubtotalGroups.Add(g)
t.Sort = "商品名称" '指定排序字段
t.Subtotal(True) '生成汇总模式
只显示小计栏,要怎样改

 回到顶部
帅哥哟,离线,有人找我吗?
lin_hailun
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:6708 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2012/10/24 15:48:00 [只看该作者]

 改成这样......

Dim t As Table = Tables("返修资料")
Dim g As Subtotalgroup
t.SubtotalGroups.Clear()
g = New Subtotalgroup
g.Aggregate = AggregateEnum.Sum 
g.GroupOn = "商品名称"
g.TotalOn = "数量" 
g.Caption = "{0} 小计" 
t.SubtotalGroups.Add(g)

t.Sort = "商品名称" '指定排序字段
t.Subtotal() '生成汇总模式
[此贴子已经被作者于2012-10-24 15:48:57编辑过]

 回到顶部