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