在运行子程序时显示动画 gif [英] display animated gif while running a sub

问题描述

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

How do i keep an animated gif running while my app is running a sub. The whole UI is blocked so I've tried displaying it in another form but i get the same result.

推荐答案

两件事:

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

BG Worker 示例:

Example on 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

这篇关于在运行子程序时显示动画 gif的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！