dim f As New Fillerf.SourceTable = DataTables("统计表") '指定数据来源f.SourceCols = "第四列,第五列......" '指定数据来源列f.DataTable = DataTables("表F") '指定数据接收表f.DataCols = "第四列,第五列....." '指定数据接收列
f.filter="第四列= & na & "'"f.Fill() '填充数据
加好友 
发短信
Post By：2015/4/22 2:51:00 [显示全部帖子]
