按钮的点击事件代码:
Dim f As New Fillerf.SourceTable = DataTables("SPDA") '指定数据来源f.SourceCols = "SPBM,SPMC" '指定数据来源列f.DataTable = DataTables("DHD.DHD_SPMX") '指定数据接收表f.DataCols = "SPBM,SPMC" '指定数据接收列f.Fill() '填充数据
点击提示出错