Dim jb1 As New
SQLJoinTableBuilder("查询表1", "汇总表")
jb1.ConnectionName = "ABC"
jb1.AddTable("汇总表", "编号", "档案", "业务编号")
jb1.AddCols("年份", "月份", "客户名称", "季度", "大类", "性质", "数量", "金额")
jb1.Filter = "年份='" & KS & "'
and 日期
<= 截止日期"
Dim jb2 As New
SQLJoinTableBuilder("查询表1", "汇总表")
jb2.ConnectionName = "ABC"
jb2.AddTable("汇总表", "编号", "档案", "业务编号")
jb2.AddCols("年份", "月份", "客户名称", "季度", "大类", "性质", "数量", "金额")
jb2.Filter = "年份='" & KS1 & "' and 日期 > 截止日期"
jb1.Union(jb2, True)
jb1.Build()
上面JB1和JB2是有重叠部分的,想把这重叠部分提取出来,要怎么弄