Take While 子句 (Visual Basic)
只要指定的条件为 true，就包含集合中相应的元素，并跳过剩余的元素。
Take While expression
部件
术语 |
定义 |
expression |
必选。 表示元素测试条件的表达式。 该表达式必须返回 Boolean 值或功能上等效的值，例如计算结果为 Boolean 的 Integer。 |
备注
Take While 子句从查询结果的开头包含元素，直到提供的 expression 返回 false 为止。 在 expression 返回 false 后，查询会跳过所有剩余元素。 对于剩余结果，将忽略 expression。
Take While 子句与 Where 子句的不同之处在于，Where 子句可以用于包含查询中所有满足特定条件的元素。 Take While 子句仅包含第一次不满足条件之前的元素。 在处理经过排序的查询结果时，Take While 子句最有用。
示例
下面的代码示例使用 Take While 子句检索结果，直到找到第一个没有任何订单的客户为止。
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