以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 窗口表显示统计结果 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=157372) |
-- 作者:tld -- 发布时间:2020/10/13 20:12:00 -- 窗口表显示统计结果 老师好, 窗口有三个表, 分别 是 tb1 tb2 tb3 , 如何将分组统计的结果显示在 tables(e.form.name & "_table3") 中 ? 最好能直接在 tb3中显示 Dim bd2 As New GroupTableBuilder("统计2",DataTables("流水")) Dim dt1 As fxDataSource bd2.Groups.AddDef("付款单位") bd2.Groups.AddDef("结算单位") bd2.Groups.AddDef("付款id") bd2.Groups.AddDef("开票id") bd2.Totals.AddDef("税后核定") bd2.Decimals = 2 bd2.FromServer = True bd2.Filter = "[付款单位] = \'" & tb1.Current("付款单位") & "\' and [委托编号] >= \'" & cong & "\' and [委托编号] <= \'" & dao & "\'" dt1 = bd2.BuildDataSource() 谢谢! |
-- 作者:有点蓝 -- 发布时间:2020/10/13 20:19:00 -- Dim bd2 As New GroupTableBuilder("统计2",DataTables("流水")) bd2.Groups.AddDef("付款单位") bd2.Groups.AddDef("结算单位") bd2.Groups.AddDef("付款id") bd2.Groups.AddDef("开piaoid") bd2.Totals.AddDef("税后核定") bd2.Decimals = 2 bd2.FromServer = True bd2.Filter = "[付款单位] = \'" & tb1.Current("付款单位") & "\' and [委托编号] >= \'" & cong & "\' and [委托编号] <= \'" & dao & "\'" |