【VB.NET】LINQの使い方（All, Any）

LINQ

2024.10.272024.11.02

ALL：すべての要素が条件を満たす場合、Trueを返す

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Dim dt As New DataTable
        With dt
            .Columns.Add("Name", GetType(String)) '氏名
            .Columns.Add("Country", GetType(String)) '出身国
            .Rows.Add("アリス", "アメリカ")
            .Rows.Add("ボブ", "アメリカ")
        End With

        '空データがある場合、Falseを返す
        Dim bool = dt.AsEnumerable.All(Function(dr) dr("Name") <> "" And
                                                    dr("Country") <> "")
        '出力結果：True

    End Sub

Any：条件を満たす要素が1つ以上ある場合、Trueを返す

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Dim dt As New DataTable
        With dt
            .Columns.Add("Name", GetType(String)) '氏名
            .Columns.Add("Country", GetType(String)) '出身国
            .Rows.Add("アリス", "アメリカ")
            .Rows.Add("ボブ", "アメリカ")
        End With

        '1件でもデータがある場合、Trueを返す
        Dim bool = dt.AsEnumerable.Any()
        
        '出力結果：True

    End Sub