使用 Data.DataTableCollection 进行 LINQ 转换

Question

我有以下 VB.NET 代码，用于按列计数对 Data.DataTable 进行排序。

For Each dtTarget As Data.DataTable In _
    From x In Target.Tables _
    Where DirectCast(x, Data.DataTable).Rows.Count > 0 _
    Order By DirectCast(x, Data.DataTable).Columns.Count
...
Next

有没有一种方法可以指示 x 是 Data.DataTable，而无需每次在 LINQ 查询中引用它（在本例中为两次）时都对其进行 DirectCast？

Answer 1

类似于：

Target.Tables.Cast<Data.DataTable>()

然后对此进行查询。并且您应该正确地将代码重构为几行，以使其更具可读性。

（这是 C# - 但我会翻译它，2 秒）

翻译：

Dim query = From x In Target.Tables.Cast(Of Data.DataTable)() _
 Where x.Rows.Count > 0 _
 Order By x.Columns.Count _
 Select x

For Each dtTarget As var In query
   ...
Next