增加行事件
e.DataRow("第一列") = e.DataTable.datarows.count
重新生成
For Each r As Row In Tables("表A").rows r("第一列") = r.index + 1Next