自动填充值啊
If Maintable.Name = "销售统计" Then dim f As New Filler DataTables("销售统计").DataRows.Clear() '清除原有数据 f.SourceTable = DataTables("订单") f.SourceCols = "产品" f.DataTable = DataTables("销售统计") f.DataCols = "产品" f.Fill()End If
http://www.foxtable.com/help/topics/0681.htm