触发Backgroundworker Completed事件

Question

我试图在后台进行一些计算时以单独的形式（progressForm）显示进度条（marque）。

我知道典型的方法是将计算包含在后台工作程序中并在主线程中显示进度表。这种方法将在我的应用程序中导致很多同步问题，因此我在后台工作进程内使用 progressForm.ShowDialog() 显示 ProgressForm。但我需要在应用程序中触发 Completed 事件来关闭表单。

这可能吗？

提前致谢。

Answer 1

一旦后台工作者的进度达到 100%，后台工作者的 RunWorkerCompleted 事件就会触发。

编辑 - 添加代码示例

    Dim WithEvents bgWorker As New BackgroundWorker With { _
    .WorkerReportsProgress = True, _
    .WorkerSupportsCancellation = True}

    Private Sub bgWorker_DoWork(ByVal sender As System.Object, ByVal e As System.ComponentModel.DoWorkEventArgs) Handles bgWorker.DoWork
        For i As Integer = 0 To 100
            'Threw in the thread.sleep to illustrate what's going on.  Otherwise, it happens too fast.
            Threading.Thread.Sleep(250)
            bgWorker.ReportProgress(i)
        Next
    End Sub

    Private Sub bgWorker_ProgressChanged(ByVal sender As System.Object, ByVal e As System.ComponentModel.ProgressChangedEventArgs) Handles bgWorker.ProgressChanged
        If e.ProgressPercentage Mod 10 = 0 Then
            MsgBox(e.ProgressPercentage.ToString)
        End If
    End Sub

    Private Sub bgWorker_RunWorkerCompleted(ByVal sender As System.Object, ByVal e As System.ComponentModel.RunWorkerCompletedEventArgs) Handles bgWorker.RunWorkerCompleted
        MsgBox("Done")
    End Sub