vb.net - 使用 Splashscreen VB.NET 加载另一个表单

Question

所以我正在开发一个游戏，它在某些系统上有点重，所以这是我在游戏打开时想做的事情(伪代码):

Show Splashscreen
Load GameForm
When GameForm Is Completely Loaded
Splashscreen Close
Show GameForm

这在实际的 VB 代码中是如何完成的？

Answer 1

打开 Visual Studio > 新建 VB.Net Winform 项目

右键解决方案>添加新项目>闪屏

双击 Form1 并在 Form1_Load 事件中:

Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load

Me.Visible = False

Dim s = New SplashScreen1()
s.Show()
'Do processing here or thread.sleep to illustrate the concept
System.Threading.Thread.Sleep(5000)
s.Close()

Me.Visible = True

End Sub