Enumerable.Any メソッド

public:
generic <typename TSource>
[System::Runtime::CompilerServices::Extension]
 static bool Any(System::Collections::Generic::IEnumerable<TSource> ^ source);

public static bool Any<TSource>(this System.Collections.Generic.IEnumerable<TSource> source);

static member Any : seq<'Source> -> bool

<Extension()>
Public Function Any(Of TSource) (source As IEnumerable(Of TSource)) As Boolean

型パラメーター

パラメーター

返品

true ソース シーケンスに要素が含まれている場合。それ以外の場合は false。

例外

例

次のコード例では、 Any を使用して、シーケンスに要素が含まれているかどうかを判断する方法を示します。

List<int> numbers = new List<int> { 1, 2 };
bool hasElements = numbers.Any();

Console.WriteLine("The list {0} empty.",
    hasElements ? "is not" : "is");

// This code produces the following output:
//
// The list is not empty.

' Create a list of Integers.
Dim numbers As New List(Of Integer)(New Integer() {1, 2})

' Determine if the list contains any items.
Dim hasElements As Boolean = numbers.Any()

' Display the output.
Dim text As String = IIf(hasElements, "not ", "")
Console.WriteLine($"The list is {text}empty.")

' This code produces the following output:
'
' The list is not empty.

Any<TSource>(IEnumerable<TSource>) メソッドが返すブール値は、通常、where句 (Visual Basic のWhere句) の述語またはWhere<TSource>(IEnumerable<TSource>, Func<TSource,Boolean>) メソッドへの直接呼び出しで使用されます。 次の例では、この Any メソッドの使用方法を示します。

class Pet
{
    public string Name { get; set; }
    public int Age { get; set; }
}
class Person
{
    public string LastName { get; set; }
    public Pet[] Pets { get; set; }
}

public static void AnyEx2()
{
    List<Person> people = new List<Person>
        { new Person { LastName = "Haas",
                       Pets = new Pet[] { new Pet { Name="Barley", Age=10 },
                                          new Pet { Name="Boots", Age=14 },
                                          new Pet { Name="Whiskers", Age=6 }}},
          new Person { LastName = "Fakhouri",
                       Pets = new Pet[] { new Pet { Name = "Snowball", Age = 1}}},
          new Person { LastName = "Antebi",
                       Pets = new Pet[] { }},
          new Person { LastName = "Philips",
                       Pets = new Pet[] { new Pet { Name = "Sweetie", Age = 2},
                                          new Pet { Name = "Rover", Age = 13}} }
        };

    // Determine which people have a non-empty Pet array.
    IEnumerable<string> names = from person in people
                                where person.Pets.Any()
                                select person.LastName;

    foreach (string name in names)
    {
        Console.WriteLine(name);
    }

    /* This code produces the following output:

       Haas
       Fakhouri
       Philips
    */
}

Structure Pet
    Public Name As String
    Public Age As Integer
End Structure

Structure Person
    Public LastName As String
    Public Pets() As Pet
End Structure

Sub AnyEx2()
    Dim people As New List(Of Person)(New Person() _
{New Person With {.LastName = "Haas",
                  .Pets = New Pet() {New Pet With {.Name = "Barley", .Age = 10},
                                     New Pet With {.Name = "Boots", .Age = 14},
                                     New Pet With {.Name = "Whiskers", .Age = 6}}},
  New Person With {.LastName = "Fakhouri",
                   .Pets = New Pet() {New Pet With {.Name = "Snowball", .Age = 1}}},
  New Person With {.LastName = "Antebi",
                   .Pets = New Pet() {}},
  New Person With {.LastName = "Philips",
                   .Pets = New Pet() {New Pet With {.Name = "Sweetie", .Age = 2},
                                      New Pet With {.Name = "Rover", .Age = 13}}}})

    ' Determine which people have a non-empty Pet array.
    Dim names = From person In people
                Where person.Pets.Any()
                Select person.LastName

    For Each name As String In names
        Console.WriteLine(name)
    Next

    ' This code produces the following output:
    '
    ' Haas
    ' Fakhouri
    ' Philips

End Sub

注釈

sourceの列挙は、結果が特定されるとすぐに停止します。

Visual Basicクエリ式構文では、Aggregate Into Any() 句が Any の呼び出しに変換されます。

こちらもご覧ください

• Any<TSource>(IEnumerable<TSource>, Func<TSource,Boolean>)
• Aggregate 句 (Visual Basic)

public:
generic <typename TSource>
[System::Runtime::CompilerServices::Extension]
 static bool Any(System::Collections::Generic::IEnumerable<TSource> ^ source, Func<TSource, bool> ^ predicate);

public static bool Any<TSource>(this System.Collections.Generic.IEnumerable<TSource> source, Func<TSource,bool> predicate);

static member Any : seq<'Source> * Func<'Source, bool> -> bool

<Extension()>
Public Function Any(Of TSource) (source As IEnumerable(Of TSource), predicate As Func(Of TSource, Boolean)) As Boolean

型パラメーター

パラメーター

返品

true ソース シーケンスが空ではなく、その要素の少なくとも 1 つが指定された述語でテストに合格する場合。それ以外の場合は false。

例外

例

次のコード例では、 Any を使用して、シーケンス内の要素が条件を満たすかどうかを判断する方法を示します。

class Pet
{
    public string Name { get; set; }
    public int Age { get; set; }
    public bool Vaccinated { get; set; }
}

public static void AnyEx3()
{
    // Create an array of Pets.
    Pet[] pets =
        { new Pet { Name="Barley", Age=8, Vaccinated=true },
          new Pet { Name="Boots", Age=4, Vaccinated=false },
          new Pet { Name="Whiskers", Age=1, Vaccinated=false } };

    // Determine whether any pets over age 1 are also unvaccinated.
    bool unvaccinated =
        pets.Any(p => p.Age > 1 && !p.Vaccinated);

    Console.WriteLine(
        "There {0} unvaccinated animals over age one.",
        unvaccinated ? "are" : "are not any");
}

// This code produces the following output:
//
//  There are unvaccinated animals over age one.

Structure Pet
    Public Name As String
    Public Age As Integer
    Public Vaccinated As Boolean
End Structure

Shared Sub AnyEx3()
    ' Create a list of Pets
    Dim pets As New List(Of Pet)(New Pet() _
                         {New Pet With {.Name = "Barley", .Age = 8, .Vaccinated = True},
                          New Pet With {.Name = "Boots", .Age = 4, .Vaccinated = False},
                          New Pet With {.Name = "Whiskers", .Age = 1, .Vaccinated = False}})

    ' Determine whether any pets over age 1 are also unvaccinated.
    Dim unvaccinated As Boolean =
pets.Any(Function(pet) pet.Age > 1 And pet.Vaccinated = False)

    ' Display the output.
    Dim text As String = IIf(unvaccinated, "are", "are not")
    Console.WriteLine($"There {text} unvaccinated animals over age 1.")
End Sub

' This code produces the following output:
'
' There are unvaccinated animals over age 1.

注釈

sourceの列挙は、結果が特定されるとすぐに停止します。

Visual Basicクエリ式構文では、Aggregate Into Any() 句が Any の呼び出しに変換されます。

こちらもご覧ください

• Aggregate 句 (Visual Basic)