追加表的问题,贺老师说过,不能增加,导入的问题,现在就可,全表清零的问题,贺老师曾做过一段代码,我找到后发上来For Each c As DataCol In DataTables("表A").DataCols If c.IsNumeric Then For Each r As DataRow In DataTables("表A").DataRows If r.IsNull(c.Name) = False And r(c.Name) = 0 Then r(c.Name) = Nothing End If Next End IfNext