Task.WhenAll Metódus

Definíció

Névtér:
System.Threading.Tasks
Szerelvények:
mscorlib.dll, System.Threading.Tasks.dll
Szerelvény:
mscorlib.dll
Szerelvény:
System.Threading.Tasks.dll
Szerelvény:
netstandard.dll

Létrehoz egy feladatot, amely akkor fejeződik be, ha az összes megadott tevékenység befejeződött.

Túlterhelések

Name Description
WhenAll(IEnumerable<Task>)

Létrehoz egy feladatot, amely akkor fejeződik be, ha egy Task számbavételi gyűjtemény összes objektuma befejeződött.
WhenAll(Task[])

Létrehoz egy feladatot, amely akkor fejeződik be, ha egy Task tömb összes objektuma befejeződött.
WhenAll<TResult>(IEnumerable<Task<TResult>>)

Létrehoz egy feladatot, amely akkor fejeződik be, ha egy Task<TResult> számbavételi gyűjtemény összes objektuma befejeződött.
WhenAll<TResult>(Task<TResult>[])

Létrehoz egy feladatot, amely akkor fejeződik be, ha egy Task<TResult> tömb összes objektuma befejeződött.

WhenAll(IEnumerable<Task>)

Létrehoz egy feladatot, amely akkor fejeződik be, ha egy Task számbavételi gyűjtemény összes objektuma befejeződött.

public:
 static System::Threading::Tasks::Task ^ WhenAll(System::Collections::Generic::IEnumerable<System::Threading::Tasks::Task ^> ^ tasks);
public static System.Threading.Tasks.Task WhenAll(System.Collections.Generic.IEnumerable<System.Threading.Tasks.Task> tasks);
static member WhenAll : seq<System.Threading.Tasks.Task> -> System.Threading.Tasks.Task
Public Shared Function WhenAll (tasks As IEnumerable(Of Task)) As Task

Paraméterek

tasks
IEnumerable<Task>

A befejezésre váró feladatok.

Válaszok

Task

Az összes megadott tevékenység befejezését jelképező tevékenység.

Kivételek

ArgumentNullException

Az tasks argumentum a következő volt null: .

ArgumentException

A tasks gyűjtemény tartalmazott egy null feladatot.

Példák

Az alábbi példa olyan feladatokat hoz létre, amelyek egy tömb URL-címeit pingelik. A feladatok a List<Task> metódusnak WhenAll(IEnumerable<Task>) átadott gyűjteményben vannak tárolva. Miután a Wait metódus hívása biztosította, hogy az összes szál befejeződött, a példa megvizsgálja a Task.Status tulajdonságot annak megállapításához, hogy a tevékenységek hibásak-e.

using System;
using System.Collections.Generic;
using System.Net.NetworkInformation;
using System.Threading;
using System.Threading.Tasks;

public class Example
{
   public static void Main()
   {
      int failed = 0;
      var tasks = new List<Task>();
      String[] urls = { "www.adatum.com", "www.cohovineyard.com",
                        "www.cohowinery.com", "www.northwindtraders.com",
                        "www.contoso.com" };
      
      foreach (var value in urls) {
         var url = value;
         tasks.Add(Task.Run( () => { var png = new Ping();
                                     try {
                                        var reply = png.Send(url);
                                        if (!(reply.Status == IPStatus.Success)) {
                                           Interlocked.Increment(ref failed);
                                           throw new TimeoutException("Unable to reach " + url + ".");
                                        }
                                     }
                                     catch (PingException) {
                                        Interlocked.Increment(ref failed);
                                        throw;
                                     }
                                   }));
      }
      Task t = Task.WhenAll(tasks);
      try {
         t.Wait();
      }
      catch {}   

      if (t.Status == TaskStatus.RanToCompletion)
         Console.WriteLine("All ping attempts succeeded.");
      else if (t.Status == TaskStatus.Faulted)
         Console.WriteLine("{0} ping attempts failed", failed);      
   }
}
// The example displays output like the following:
//       5 ping attempts failed

