1、复制表
http://www.foxtable.com/webhelp/scr/0192.htm
2、写代码
Dim f As New Fillerf.SourceTable = DataTables("年度院校提档线") '指定数据来源f.DataTable = DataTables("测试") '指定数据接收表f.Fill() '填充数据