主题：多表填充

有材料期初表、材料明细表和统计表1

想将材料明细表和统计表1数据填充到材料期初表

问题：以下代码“月”与期初数据不在同行。

Dim g As New Filler
g.SourceTable = DataTables("材料明细") '指定数据来源
g.SourceCols = "月" '指定数据来源列
g.DataTable = DataTables("材料期初") '指定数据接收表
g.DataCols = "月" '指定数据接收列
g.ExcludeExistValue = True '排除接收表中已经存在的内容
g.Distinct = True '排除重复内容,排除已有内容和空白值
g.Append = True '增加新行接收数据
g.Fill() '填充数据

Dim f As New Filler
f.SourceTable = DataTables("统计表1") '指定数据来源
f.SourceCols = "材料代码,材料,单位,期初数量,期初金额" '指定数据来源列
f.DataTable = DataTables("材料期初") '指定数据接收表
f.DataCols = "材料代码,材料,单位,期初数量,期初金额" '指定数据接收列
f.ExcludeExistValue = True '排除接收表中已经存在的内容
f.Distinct = True '排除重复内容,排除已有内容和空白值
f.Append = True '增加新行接收数据
f.Fill() '填充数据

帮忙写下代码好吗

此主题相关图片如下：snap1.jpg