VB.net 工作启动画面

Question

所以我一直在努力研究如何让我的启动画面正常工作。当我的程序启动时，我将添加一些检查，并且在一个小徽标旁边有一个我正在更新的进度条。

我的问题是我在 splash_load 中调用的任何代码在我的表单显示之前运行？我从 Windows Forms > Splash Screen 添加了启动画面，并在我的应用程序设置中将其设置为“启动表单”。

现在我正在执行一个简单的 MySQL 连接测试，但在整个子程序完成运行之前我的初始屏幕不会显示？

splash.vb

Public NotInheritable Class splash

    Private Sub splash_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        mysql.connectionTest()
    End Sub

End Class

mysql.vb

Public Shared Sub connectionTest()
        Using SQLConnection As New MySqlConnection(My.Settings.mtConnStr)
            Try
                SQLConnection.Open()
                MessageBox.Show("Connection OK!")
            Catch ex As Exception
                MsgBox(ex.Message.ToString)
                Application.Exit()
            Finally
                SQLConnection.Close()
            End Try

        End Using
    End Sub

Answer 1

您的问题是您在 Load 事件中调用 connectionTest 。在该事件完成之前，表格不会显示。您可以将这一行代码移到 Splash_Shown 事件中，它应该在表单加载并可见后处理。