主题：运行速度几小时

1、数据多

2、有表事件影响

3、有表达式列的表达式计算影响

如果是外部数据源，可以考虑使用sql更新，类似

insert into wy_cpd select * from wy_cpd0 as a where not exists(select * from wy_cpd as b where a.yy=b.yy and a.yy1=b.yy1 and a.dm=b.dm )

a和b是别名

dataTables("wy_cpd0").loadfilter = "cast(yy as nvarcar) + cast(yy1 as nvarcar) + dm not in (select cast(yy as nvarcar) + cast(yy1 as nvarcar) + dm from wy_cpd)"

dataTables("wy_cpd0").load

dim f As New Filler
f.SourceTable = DataTables("wy_cpd0") '指定数据来源
f.DataTable = DataTables("wy_cpd") '指定数据接收表
f.Fill() '填充数据