VB.net工作启动画面

时间:2014-06-03 11:57:18

标签: vb.net splash-screen onload-event

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

我的问题是我在表单显示之前运行的splash_load中调用的代码是什么?我在Windows Forms>中添加了启动画面。启动画面,我在应用程序设置中将其设置为“启动表单”。

现在我正在执行一个简单的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

1 个答案:

答案 0 :(得分:1)

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