跨表填充重复 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Dim f As New Filler

f.SourceTable = DataTables("TAKATA账单") '指定数据来源

f.SourceCols = "客户简称,月份,运输方式" '指定数据来源列

f.DataTable = DataTables("开piao管理") '指定数据接收表

f.DataCols = "客户简称,月份,运输方式" '指定数据接收列

f.ExcludeExistValue = False

f.ExcludeNullValue = True

f.Distinct = True

f.append = False

f.Fill() '填充数据

Dim g As New Filler

g.SourceTable = DataTables("账单明细") '指定数据来源

g.SourceCols = "客户简称,月份" '指定数据来源列

g.DataTable = DataTables("开piao管理") '指定数据接收表

g.DataCols = "客户简称,月份" '指定数据接收列

g.ExcludeExistValue = False

g.ExcludeNullValue = True

g.Distinct = True

g.append = False

g.Fill() '填充数据
图片点击可在新窗口打开查看

此主题相关图片如下：1.png

请老师看看代码？为什么填充数据好重复，谢谢！

主题：跨表填充重复