Create a new table from some columns of an existing table.

 'DataTable1 already exists.
 Dim ColumnsToKeep() As String = {"Column1", "Column2", "Column3"}
 DataTable1.DefaultView.Sort = "Column1 DESC"
 Dim DataTable2 As Data.DataTable = DataTable1.DefaultView.ToTable(False, ColumnsToKeep)