Take Tümcesi (Visual Basic)

  • Makale
  • Okumak için 2 dakika

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

Syntax

Take count

Bölümler

count
Gereklidir. Dönüş sırasının öğe sayısına göre değerlendirilen bir değer veya ifade.

Açıklamalar

yan Take tümcesi, bir sorgunun sonuç listesinin başından belirtilen sayıda bitişik öğe eklemesine neden olur. Dahil etmek için öğe sayısı parametresi tarafından count belirtilir.

Sorgunun herhangi Take bir segmentinde Skip yer alan veri aralığını geri dönmek için yan tümcesini yan tümcesi ile birlikte kullanabilirsiniz. Bunu yapmak için aralığın ilk öğesinin dizinini yan tümcesine ve aralığın boyutunu yan Skip tümcesine Take iletir. Bu durumda, yan Take tümcesi yan tümceden sonra Skip belirtilmelidir.

Sorguda yan tümcesini kullanırken, sonuçların, yan tümcesini hedeflenen sonuçları içermesini sağlayacak bir sırayla döndürüldü emin Take olmak da gerekli Take olabilir. Sorgu sonuçlarını sıralama hakkında daha fazla bilgi için bkz. Order By Yan Tümcesi.

Sağlanan bir TakeWhile koşula bağlı olarak yalnızca belirli öğelerin döndürül olacağını belirtmek için yan tümcesini kullanabilirsiniz.

Örnek

Aşağıdaki kod örneği, sayfalarda Take bir sorgudan veri Skip dönmek için yan tümcesini yan tümcesi ile birlikte kullanır. GetCustomers işlevi, sağlanan başlangıç dizin değerine kadar listede müşterileri atlamak için yan tümcesini kullanır ve yan tümcesini kullanarak bu dizin değerinden başlayarak müşterilerin Skip Take bir sayfasını geri döner.

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.