在 .NET 4.5 中使用 await 使任务超时

Question

我正在 VB.NET 4.5 中尝试 Async / Await 并希望完成我的任务 如果在一定时间内未完成，则超时。我有

Await Task.Run( Sub() PerformSomeAction() )

这看起来很整洁。我还看到有一种带有取消令牌的 Task.Run 形式。如果超时，我如何使用它来取消任务？

编辑

我有以下原型解决方案

    Dim cts = New CancellationTokenSource()
    Dim ct As CancellationToken = cts.Token
    Dim delay = Task.Delay(1000)
    Dim completed = Await Task.WhenAny(Task.Run(Sub() PerfomSomeAction(ct), ct), delay)
    If completed Is delay Then
            cts.Cancel()
    End If

这看起来很嘈杂的代码。这个好吗？另一个想法是处理 超时作为例外并使用 cts.CancelAfter。像这样？？

    Dim cts = New CancellationTokenSource()
    Dim ct As CancellationToken = cts.Token
    try
        cts.CancelAfter(1000) 'ms
        Dim completed = Task.Run(Sub() PerformSomeAction(ct), ct)
    catch SomeTimeoutException
    end try

如果我得到了 PerformSomeAction，我会抛出 SomeTimeoutException 检测取消令牌。

Answer 1

Tasks 支持协同取消，这意味着如果你想取消已经运行的Task，Task 中的代码必须支持取消，它决定何时取消。实现这一点的方法是将取消令牌传递给该方法，并在该方法代码中的适当位置调用ThrowIfCancellationRequested()。

如果Task 中的代码不支持取消，则没有明确的方法可以取消或中止它。