Catatan
Akses ke halaman ini memerlukan otorisasi. Anda dapat mencoba masuk atau mengubah direktori.
Akses ke halaman ini memerlukan otorisasi. Anda dapat mencoba mengubah direktori.
Menyertakan elemen dalam koleksi selama kondisi yang ditentukan adalah true dan melewati elemen yang tersisa.
Sintaksis
Take While expression
Bagian
| Istilah | Definisi |
|---|---|
expression |
Dibutuhkan. Ekspresi yang mewakili kondisi untuk menguji elemen. Ekspresi harus mengembalikan Boolean nilai atau setara fungsional, seperti yang Integer akan dievaluasi sebagai Boolean. |
Komentar
Klausa Take While menyertakan elemen dari awal hasil kueri hingga yang disediakan expression mengembalikan false. Setelah mengembalikan expressionfalse, kueri akan melewati semua elemen yang tersisa.
expression diabaikan untuk hasil yang tersisa.
Klausa Take While berbeda dari Where klausul di mana Where klausa dapat digunakan untuk menyertakan semua elemen dari kueri yang memenuhi kondisi tertentu. Klausul Take While ini mencakup elemen hanya sampai pertama kali kondisi tidak terpenuhi. Klausa Take While ini paling berguna saat Anda bekerja dengan hasil kueri yang diurutkan.
Contoh
Contoh kode berikut menggunakan klausul Take While untuk mengambil hasil sampai pelanggan pertama tanpa pesanan 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