open System
open System.Net.NetworkInformation
open System.Threading
open System.Threading.Tasks

let mutable failed = 0

let urls =
    [ "www.adatum.com"
      "www.cohovineyard.com"
      "www.cohowinery.com"
      "www.northwindtraders.com"
      "www.contoso.com" ]

let tasks =
    urls
    |> List.map (fun url ->
        Task.Run(fun () ->
            let png = new Ping()

            try
                let reply = png.Send url

                if reply.Status <> IPStatus.Success then
                    Interlocked.Increment &failed |> ignore
                    raise (TimeoutException $"Unable to reach {url}.")
            with :? PingException ->
                Interlocked.Increment &failed |> ignore
                reraise ()))

let t = Task.WhenAll tasks

try
    t.Wait()
with _ ->
    ()

if t.Status = TaskStatus.RanToCompletion then
    printfn "All ping attempts succeeded."
elif t.Status = TaskStatus.Faulted then
    printfn $"{failed} ping attempts failed"

// The example displays output like the following:
//       5 ping attempts failed

Imports System.Collections.Generic
Imports System.Net.NetworkInformation
Imports System.Threading
Imports System.Threading.Tasks

Module Example
   Public Sub Main()
      Dim failed As Integer = 0
      Dim tasks As New List(Of Task)()
      Dim urls() As String = { "www.adatum.com", "www.cohovineyard.com",
                              "www.cohowinery.com", "www.northwindtraders.com",
                              "www.contoso.com" }
      
      For Each value In urls
         Dim url As String = value
         tasks.Add(Task.Run( Sub()
                                Dim png As New Ping()
                                Try
                                   Dim reply = png.Send(url)
                                   If Not reply.Status = IPStatus.Success Then
                                      Interlocked.Increment(failed)
                                      Throw New TimeoutException("Unable to reach " + url + ".")
                                   End If
                                   Catch e As PingException
                                      Interlocked.Increment(failed)
                                      Throw
                                   End Try
                             End Sub))
      Next
      Dim t As Task = Task.WhenAll(tasks)
      Try
         t.Wait()
      Catch
      End Try   

      If t.Status = TaskStatus.RanToCompletion
         Console.WriteLine("All ping attempts succeeded.")
      ElseIf t.Status = TaskStatus.Faulted
         Console.WriteLine("{0} ping attempts failed", failed)      
      End If
   End Sub
End Module
' The example displays output like the following:
'     5 ping attempts failed

Megjegyzések

Az objektumot visszaadó Task metódus túlterheléseit WhenAll általában akkor hívjuk meg, ha egy tevékenységcsoport állapota vagy a tevékenységek egy halmaza által alkalmazott kivételek érdeklik.

Megjegyzés:

A hívási WhenAll(IEnumerable<Task>) metódus nem blokkolja a hívó szálat.

Ha a megadott tevékenységek bármelyike hibás állapotban fejeződik be, a visszaadott tevékenység is egy olyan állapotban Faulted fejeződik be, amelyben a kivételek tartalmazzák az egyes megadott tevékenységekhez tartozó le nem írt kivételek összesítését.

Ha a megadott tevékenységek egyike sem hibás, de legalább az egyiket megszakították, a visszaadott tevékenység az Canceled állapotban fejeződik be.

Ha egyik tevékenység sem hibás, és egyik tevékenység sem lett megszakítva, az eredményként kapott tevékenység állapota RanToCompletion megszűnik.

Ha a megadott tömb/számbavétel nem tartalmaz tevékenységeket, a visszaadott tevékenység azonnal átvált egy RanToCompletion állapotra, mielőtt visszakerül a hívóhoz.

A következőre érvényes:

WhenAll(Task[])

Létrehoz egy feladatot, amely akkor fejeződik be, ha egy Task tömb összes objektuma befejeződött.

public:
 static System::Threading::Tasks::Task ^ WhenAll(... cli::array <System::Threading::Tasks::Task ^> ^ tasks);
