Dim jb As New SQLJoinTableBuilder("查询表1","产品价格表") jb.AddCols("商品代码","价格") Dim d As fxDataSource = jb.BuildDataSource() For Each s As String In "仓库表190503|仓库表190513|仓库表190520".split("|") jb = New SQLJoinTableBuilder("查询表1",s) jb.AddCols("商品代码","总仓数量") Dim d1 As fxDataSource = jb.BuildDataSource() d.Combine("商品代码",d1,"商品代码") Next d.Show("查询表1") MainTable = Tables("查询表1")