Take Tümcesi (Visual Basic)

Bir koleksiyonun başından itibaren belirtilen sayıda bitişik öğeyi döndürür.

Syntax

Take count  

Bölümler

count
Gereklidir. Döndürülecek dizi öğe sayısını değerlendiren bir değer veya ifade.

Açıklamalar

TakeYan tümce bir sorgunun bir sonuç listesinin başından itibaren belirtilen sayıda bitişik öğe içermesini sağlar. Dahil edilecek öğe sayısı parametresi tarafından belirtilir count .

Take Skip Bir sorgunun herhangi bir segmentinden bir veri aralığı döndürmek için yan tümcesini kullanın. Bunu yapmak için aralığın ilk öğesinin dizinini Skip yan tümcesine ve aralığın boyutunu Take yan tümcesine geçirin. Bu durumda yan tümce, yan Take tümcesinden sonra belirtilmelidir Skip .

TakeBir sorguda yan tümcesini kullandığınızda, sonuçların Take amaçlanan sonuçları dahil etmek için yan tümce sağlayacak bir sırada döndürüldüğünden de emin olmanız gerekebilir. Sorgu sonuçlarını sıralama hakkında daha fazla bilgi için bkz. order by yan tümcesi.

TakeWhileBelirtilen koşula bağlı olarak yalnızca belirli öğelerin döndürüleceğini belirtmek için yan tümcesini kullanabilirsiniz.

Örnek

Aşağıdaki kod örneği, yan tümcesini, Take Skip sayfalardaki bir sorgudan veri döndürmek için yan tümcesiyle birlikte kullanır. GetCustomers işlevi, Skip sağlanan başlangıç dizini değerine kadar listedeki müşterileri atlamak için yan tümcesini kullanır ve Take Bu dizin değerinden başlayan müşterilerin bir sayfasını döndürmek için yan tümcesini kullanır.

Public Sub PagingSample()
    Dim pageNumber As Integer = 0
    Dim pageSize As Integer = 10

    Dim customersPage = GetCustomers(pageNumber * pageSize, pageSize)

    Do While customersPage IsNot Nothing
        Console.WriteLine(vbCrLf & "Page: " & pageNumber + 1 & vbCrLf)

        For Each cust In customersPage
            Console.WriteLine(cust.CustomerID & ", " & cust.CompanyName)
        Next

        Console.WriteLine(vbCrLf)

        pageNumber += 1
        customersPage = GetCustomers(pageNumber * pageSize, pageSize)
    Loop
End Sub

Public Function GetCustomers(ByVal startIndex As Integer,
                             ByVal pageSize As Integer) As List(Of Customer)

    Dim customers = GetCustomerList()

    Dim returnCustomers = From cust In customers
                          Skip startIndex Take pageSize

    If returnCustomers.Count = 0 Then Return Nothing

    Return returnCustomers
End Function

Ayrıca bkz.