public static System.Threading.Tasks.Task WhenAll(params System.Threading.Tasks.Task[] tasks);
static member WhenAll : System.Threading.Tasks.Task[] -> System.Threading.Tasks.Task
Public Shared Function WhenAll (ParamArray tasks As Task()) As Task

Paraméterek

tasks
Task[]

A befejezésre váró feladatok.

Válaszok

Task

Az összes megadott tevékenység befejezését jelképező tevékenység.

Kivételek

ArgumentNullException

Az tasks argumentum a következő volt null: .

ArgumentException

A tasks tömb tartalmazott egy null feladatot.

Példák

Az alábbi példa olyan feladatokat hoz létre, amelyek egy tömb URL-címeit pingelik. A feladatok egy List<Task> tömbté konvertált gyűjteményben vannak tárolva, és átadódnak a WhenAll(IEnumerable<Task>) metódusnak. Miután a Wait metódus hívása biztosította, hogy az összes szál befejeződött, a példa megvizsgálja a Task.Status tulajdonságot annak megállapításához, hogy a tevékenységek hibásak-e.

using System;
using System.Collections.Generic;
using System.Net.NetworkInformation;
using System.Threading;
using System.Threading.Tasks;

public class Example
{
   public static async Task Main()
   {
      int failed = 0;
      var tasks = new List<Task>();
      String[] urls = { "www.adatum.com", "www.cohovineyard.com",
                        "www.cohowinery.com", "www.northwindtraders.com",
                        "www.contoso.com" };
      
      foreach (var value in urls) {
         var url = value;
         tasks.Add(Task.Run( () => { var png = new Ping();
                                     try {
                                        var reply = png.Send(url);
                                        if (!(reply.Status == IPStatus.Success)) {
                                           Interlocked.Increment(ref failed);
                                           throw new TimeoutException("Unable to reach " + url + ".");
                                        }
                                     }
                                     catch (PingException) {
                                        Interlocked.Increment(ref failed);
                                        throw;
                                     }
                                   }));
      }
      Task t = Task.WhenAll(tasks.ToArray());
      try {
         await t;
      }
      catch {}   

      if (t.Status == TaskStatus.RanToCompletion)
         Console.WriteLine("All ping attempts succeeded.");
      else if (t.Status == TaskStatus.Faulted)
         Console.WriteLine("{0} ping attempts failed", failed);      
   }
}
// The example displays output like the following:
//       5 ping attempts failed

open System
open System.Net.NetworkInformation
open System.Threading
open System.Threading.Tasks

let mutable failed = 0

let urls =
    [| "www.adatum.com"
       "www.cohovineyard.com"
       "www.cohowinery.com"
       "www.northwindtraders.com"
       "www.contoso.com" |]

let tasks =
    urls
    |> Array.map (fun url ->
        Task.Run(fun () ->
            let png = new Ping()

            try
                let reply = png.Send url

                if reply.Status <> IPStatus.Success then
                    Interlocked.Increment &failed |> ignore
                    raise (TimeoutException $"Unable to reach {url}.")
            with :? PingException ->
                Interlocked.Increment &failed |> ignore
                reraise ()))

let main =
    task {
        let t = Task.WhenAll tasks

        try
            do! t
        with _ ->
            ()

        if t.Status = TaskStatus.RanToCompletion then
            printfn "All ping attempts succeeded."
        elif t.Status = TaskStatus.Faulted then
            printfn $"{failed} ping attempts failed"
    }

main.Wait()
// The example displays output like the following:
//       5 ping attempts failed

Imports System.Collections.Generic
Imports System.Net.NetworkInformation
Imports System.Threading
Imports System.Threading.Tasks

