每一列的值都不一样,你怎么一起设置啊?如果有规律的话好说For Each c As DataCol In DataTables("表A").DataCols c.DefaultVulue = ....Next