主题：字段列名不同名称修改代码填充数据

Dim 填充数据 As New Filler
填充数据.SourceTable = DataTables("初始库存") '指定数据来源
填充数据.SourceCols = "规格,长度,件数,吨数" '指定数据来源列
填充数据.DataTable = DataTables("现货库存") '指定数据接收表
填充数据.DataCols = "规格,长度,件数,可供数量," '指定数据接收列
填充数据.ExcludeExistValue=True '逻辑型,设为True,排除接收表中已经存在的内容
填充数据.Fill() '填充数据

吨数  可供数量字段不同名称怎样修改代码填充数据