Module Example
   Public Sub Main()
      Dim failed As Integer = 0
      Dim tasks As New List(Of Task)()
      Dim urls() As String = { "www.adatum.com", "www.cohovineyard.com",
                              "www.cohowinery.com", "www.northwindtraders.com",
                              "www.contoso.com" }
      
      For Each value In urls
         Dim url As String = value
         tasks.Add(Task.Run( Sub()
                                Dim png As New Ping()
                                Try
                                   Dim reply = png.Send(url)
                                   If Not reply.Status = IPStatus.Success Then
                                      Interlocked.Increment(failed)
                                      Throw New TimeoutException("Unable to reach " + url + ".")
                                   End If
                                   Catch e As PingException
                                      Interlocked.Increment(failed)
                                      Throw
                                   End Try
                             End Sub))
      Next
      Dim t As Task = Task.WhenAll(tasks.ToArray())
      Try
         t.Wait()
      Catch
      End Try   

      If t.Status = TaskStatus.RanToCompletion
         Console.WriteLine("All ping attempts succeeded.")
      ElseIf t.Status = TaskStatus.Faulted
         Console.WriteLine("{0} ping attempts failed", failed)      
      End If
   End Sub
End Module
' The example displays output like the following:
'     5 ping attempts failed

Megjegyzések

Az objektumot visszaadó Task metódus túlterheléseit WhenAll általában akkor hívjuk meg, ha egy tevékenységcsoport állapota vagy a tevékenységek egy halmaza által alkalmazott kivételek érdeklik.

Megjegyzés:

A hívási WhenAll(Task[]) metódus nem blokkolja a hívó szálat.

Ha a megadott tevékenységek bármelyike hibás állapotban fejeződik be, a visszaadott tevékenység is egy olyan állapotban Faulted fejeződik be, amelyben a kivételek tartalmazzák az egyes megadott tevékenységekhez tartozó le nem írt kivételek összesítését.

Ha a megadott tevékenységek egyike sem hibás, de legalább az egyiket megszakították, a visszaadott tevékenység az Canceled állapotban fejeződik be.

Ha egyik tevékenység sem hibás, és egyik tevékenység sem lett megszakítva, az eredményként kapott tevékenység állapota RanToCompletion megszűnik.

Ha a megadott tömb/számbavétel nem tartalmaz tevékenységeket, a visszaadott tevékenység azonnal átvált egy RanToCompletion állapotra, mielőtt visszakerül a hívóhoz.

A következőre érvényes:

WhenAll<TResult>(IEnumerable<Task<TResult>>)

Létrehoz egy feladatot, amely akkor fejeződik be, ha egy Task<TResult> számbavételi gyűjtemény összes objektuma befejeződött.

public:
generic <typename TResult>
 static System::Threading::Tasks::Task<cli::array <TResult> ^> ^ WhenAll(System::Collections::Generic::IEnumerable<System::Threading::Tasks::Task<TResult> ^> ^ tasks);
public static System.Threading.Tasks.Task<TResult[]> WhenAll<TResult>(System.Collections.Generic.IEnumerable<System.Threading.Tasks.Task<TResult>> tasks);
static member WhenAll : seq<System.Threading.Tasks.Task<'Result>> -> System.Threading.Tasks.Task<'Result[]>
Public Shared Function WhenAll(Of TResult) (tasks As IEnumerable(Of Task(Of TResult))) As Task(Of TResult())

Típusparaméterek

TResult

A befejezett tevékenység típusa.

Paraméterek

tasks
IEnumerable<Task<TResult>>

A befejezésre váró feladatok.

Válaszok

Task<TResult[]>

Az összes megadott tevékenység befejezését jelképező tevékenység.

Kivételek

ArgumentNullException

Az tasks argumentum a következő volt null: .

ArgumentException

A tasks gyűjtemény tartalmazott egy null feladatot.

Példák

Az alábbi példa tíz feladatot hoz létre, amelyek mindegyike létrehoz egy véletlenszerű számgenerátort, amely 1000 véletlenszerű számot hoz létre 1 és 1000 között, és kiszámítja a középértéküket. A Delay(Int32) módszer a véletlenszerű számgenerátorok példányosításának késleltetésére szolgál, hogy azok ne azonos magértékekkel legyenek létrehozva. A metódus hívása WhenAll ezután egy Int64 tömböt ad vissza, amely az egyes tevékenységek által kiszámított átlagot tartalmazza. Ezeket a függvények a teljes középérték kiszámításához használják.

