Dim g As New sqlGroupTableBuilder("【筛选】承运人明细表", ("承运人明细表"))
g.Caption = "【筛选】承运人明细表"
g.Groups.AddDef("承运车主")
'g.Groups.AddDef("车号")
g.Groups.AddDef("付款状态")
g.Totals.Addexp("支付小计","原小计表达式列的表达式")
g.Totals.AddDef("应付运费")
g.Totals.AddDef("定金")
g.Groups.AddDef("支付结算标识")
g.Groups.AddDef("支付日期", DateGroupEnum.None)
g.VerticalTotal = True
g.Decimals = 2
g.Filter = "[付款状态] = '未支付'"
'g.Build()
'MainTable = Tables("未支付运费_统计")
Tables("承运人明细表_Table2").DataSource = g.BuildDataSource()