Take While Clause (Visual Basic)
Includes elements in a collection as long as a specified condition is true and bypasses the remaining elements.
The Take While clause includes elements from the start of a query result until the supplied expression returns false. After the expression returns false, the query will bypass all remaining elements. The expression is ignored for the remaining results.
The Take While clause differs from the Where clause in that the Where clause can be used to include all elements from a query that meet a particular condition. The Take While clause includes elements only until the first time that the condition is not satisfied. The Take While clause is most useful when you are working with an ordered query result.
The following code example uses the Take While clause to retrieve results until the first customer without any orders is found.
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