using System;
using System.Collections.Generic;
using System.Threading.Tasks;

public class Example
{
   public static void Main()
   {
      var tasks = new List<Task<long>>();
      for (int ctr = 1; ctr <= 10; ctr++) {
         int delayInterval = 18 * ctr;
         tasks.Add(Task.Run(async () => { long total = 0;
                                          await Task.Delay(delayInterval);
                                          var rnd = new Random();
                                          // Generate 1,000 random numbers.
                                          for (int n = 1; n <= 1000; n++)
                                             total += rnd.Next(0, 1000);
                                          return total; } ));
      }
      var continuation = Task.WhenAll(tasks);
      try {
         continuation.Wait();
      }
      catch (AggregateException)
      { }
   
      if (continuation.Status == TaskStatus.RanToCompletion) {
         long grandTotal = 0;
         foreach (var result in continuation.Result) {
            grandTotal += result;
            Console.WriteLine("Mean: {0:N2}, n = 1,000", result/1000.0);
         }
   
         Console.WriteLine("\nMean of Means: {0:N2}, n = 10,000",
                           grandTotal/10000);
      }
      // Display information on faulted tasks.
      else {
         foreach (var t in tasks) {
            Console.WriteLine("Task {0}: {1}", t.Id, t.Status);
         }
      }
   }
}
// The example displays output like the following:
//       Mean: 506.34, n = 1,000
//       Mean: 504.69, n = 1,000
//       Mean: 489.32, n = 1,000
//       Mean: 505.96, n = 1,000
//       Mean: 515.31, n = 1,000
//       Mean: 499.94, n = 1,000
//       Mean: 496.92, n = 1,000
//       Mean: 508.58, n = 1,000
//       Mean: 494.88, n = 1,000
//       Mean: 493.53, n = 1,000
//
//       Mean of Means: 501.55, n = 10,000

open System
open System.Threading.Tasks

let tasks =
    [| for i = 1 to 10 do
           let delayInterval = 18 * i

           task {
               let mutable total = 0L
               do! Task.Delay delayInterval
               let rnd = Random()

               for _ = 1 to 1000 do
                   total <- total + (rnd.Next(0, 1000) |> int64)

               return total
           } |]

let continuation = Task.WhenAll tasks

try
    continuation.Wait()

with :? AggregateException ->
    ()

if continuation.Status = TaskStatus.RanToCompletion then
    for result in continuation.Result do
        printfn $"Mean: {float result / 1000.:N2}, n = 1,000"

    let grandTotal = continuation.Result |> Array.sum

    printfn $"\nMean of Means: {float grandTotal / 10000.:N2}, n = 10,000"

// Display information on faulted tasks.
else
    for t in tasks do
        printfn $"Task {t.Id}: {t.Status}"

// The example displays output like the following:
//       Mean: 506.34, n = 1,000
//       Mean: 504.69, n = 1,000
//       Mean: 489.32, n = 1,000
//       Mean: 505.96, n = 1,000
//       Mean: 515.31, n = 1,000
//       Mean: 499.94, n = 1,000
//       Mean: 496.92, n = 1,000
//       Mean: 508.58, n = 1,000
//       Mean: 494.88, n = 1,000
//       Mean: 493.53, n = 1,000
//
//       Mean of Means: 501.55, n = 10,000

Imports System.Collections.Generic
Imports System.Threading.Tasks

