主题：数据重复

以下内容为程序代码:

1 Dim jb As New SQLJoinTableBuilder("查询表4", "库存20230414")
2 jb.C
3 jb.AddTable("库存20230414", "商品编号", "products", "商品编号")
4 jb.AddCols("{products}.客户", "{库存20230414}.仓库", "{库存20230414}.商品编号", "{products}.规格", "{products}.物料编码", "{products}.孔距", "{products}.图号", "{products}.颜色")
5 jb.AddExp("库存", "isnull([期初],0)+isnull([入库],0)-isnull([出库],0)")
6 jb.AddExp("库存支数", "isnull([期初支数],0)+isnull([入库支数],0)-isnull([出库支数],0)")
7 jb.AddExp("电机壳重量", "(isnull([期初],0)+isnull([入库],0)-isnull([出库],0))*{products}.成品重量")
8 jb.Order = "商品编号"
9
10 Tables("库存查询SQL版本_Table1").DataSource = jb.BuildDataSource
11 Tables("库存查询SQL版本_Table1").filter = "库存＜＞0"
12 Tables("库存查询SQL版本_Table1").autosizecols(True)