f = New Filler
f.SourceTable = DataTables("退耕还林") \'指定数据来源
f.SourceCols = "户主姓名,资金名称,银行帐号,金额,发放时间" \'指定数据来源列
f.DataTable = DataTables("农户表") \'指定数据接收表
f.DataCols = "农户姓名,资金名称,银行帐号,金额,发放时间" \'指定数据接收列"户主姓名"
f.ExcludeExistValue = True
f.Fill() \'填充数据

f = New Filler
f.SourceTable = DataTables("草原发放花名册") \'指定数据来源
f.SourceCols = "农户姓名,资金名称,银行帐号,金额,发放时间" \'指定数据来源列
f.DataTable = DataTables("农户表") \'指定数据接收表
f.DataCols = "农户姓名,资金名称,银行帐号,金额,发放时间" \'指定数据接收列"户主姓名"
f.ExcludeExistValue = True
f.Fill() \'填充数据

f = New Filler
f.SourceTable = DataTables("干部报酬") \'指定数据来源
f.SourceCols = "农户姓名,资金名称,银行帐号,金额,发放时间" \'指定数据来源列
f.DataTable = DataTables("农户表") \'指定数据接收表
f.DataCols = "农户姓名,资金名称,银行帐号,金额,发放时间" \'指定数据接收列"户主姓名"
f.ExcludeExistValue = True
f.Fill() \'填充数据

f = New Filler
f.SourceTable = DataTables("低保") \'指定数据来源
f.SourceCols = "农户姓名,资金名称,银行帐号,金额,发放时间" \'指定数据来源列
f.DataTable = DataTables("农户表") \'指定数据接收表
f.DataCols = "农户姓名,资金名称,银行帐号,金额,发放时间" \'指定数据接收列"户主姓名"
f.ExcludeExistValue = True
f.Fill() \'填充数据

f = New Filler
f.SourceTable = DataTables("良种补贴") \'指定数据来源
f.SourceCols = "农户姓名,资金名称,银行帐号,金额,发放时间" \'指定数据来源列
f.DataTable = DataTables("农户表") \'指定数据接收表
f.DataCols = "农户姓名,资金名称,银行帐号,金额,发放时间" \'指定数据接收列"户主姓名"
f.ExcludeExistValue = True
f.Fill() \'填充数据

f = New Filler
f.SourceTable = DataTables("五保补助") \'指定数据来源
f.SourceCols = "农户姓名,资金名称,银行帐号,金额,发放时间" \'指定数据来源列
f.DataTable = DataTables("农户表") \'指定数据接收表
f.DataCols = "农户姓名,资金名称,银行帐号,金额,发放时间" \'指定数据接收列"户主姓名"
f.ExcludeExistValue = True
f.Fill() \'填充数据

f = New Filler
f.SourceTable = DataTables("高龄老人补助") \'指定数据来源
f.SourceCols = "农户姓名,资金名称,银行帐号,金额,发放时间" \'指定数据来源列
f.DataTable = DataTables("农户表") \'指定数据接收表
f.DataCols = "农户姓名,资金名称,银行帐号,金额,发放时间" \'指定数据接收列"户主姓名"
f.ExcludeExistValue = True
f.Fill() \'填充数据

f = New Filler
f.SourceTable = DataTables("孤儿补助") \'指定数据来源
f.SourceCols = "农户姓名,资金名称,银行帐号,金额,发放时间" \'指定数据来源列
f.DataTable = DataTables("农户表") \'指定数据接收表
f.DataCols = "农户姓名,资金名称,银行帐号,金额,发放时间" \'指定数据接收列"户主姓名"
f.ExcludeExistValue = True
f.Fill() \'填充数据

f = New Filler
f.SourceTable = DataTables("计生事业费") \'指定数据来源
f.SourceCols = "农户姓名,资金名称,银行帐号,金额,发放时间" \'指定数据来源列
f.DataTable = DataTables("农户表") \'指定数据接收表
f.DataCols = "农户姓名,资金名称,银行帐号,金额,发放时间" \'指定数据接收列"户主姓名"
f.ExcludeExistValue = True
f.Fill() \'填充数据

f = New Filler
f.SourceTable = DataTables("救助资金") \'指定数据来源
f.SourceCols = "农户姓名,资金名称,银行帐号,金额,发放时间" \'指定数据来源列
f.DataTable = DataTables("农户表") \'指定数据接收表
f.DataCols = "农户姓名,资金名称,银行帐号,金额,发放时间" \'指定数据接收列"户主姓名"
f.ExcludeExistValue = True
f.Fill() \'填充数据

f = New Filler
f.SourceTable = DataTables("征地补偿") \'指定数据来源
f.SourceCols = "农户姓名,资金名称,银行帐号,金额,发放时间" \'指定数据来源列
f.DataTable = DataTables("农户表") \'指定数据接收表
f.DataCols = "农户姓名,资金名称,银行帐号,金额,发放时间" \'指定数据接收列"户主姓名"
f.ExcludeExistValue = True
f.Fill() \'填充数据

f = New Filler
f.SourceTable = DataTables("农机补贴") \'指定数据来源
f.SourceCols = "农户姓名,资金名称,银行帐号,金额,发放时间" \'指定数据来源列
f.DataTable = DataTables("农户表") \'指定数据接收表
f.DataCols = "农户姓名,资金名称,银行帐号,金额,发放时间" \'指定数据接收列"户主姓名"
f.ExcludeExistValue = True
f.Fill() \'填充数据

f = New Filler
f.SourceTable = DataTables("危房改造") \'指定数据来源
f.SourceCols = "农户姓名,资金名称,银行帐号,金额,发放时间" \'指定数据来源列
f.DataTable = DataTables("农户表") \'指定数据接收表
f.DataCols = "农户姓名,资金名称,银行帐号,金额,发放时间" \'指定数据接收列"户主姓名"
f.ExcludeExistValue = True
f.Fill() \'填充数据

f = New Filler
f.SourceTable = DataTables("医疗救助") \'指定数据来源
f.SourceCols = "农户姓名,资金名称,银行帐号,金额,发放时间" \'指定数据来源列
f.DataTable = DataTables("农户表") \'指定数据接收表
f.DataCols = "农户姓名,资金名称,银行帐号,金额,发放时间" \'指定数据接收列"户主姓名"
f.ExcludeExistValue = True
f.Fill() \'填充数据

f = New Filler
f.SourceTable = DataTables("残疾人补助") \'指定数据来源
f.SourceCols = "农户姓名,资金名称,银行帐号,金额,发放时间" \'指定数据来源列
f.DataTable = DataTables("农户表") \'指定数据接收表
f.DataCols = "农户姓名,资金名称,银行帐号,金额,发放时间" \'指定数据接收列"户主姓名"
f.ExcludeExistValue = True
f.Fill() \'填充数据