Skip (Cláusula, Visual Basic)

Omite un número especificado de elementos de una colección y, a continuación, devuelve los elementos restantes.

Sintaxis

Skip count  

Partes

count
Necesario. Valor o expresión que se evalúa como el número de elementos de la secuencia que se va a omitir.

Comentarios

La cláusula Skip hace que una consulta omita los elementos al principio de una lista de resultados y devuelva los elementos restantes. El parámetro count especifica el número de elementos que se van a omitir.

Puede usar la cláusula Skip con la cláusula Take para devolver un rango de datos de cualquier segmento de una consulta. Para ello, pase el índice del primer elemento del rango a la cláusula Skip y el tamaño del rango a la cláusula Take.

Al usar la cláusula Skip en una consulta, es posible que también tenga que asegurarse de que los resultados se devuelven en un orden que permitirá que la cláusula Skip omita los resultados previstos. Consulte Cláusula Order By para más información sobre cómo ordenar los resultados de la consulta.

Puede usar la cláusula SkipWhile para especificar que solo se omiten ciertos elementos, en función de una condición suministrada.

Ejemplo

En el ejemplo de código siguiente, se usa la cláusula Skip junto con la cláusula Take para devolver datos de una consulta en páginas. La función GetCustomers usa la cláusula Skip para omitir los clientes de la lista hasta el valor de índice inicial suministrado y utiliza la cláusula Take para devolver una página de clientes a partir de dicho valor de índice.

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

Consulte también