主题：[求助]请教字符列汇总

 填充多次

http://www.foxtable.com/help/topics/0680.htm

 或者用统计汇总

http://www.foxtable.com/help/topics/2320.htm

或者用sql语句

五、UNION 运算符

UNION运算符用于组合两个查询的结果。
例如有一个客户表，一个供应商表，我需要得到所有在中国的客户和供应商的名称和地址。
因为数据位于不同的表中，显然，我们需要用两个查询才能完成任务：

SELECT 公司名称, 地址 FROM {客户} WHERE 国家 = '中国' UNION SELECT 公司名称, 地址 FROM {供应商} WHERE 国家 = '中国'

两个查询的字段名称、个数、类型必须完全一致才行。

默认情况下，UNION会自动排除重复的行，然后你可以用ALL关键词来确保返回所有的行，例如：

SELECT 公司名称, 地址 FROM {客户} WHERE 国家 = '中国' UNION ALL SELECT 公司名称, 地址 FROM {供应商} WHERE 国家 = '中国'

 无语，完全看不懂你的逻辑。

Dim f As New Filler   '先填充订单统计
f.SourceTable = DataTables("未收文部门")  '指定数据来源
f.SourceCols = "文件名称,未收文部门,存档编号" '指定数据来源列
f.Distinct = False    '允许出现重复值
f.DataTable = DataTables("收文情况明细")
f.DataCols = "文件名称,未收文部门,存档编号"
f.Fill() '填充数据 

For Each dr As DataRow In DataTables("已收文部门").DataRows
    Dim fdr As DataRow = DataTables("收文情况明细").Find("文件名称 = '" & dr("文件名称") & "' and 存档编号 = '" & dr("存档编号") & "'")
    If fdr IsNot Nothing Then
        fdr("已收文部门") = dr("已收文部门")
    End If
Next