如何在忙碌时添加加载动画

时间:2014-03-07 13:08:53

标签: vb.net

我想在表单加载时添加加载动画..我尝试了背景工作但我无法让它工作..plz帮助我...

  Private Sub BackgroundWorker1_DoWork(sender As Object, e As System.ComponentModel.DoWorkEventArgs) Handles BackgroundWorker1.DoWork
    CharTz.Show()
End Sub

  Private Sub BackgroundWorker1_ProgressChanged(sender As Object, e As System.ComponentModel.ProgressChangedEventArgs) Handles BackgroundWorker1.ProgressChanged
    loadingscreen.show()
End Sub

 Private Sub BackgroundWorker1_RunWorkerCompleted(sender As Object, e As System.ComponentModel.RunWorkerCompletedEventArgs) Handles BackgroundWorker1.RunWorkerCompleted
    loadingscreen.close()
End Sub

1 个答案:

答案 0 :(得分:1)

所有UI内容都必须在UI线程上完成。从后台工作人员显示表单是没有意义的。显示表单是一个UI事物,因此需要在主UI线程上完成。我很确定“显示”需要3-4秒才是真的。做某事可能需要3-4秒,但这不是显示形式部分需要那么长时间。这种形式必须在加载时做一些事情,这会减慢它的速度。 那是应该放在后台工作线程中的东西。如果所有慢速逻辑都在后台线程中完成,那么表单将非常快速地显示,然后它可以显示某种动画,直到后台线程完成工作。