t.DataTable.Load(False)
改成
For Each dr As DataRow In t.DataTable.DataRows If dr.RowState = DataRowState.Unchanged Then dr.Load End IfNext