Module Example
   Public Sub Main()
      Dim tasks As New List(Of Task(Of Long))()
      For ctr As Integer = 1 To 10
         Dim delayInterval As Integer = 18 * ctr
         tasks.Add(Task.Run(Async Function()
                               Dim total As Long = 0
                               Await Task.Delay(delayInterval)
                               Dim rnd As New Random()
                               ' Generate 1,000 random numbers.
                               For n As Integer = 1 To 1000
                                  total += rnd.Next(0, 1000)
                               Next
                               Return total
                            End Function))
      Next
      Dim continuation = Task.WhenAll(tasks)
      Try
         continuation.Wait()
      Catch ae As AggregateException
      End Try
      
      If continuation.Status = TaskStatus.RanToCompletion Then
         Dim grandTotal As Long = 0
         For Each result in continuation.Result
            grandTotal += result
            Console.WriteLine("Mean: {0:N2}, n = 1,000", result/1000)
         Next
         Console.WriteLine()
         Console.WriteLine("Mean of Means: {0:N2}, n = 10,000",
                           grandTotal/10000)
      ' Display information on faulted tasks.
      Else 
         For Each t In tasks
            Console.WriteLine("Task {0}: {1}", t.Id, t.Status)
         Next
      End If
   End Sub
End Module
' The example displays output like the following:
'       Mean: 506.34, n = 1,000
'       Mean: 504.69, n = 1,000
'       Mean: 489.32, n = 1,000
'       Mean: 505.96, n = 1,000
'       Mean: 515.31, n = 1,000
'       Mean: 499.94, n = 1,000
'       Mean: 496.92, n = 1,000
'       Mean: 508.58, n = 1,000
'       Mean: 494.88, n = 1,000
'       Mean: 493.53, n = 1,000
'
'       Mean of Means: 501.55, n = 10,000

Ebben az esetben a tíz feladat egy List<T> objektumban lesz tárolva. List<T> implementálja az interfészt IEnumerable<T> .

Megjegyzések

A hívási WhenAll<TResult>(IEnumerable<Task<TResult>>) metódus nem blokkolja a hívó szálat. A visszaadott Result tulajdonság hívása azonban blokkolja a hívási szálat.

Ha a megadott tevékenységek bármelyike hibás állapotban fejeződik be, a visszaadott tevékenység is egy olyan állapotban Faulted fejeződik be, amelyben a kivételek tartalmazzák az egyes megadott tevékenységekhez tartozó le nem írt kivételek összesítését.

Ha a megadott tevékenységek egyike sem hibás, de legalább az egyiket megszakították, a visszaadott tevékenység az Canceled állapotban fejeződik be.

Ha egyik tevékenység sem hibás, és egyik tevékenység sem lett megszakítva, az eredményként kapott tevékenység állapota RanToCompletion megszűnik. A Task<TResult>.Result visszaadott tevékenység tulajdonsága olyan tömbre lesz beállítva, amely a megadott tevékenységek összes eredményét a megadott sorrendben tartalmazza (például ha a bemeneti tevékenységek tömbje t1, t2, t3 értéket tartalmaz, akkor a kimeneti tevékenység tulajdonsága Task<TResult>.Result egy holt arr[0] == t1.Result, arr[1] == t2.Result, and arr[2] == t3.Result)értéket ad visszaTResult[].

Ha az tasks argumentum nem tartalmaz tevékenységeket, a visszaadott tevékenység azonnal átvált egy RanToCompletion állapotra, mielőtt visszakerül a hívóhoz. A visszaadott TResult[] tömb 0 elemből álló tömb lesz.

A következőre érvényes:

WhenAll<TResult>(Task<TResult>[])

Létrehoz egy feladatot, amely akkor fejeződik be, ha egy Task<TResult> tömb összes objektuma befejeződött.

public:
generic <typename TResult>
 static System::Threading::Tasks::Task<cli::array <TResult> ^> ^ WhenAll(... cli::array <System::Threading::Tasks::Task<TResult> ^> ^ tasks);
public static System.Threading.Tasks.Task<TResult[]> WhenAll<TResult>(params System.Threading.Tasks.Task<TResult>[] tasks);
static member WhenAll : System.Threading.Tasks.Task<'Result>[] -> System.Threading.Tasks.Task<'Result[]>
Public Shared Function WhenAll(Of TResult) (ParamArray tasks As Task(Of TResult)()) As Task(Of TResult())

