Vb.net 如何在动画忙时添加加载动画

我想在窗体加载时添加加载动画..我尝试了backgroundworker，但无法使其工作..请帮助我

  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

---

所有的UI工作都必须在UI线程上完成。从后台工作程序显示表单是没有意义的。显示表单是一项UI工作，因此需要在主UI线程上完成。我很确定“大约需要3-4秒才能显示”这句话不是真的。做某件事可能需要3-4秒，但并不是展示形体部分需要那么长的时间。该窗体在加载时必须执行某些操作，这会减慢它的速度。这是应该放在后台工作线程中的内容。如果所有这些缓慢的逻辑都是在后台线程中完成的，那么表单将显示得非常快，然后它可以显示某种动画，直到后台线程完成工作。

您是否在异步、并行或后台线程上完成其余加载？抱歉，但我只是一个noob..我试图做的是，我想显示chartz表单，但我需要3-4秒来显示..现在我想让它显示一些加载动画..直到chartz表单弹出..你能解释一下“它实际上是如何工作的”吗？任何异常（如无效的跨线程异常或其他类型的异常）或您的

加载屏幕

（无论是什么）都不会出现？如果后者需要提供有关加载屏幕的更多信息，请使用

show（）

和

close（）

方法D