以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 交叉统计如何合并相同内容单元格 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=138266) |
-- 作者:chen_sheng -- 发布时间:2019/7/26 17:35:00 -- 交叉统计如何合并相同内容单元格 此主题相关图片如下:合计模式下合并.jpg If e.Sender.SelectedPage.Text = "UV单号" Then MessageBox.Show("UV单号为:\'" & dth & "\' 请确认 UV单号是否正确!") Dim dt As DataTable DataTables("zzmjcomtxmxhz").LoadFilter = "[单号] = \'" & dth & "\' and gx=\'UV线\' " DataTables("zzmjcomtxmxhz").Load() dt=DataTables("zzmjcomtxmxhz") Dim g As New CrossTableBuilder("统计表10", dt) g.HGroups.AddDef("mgBH","线形编号") g.HGroups.AddDef("uvd","UV底") g.HGroups.AddDef("cz","材质") g.HGroups.AddDef("dh","订单") g.VGroups.AddDef("xd") g.Totals.AddDef("sl", "sl") g.HorizontalTotal = True g.VerticalTotal = True g.Decimals = 0 g.Subtotal = True g.Build() e.Form.Controls("Table10").Table.DataSource =g.BuildDataSource Tables("线条下料计划_Table10").AutoSizeCols Tables("线条下料计划_Table10").Cols.Frozen = 1 MessageBox.Show("\'" & dth & "\' UV单号生成完成 !") End I f 请教如上代码的交叉统计 如何合并相同内容的单元格 |
-- 作者:有点蓝 -- 发布时间:2019/7/26 17:37:00 -- 参考:http://www.foxtable.com/webhelp/topics/1373.htm |
-- 作者:chen_sheng -- 发布时间:2019/7/26 18:03:00 -- 希望能提供下代码指导或者提供一下交叉统计后合并的案例参考 谢谢! |
-- 作者:chen_sheng -- 发布时间:2019/7/26 18:14:00 -- 这个窗口动态生成的表比较多,参考合并示例报错 [此贴子已经被作者于2019/7/26 18:15:17编辑过]
|
-- 作者:有点蓝 -- 发布时间:2019/7/26 20:43:00 -- 报什么错?请上传实例说明。 需要注意的是,统计表生成后的往往看到的是标题名称,而不是真正的列名,请自行看看列名 for each c as col in Tables("线条下料计划_Table10").cols output.show(c.name & "," & c.caption) next
|