1: Public Sub MergeDataTables(source as DataTable, destination As DataTable)   

   2:   destination.BeginLoadData()   

   3:  

   4:   For i As Integer=0 To source.Rows.Count - 1

   5:     destination.LoadDataRow(source.Rows(i).ItemArray,True)

   6:   Next

   7:  

   8:   destination.EndLoadData()  

   9: End Sub