Take While Clause
Réduire la table des matières
Développer la table des matières
Pour afficher l’article en anglais, activez la case d’option Anglais. Vous pouvez aussi afficher la version anglaise dans une fenêtre contextuelle en faisant glisser le pointeur de la souris sur le texte.
Traduction
Anglais

Take While Clause (Visual Basic)

 

Inclut des éléments dans une collection tant qu'une condition spécifiée est true et ignore les éléments restants.

Take While expression

Terme

Définition

expression

Obligatoire.Expression représentant une condition pour tester des éléments.L'expression doit retourner une valeur Boolean ou un équivalent fonctionnel, tel qu'un Integer à évaluer comme un Boolean.

La clause Take While inclut des éléments depuis le démarrage d'un résultat de requête, jusqu'à ce que l' expression fournie retourne la valeur false.Après que l'expression a retourné la valeur false, la requête ignore tous les éléments restants.L' expression est ignorée pour les résultats restants.

La clause Take While diffère de la clause Where en ce sens que la clause Where peut être utilisée pour inclure tous les éléments d'une requête qui remplissent une condition particulière.La clause Take While inclut des éléments jusqu'à la première fois que la condition n'est pas remplie uniquement.La clause Take While est particulièrement utile lorsque vous travaillez avec un résultat de requête commandé.

L'exemple de code suivant utilise la clause Take While pour récupérer des résultats jusqu'au premier client sans commande.

Public Sub TakeWhileSample()
  Dim customers = GetCustomerList()

  ' Return customers until the first customer with no orders is found.
  Dim customersWithOrders = From cust In customers
                            Order By cust.Orders.Count Descending
                            Take While HasOrders(cust)

  For Each cust In customersWithOrders
    Console.WriteLine(cust.CompanyName & " (" & cust.Orders.Length & ")")
  Next
End Sub

Public Function HasOrders(ByVal cust As Customer) As Boolean
  If cust.Orders.Length > 0 Then Return True

  Return False
End Function
Afficher:
© 2016 Microsoft