Klausul Take While (Visual Basic)

Mencakup elemen dalam koleksi selama kondisi yang ditentukan adalah true dan mengembalikan elemen yang tersisa.

Sintaks

Take While expression  

Generator

Term Definisi
expression Harus diisi. Ekspresi yang mewakili kondisi untuk menguji elemen. Ekspresi harus menghasilkan nilai Boolean atau setara fungsional, seperti Integer yang akan dievaluasi sebagai Boolean.

Keterangan

Klausul Take While menyertakan elemen dari awal hasil kueri hingga yang disediakan expression menghasilkan false. Setelah expression menghasilkan false, kueri akan melewati semua elemen yang tersisa. expression diabaikan untuk hasil yang tersisa.

Klausul Take While berbeda dari klausul Where saat klausul Where dapat digunakan untuk menyertakan semua elemen dari kueri yang tidak memenuhi kondisi tertentu. Klausul Take While menyertakan elemen hanya sampai pertama kali kondisi tidak terpenuhi. Klausul Take While ini paling berguna saat Anda bekerja dengan hasil kueri yang dipesan.

Contoh

Contoh kode berikut menggunakan klausul Take While untuk mengambil hasil hingga pelanggan pertama tanpa pesanan apa pun ditemukan.

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

Lihat juga