如何：使用 LINQ 查询 ArrayList (Visual Basic)
如果使用 LINQ 来查询非泛型 IEnumerable 集合（例如 ArrayList），必须显式声明范围变量的类型，以反映集合中对象的特定类型。 例如，如果有 Student 对象的 ArrayList，那么 From 子句应如下所示：
Dim query = From student As Student In arrList
'...
通过指定范围变量的类型，可将 ArrayList 中的每项强制转换为 Student。
在查询表达式中使用显式类型范围变量等效于调用 Cast 方法。 如果无法执行指定的强制转换，Cast 将引发异常。 Cast 和 OfType 是两个标准查询运算符方法，可对非泛型 IEnumerable 类型执行操作。 在 Visual Basic 中，必须对数据源显式调用 Cast 方法，以确保特定范围变量类型。 有关详细信息，请参阅查询操作中的类型关系 (Visual Basic)。
示例
下面的示例演示对 ArrayList 的简单查询。 请注意，本示例在代码调用 Add 方法时使用对象初始值设定项，但这不是必需的。
Imports System.Collections
Imports System.Linq
Module Module1
Public Class Student
Public Property FirstName As String
Public Property LastName As String
Public Property Scores As Integer()
End Class
Sub Main()
Dim student1 As New Student With {.FirstName = "Svetlana",
.LastName = "Omelchenko",
.Scores = New Integer() {98, 92, 81, 60}}
Dim student2 As New Student With {.FirstName = "Claire",
.LastName = "O'Donnell",
.Scores = New Integer() {75, 84, 91, 39}}
Dim student3 As New Student With {.FirstName = "Cesar",
.LastName = "Garcia",
.Scores = New Integer() {97, 89, 85, 82}}
Dim student4 As New Student With {.FirstName = "Sven",
.LastName = "Mortensen",
.Scores = New Integer() {88, 94, 65, 91}}
Dim arrList As New ArrayList()
arrList.Add(student1)
arrList.Add(student2)
arrList.Add(student3)
arrList.Add(student4)
' Use an explicit type for non-generic collections
Dim query = From student As Student In arrList
Where student.Scores(0) > 95
Select student
For Each student As Student In query
Console.WriteLine(student.LastName & ": " & student.Scores(0))
Next
' Keep the console window open in debug mode.
Console.WriteLine("Press any key to exit.")
Console.ReadKey()
End Sub
End Module
' Output:
' Omelchenko: 98
' Garcia: 97