Típusparaméterek

TResult

A befejezett tevékenység típusa.

Paraméterek

tasks
Task<TResult>[]

A befejezésre váró feladatok.

Válaszok

Task<TResult[]>

Az összes megadott tevékenység befejezését jelképező tevékenység.

Kivételek

ArgumentNullException

Az tasks argumentum a következő volt null: .

ArgumentException

A tasks tömb tartalmazott egy null feladatot.

Példák

Az alábbi példa tíz feladatot hoz létre, amelyek mindegyike létrehoz egy véletlenszerű számgenerátort, amely 1000 véletlenszerű számot hoz létre 1 és 1000 között, és kiszámítja a középértéküket. Ebben az esetben a tíz feladat egy Task<Int64> tömbben van tárolva. A Delay(Int32) módszer a véletlenszerű számgenerátorok példányosításának késleltetésére szolgál, hogy azok ne azonos magértékekkel legyenek létrehozva. A metódus hívása WhenAll ezután egy Int64 tömböt ad vissza, amely az egyes tevékenységek által kiszámított átlagot tartalmazza. Ezeket a függvények a teljes középérték kiszámításához használják.

using System;
using System.Collections.Generic;
using System.Threading.Tasks;

public class Example
{
   public static void Main()
   {
      var tasks = new Task<long>[10];
      for (int ctr = 1; ctr <= 10; ctr++) {
         int delayInterval = 18 * ctr;
         tasks[ctr - 1] = Task.Run(async () => { long total = 0;
                                                 await Task.Delay(delayInterval);
                                                 var rnd = new Random();
                                                 // Generate 1,000 random numbers.
                                                 for (int n = 1; n <= 1000; n++)
                                                    total += rnd.Next(0, 1000);

                                                 return total; } );
      }
      var continuation = Task.WhenAll(tasks);
      try {
         continuation.Wait();
      }
      catch (AggregateException)
      {}
   
      if (continuation.Status == TaskStatus.RanToCompletion) {
         long grandTotal = 0;
         foreach (var result in continuation.Result) {
            grandTotal += result;
            Console.WriteLine("Mean: {0:N2}, n = 1,000", result/1000.0);
         }
   
         Console.WriteLine("\nMean of Means: {0:N2}, n = 10,000",
                           grandTotal/10000);
      }
      // Display information on faulted tasks.
      else { 
         foreach (var t in tasks)
            Console.WriteLine("Task {0}: {1}", t.Id, t.Status);
      }
   }
}
// The example displays output like the following:
//       Mean: 506.38, n = 1,000
//       Mean: 501.01, n = 1,000
//       Mean: 505.36, n = 1,000
//       Mean: 492.00, n = 1,000
//       Mean: 508.36, n = 1,000
//       Mean: 503.99, n = 1,000
//       Mean: 504.95, n = 1,000
//       Mean: 508.58, n = 1,000
//       Mean: 490.23, n = 1,000
//       Mean: 501.59, n = 1,000
//
//       Mean of Means: 502.00, n = 10,000

open System
open System.Threading.Tasks

let tasks =
    [| for i = 1 to 10 do
           let delayInterval = 18 * i

           task {
               let mutable total = 0L
               do! Task.Delay delayInterval
               let rnd = Random()

               for _ = 1 to 1000 do
                   total <- total + (rnd.Next(0, 1000) |> int64)

               return total
           } |]

let continuation = Task.WhenAll tasks

try
    continuation.Wait()

with :? AggregateException ->
    ()

if continuation.Status = TaskStatus.RanToCompletion then
    for result in continuation.Result do
        printfn $"Mean: {float result / 1000.:N2}, n = 1,000"

    let grandTotal = Array.sum continuation.Result

    printfn $"\nMean of Means: {float grandTotal / 10000.:N2}, n = 10,000"

// Display information on faulted tasks.
else
    for t in tasks do
        printfn $"Task {t.Id}: {t.Status}"

