摘要： PrivateFunctionUniteDataTable(ByValdt1AsDataTable,ByValdt2AsDataTable,ByValDTNameAsString)Dimdt3AsDataTable=dt1.Clone()ForiAsShort=0Todt2.Columns.Count-1dt3.Columns.Add(dt2.Columns(i).ColumnName)NextDimobjAsNewObjectobj=dt3.Columns.CountForiAsShort=0Todt1.Rows.Count-1dt1.Rows(i).ItemArray.CopyTo(obj 阅读全文