我创建了几个包含 BackgroundWorker 的不同类。我通常做的是在表单上有一个 BackgroundWorker 组件,该组件将在执行作业时打开,然后我将该实例传递给我的作业类的构造函数。
以下是您的工作类别可能的样子:
Private m_bwMain As BackgroundWorker
Public Sub New(ByVal bwMain As BackgroundWorker)
m_bwMain = bwMain
'additional setup code here
End Sub
要开始工作,您可以在开始下载按钮的 Click 事件处理程序中执行以下操作:
lblStatus.Text = "Initializing ..."
bgwMain.RunWorkerAsync(someFileName)
我将我的作业类声明为当前表单的私有成员,然后在 BackgroundWorker.DoWork 事件中实例化它。从那里您可以调用您的方法来下载文件:
Private Sub bgwMain_DoWork(ByVal sender As Object, ByVal e As System.ComponentModel.DoWorkEventArgs) Handles bgwMain.DoWork
m_oJobEngine = New JobEngine(CType(sender, BackgroundWorker))
m_oJobEngine.DownloadFile(CStr(e.Argument))
End Sub
要向用户报告进度,您可以在主窗体中处理类引发的事件。您只需要确保作业类对象声明具有 WithEvents 关键字。从这些处理程序中,您可以调用 BackgroundWorker 的 ReportProgress 方法。在 ReportProgress 中,您可以对 UI 进行任何更改以指示进度。这是一个例子:
Private Sub m_oJobEngine.DownloadProgress(ByVal bgw as Backgroundworker, ByVal bytesTransferred as Long) Handles m_oJobEngine.DownloadProgress
bgw.ReportProgress(0, bytesTransferred)
End Sub
Private Sub bgwMain_ProgressChanged(ByVal sender As Object, ByVal e As System.ComponentModel.ProgressChangedEventArgs) Handles bgwMain.ProgressChanged
lblStatus.Text = CLng(e.UserState).ToString & " bytes transferred."
End Sub
希望这可以帮助。