以文本方式查看主题 - 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=117858) |
-- 作者:outcat -- 发布时间:2018/4/20 -- 合并 ![]() ![]() 这个界面上“发砖”上面有一行空白行,这个如何能让“发砖”和上面的一行空白行合并,或者合计列不要显示“发砖了” 下面是生成这个表的代码: DataTables("客户发砖总表").LoadFilter ="" DataTables("客户发砖总表").Load() Dim g As New CrossTableBuilder("统计表1", DataTables("客户发砖总表")) Dim gz As fxDataSource g.HGroups.AddDef("日期",
DateGroupEnum.Year,
"年") \'增加分组列 g.HGroups.AddDef("日期",
"月") g.HGroups.AddDef("客户名称") g.Totals.AddDef("总金额","发砖_金额") g.Totals.AddDef("已发数量","发砖_数量") g.Totals.AddDef("日期",AggregateEnum.Count,"发砖_单数") g.HorizontalTotal
= True g.VerticalTotal
= True \'本月统计 Dim ye As Integer = Date.Today.Year Dim mo As Integer = Date.Today.Month Dim dt1 As New Date(ye, mo, 1) Dim dt2 As New Date(ye, mo, Date.DaysInMonth(ye, mo)) \'获取本月的最后一天 Dim Filter As String Filter = "日期 >= #" & dt1 & "# And 日期 <= #"
& dt2 & "#" g.Filter
= Filter gz = g.BuildDataSource() Tables("客户发砖当月汇总_Table1").DataSource = gz |
-- 作者:有点甜 -- 发布时间:2018/4/20 9:03:00 -- 如果你用交叉统计,你垂直分组是什么?如果没有垂直分组,那,你应该使用【分组统计】,而不是【交叉统计】 |
-- 作者:有点甜 -- 发布时间:2018/4/20 9:05:00 -- 修改列名,参考
http://www.foxtable.com/webhelp/scr/0193.htm
http://www.foxtable.com/webhelp/scr/1275.htm
|