// The example displays output like the following:
//       Mean: 506.38, n = 1,000
//       Mean: 501.01, n = 1,000
//       Mean: 505.36, n = 1,000
//       Mean: 492.00, n = 1,000
//       Mean: 508.36, n = 1,000
//       Mean: 503.99, n = 1,000
//       Mean: 504.95, n = 1,000
//       Mean: 508.58, n = 1,000
//       Mean: 490.23, n = 1,000
//       Mean: 501.59, n = 1,000
//
//       Mean of Means: 502.00, n = 10,000

Imports System.Collections.Generic
Imports System.Threading.Tasks

Module Example
   Public Sub Main()
      Dim tasks(9) As Task(Of Long)
      For ctr As Integer = 1 To 10
         Dim delayInterval As Integer = 18 * ctr
         tasks(ctr - 1) =Task.Run(Async Function()
                                     Dim total As Long = 0
                                     Await Task.Delay(delayInterval)
                                     Dim rnd As New Random()
                                     ' Generate 1,000 random numbers.
                                     For n As Integer = 1 To 1000
                                        total += rnd.Next(0, 1000)
                                     Next
                                     Return total
                                  End Function)
      Next
      Dim continuation = Task.WhenAll(tasks)
      Try
         continuation.Wait()
      Catch ae As AggregateException
      End Try
         
      If continuation.Status = TaskStatus.RanToCompletion Then
         Dim grandTotal As Long = 0
         For Each result in continuation.Result
            grandTotal += result
            Console.WriteLine("Mean: {0:N2}, n = 1,000", result/1000)
         Next
         Console.WriteLine()
         Console.WriteLine("Mean of Means: {0:N2}, n = 10,000",
                           grandTotal/10000)
      ' Display information on faulted tasks.
      Else 
         For Each t In tasks
            Console.WriteLine("Task {0}: {1}", t.Id, t.Status)
         Next
      End If
   End Sub
End Module
' The example displays output like the following:
'       Mean: 506.38, n = 1,000
'       Mean: 501.01, n = 1,000
'       Mean: 505.36, n = 1,000
'       Mean: 492.00, n = 1,000
'       Mean: 508.36, n = 1,000
'       Mean: 503.99, n = 1,000
'       Mean: 504.95, n = 1,000
'       Mean: 508.58, n = 1,000
'       Mean: 490.23, n = 1,000
'       Mean: 501.59, n = 1,000
'
'       Mean of Means: 502.00, n = 10,000

Megjegyzések

A hívási WhenAll<TResult>(Task<TResult>[]) metódus nem blokkolja a hívó szálat. A visszaadott Result tulajdonság hívása azonban blokkolja a hívási szálat.

Ha a megadott tevékenységek bármelyike hibás állapotban fejeződik be, a visszaadott tevékenység is egy olyan állapotban Faulted fejeződik be, amelyben a kivételek tartalmazzák az egyes megadott tevékenységekhez tartozó le nem írt kivételek összesítését.

Ha a megadott tevékenységek egyike sem hibás, de legalább az egyiket megszakították, a visszaadott tevékenység az Canceled állapotban fejeződik be.

Ha egyik tevékenység sem hibás, és egyik tevékenység sem lett megszakítva, az eredményként kapott tevékenység állapota RanToCompletion megszűnik. A Result visszaadott tevékenység olyan tömbre lesz beállítva, amely a megadott tevékenységek összes eredményét a megadott sorrendben tartalmazza (például ha a bemeneti tevékenységek tömbje t1, t2, t3 értéket tartalmaz, akkor a kimeneti tevékenység Result eredménye egy TResult[] hol arr[0] == t1.Result, arr[1] == t2.Result, and arr[2] == t3.Result)lesz.

Ha a megadott tömb/számbavétel nem tartalmaz tevékenységeket, a visszaadott tevékenység azonnal átvált egy RanToCompletion állapotra, mielőtt visszakerül a hívóhoz. A visszaadott TResult[] tömb 0 elemből álló tömb lesz.

A következőre érvényes: