共用方式為


Take while 子句 (Visual Basic)

只要指定的條件為 true ,就會包含集合中的專案,並略過其餘專案。

語法

Take While expression  

組件

術語 定義
expression 必須的。 表達式,表示要測試項目的條件。 運算式必須傳回 Boolean 值或功能對等專案,例如 Integer 要評估為 Boolean的 。

備註

Take While 句包含查詢結果開頭的專案,直到提供的 expression 傳回 false為止。 傳 expressionfalse之後,查詢會略過所有剩餘的專案。 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

另請參閱