主题：[求助]将当前表中的选定行复制到另一表中，如何实现？

数据填充器

Filler用于从表中提取数据，并填充到另一个表中。

属性：

SourceTable:       数据来源表。
SourceCols:        数据来源列，不同的列用逗号分割。
DataTable:         数据接收表。
DataCols:          数据接收列，不同的列用逗号分割。
ExcludeExistValue: 逻辑型，设为True，排除接收表中已经存在的内容。
ExcludeNullValue:  逻辑型，设为True，排除空白值。
Filter:            填充条件。
Distinct:          逻辑型，是否排除重复内容，默认为True；如果设为False，将不会排除重复内容，也不会排除已有内容和空白值。

方法：

Fill: 开始填充数据　

示例：

例如从订单表中提取不重复的客户、产品数据，填充到统计表中：

dim f As New Filler
f.SourceTable = DataTables("订单") '指定数据来源
f.SourceCols = "产品,客户" '指定数据来源列
f.DataTable = DataTables("统计") '指定数据接收表
f.DataCols = "产品,客户" '指定数据接收列
f.Fill() '填充数据