Not
Bu sayfaya erişim yetkilendirme gerektiriyor. Oturum açmayı veya dizinleri değiştirmeyi deneyebilirsiniz.
Bu sayfaya erişim yetkilendirme gerektiriyor. Dizinleri değiştirmeyi deneyebilirsiniz.
gibi IEnumerablegenel ArrayList olmayan koleksiyonları sorgulamak için LINQ kullanırken, aralık değişkeninin türünü koleksiyondaki nesnelerin belirli türünü yansıtacak şekilde açıkça bildirmeniz gerekir. Örneğin, bir ArrayListStudent nesneniz varsa, From Cümleniz şu şekilde görünmelidir:
Dim query = From student As Student In arrList
'...
Aralık değişkeninin türünü belirterek, ArrayList içindeki her öğeyi bir Student öğesine dönüştürürsünüz.
Bir sorgu ifadesinde açıkça yazılan bir aralık değişkeninin kullanılması, yöntemini çağırmaya Cast eşdeğerdir. Cast belirtilen atama gerçekleştirilemiyorsa bir istisna fırlatır. Cast ve OfType genel IEnumerable olmayan türlerde çalışan iki Standart Sorgu İşleci yöntemidir. Visual Basic'te, belirli bir aralık değişken türünden Cast emin olmak için veri kaynağında yöntemini açıkça çağırmanız gerekir. Daha fazla bilgi için bkz. Sorgu İşlemlerinde Tür İlişkileri (Visual Basic).
Örnek
Aşağıdaki örnek, ArrayList üzerinde basit bir sorgu göstermektedir. Bu örnekte kod yöntemini çağırdığında Add nesne başlatıcıları kullandığını, ancak bunun bir gereksinim olmadığını unutmayın.
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