呵呵,站在巨人肩上,精简些:Dim Filter As StringFor Each dc As DataCol In DataTables("表A").DataCols Filter = Filter & " and " & dc.Name & " Is Null" NextDataTables("表A").DeleteFor(Filter.SubString(5))
闭关多日终于出关了,又看到了易表中mid结合eval语句的影子。