不可以是子表,但是也可以是子表,因为子表不过就是显示关联列等于父表关联列的那些行而已:
Dim f As New Filler
f.SourceTable = DataTables("产品资料") '指定数据来源
f.SourceCols = "产品名称,销量统计" '指定数据来源列
f.DataTable = DataTables("采购明细") '指定数据接收表
f.DataCols = "产品名称,销量统计" '指定数据接收列
f.Filter = “子表关联列 = '” & Tables("父表").Current("父表关联列") & "'"
f.Fill() '填充数据