How copy one Datatable to another datatable?

Usning VB.NET

Dim x = Dt.Rows.Cast(Of DataRow)().Where(Function(row) Not Array.TrueForAll(row.ItemArray, Function(value) value.ToString().Length = 0))
Dt = x.CopyToDataTable()

USING C#

dt.Load(cmd.ExecuteReader());
var x = dt.Rows.Cast<DataRow>()
.Where(row => !Array.TrueForAll(row.ItemArray, value => 
{ return value.ToString().Length == 0; }
));

dt = x.CopyToDataTable();