主题：填充器不能排除已有值

我这里是这样的，不知与您的思路有什么不同，自己对比一下：（应用于项目属性的MainTableChanged事件）


If MainTable.Name = "人材机汇总" Then
    DataTables("人材机汇总").DataRows.Clear()
    if DataTables("人材机").DataRows.Count > 1
        dim f As New Filler
        f.SourceTable = DataTables("人材机") '指定数据来源
        f.SourceCols = "定额类别,费用类别,子目编号,子目名称,子目单位" '指定数据来源列
        f.ExcludeExistValue = true
        f.ExcludeNullValue = true
        f.Distinct = true
        f.DataTable = DataTables("人材机汇总") '指定数据接收表
        f.DataCols = "定额类别,费用类别,子目编号,子目名称,子目单位" '指定数据接收列
        f.Filter = "[配比子目] is null or [配比子目] <> '+' + [子目编号]"
        f.Fill()
    end if
end if