vb.net - 运行子程序时显示动画 gif

Question

当我的应用程序运行子程序时，如何保持 gif 动画运行。整个用户界面被阻止，所以我尝试以另一种形式显示它，但我得到了相同的结果。

Answer 1

有两件事:

• 使用BackgroundWorker(示例如下)
• 如果可以的话，最好使用不确定的进度条，但这取决于所使用的技术。

BG Worker 示例:

Private wrkDeploy As New BackgroundWorker()

Private Sub wndMain_Loaded(ByVal sender As Object, ByVal e As RoutedEventArgs)
    AddHandler wrkDeploy.DoWork, AddressOf wrk_DoWork
    AddHandler wrkDeploy.RunWorkerCompleted, AddressOf wrk_RunWorkerCompleted
End Sub

Private Sub wrk_RunWorkerCompleted(ByVal sender As Object, ByVal e As RunWorkerCompletedEventArgs)
    ' Hide Gif and start normal UI process again
End Sub

Private Sub wrk_DoWork(ByVal sender As Object, ByVal e As DoWorkEventArgs)
    ' Do all heavy work here
End Sub

Private Sub btnFilter_Click(ByVal sender As Object, ByVal e As RoutedEventArgs)
    ' Show GIF and disable whatever you need to
    wrkDeploy.RunWorkerAsync()
End Sub