私は、x時間ごとにMySQLデータベースからデータを取得し、それに応じてGUIを調整することを主な機能とするプログラムを持っています。
最初に発生するのは、接続が試行されている間、バックグラウンドで GUI の読み込みが非常に遅くなるという 2 つの部分の問題があります。MySQL チェックが完了するまで、各ラベル/ボックス/画像が 1 つずつ読み込まれているのを文字通り見ることができます。 .
お粗末な修正はme.Hide()
、関数の前に a を追加し、チェックの結果が表示された後に再度表示することです。コードを見ていただけますか?関数に MySQL チェックを追加して、それを呼び出しForm1_Load help
ますか?
これの 2 番目の部分は、MySQL 接続チェッカーが機能していないように見えることです。現在、私のホストはリモート MySQL セッションを受け入れており、しばらくの間接続を考えているようです...接続前に 6/7 秒が適切です。エラーメッセージが表示されます。
私はほとんどガイドに従ってコードを自分で書きました。各部分は理解していますが、おそらく私のConnectionString
ものは無効だと思います。
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
MaximizeBox = False
Dim conn As MySqlConnection
conn = New MySqlConnection
conn.ConnectionString = "Server=50.28.x.x; Port=3306; User id=xxx_admin; password=xxxx; Database=xxx_software; Connect Timeout=60;"
Try
conn.Open()
Catch myerror As MySqlException
MsgBox("There was an error connecting to the MySQL Database")
Label42.ForeColor = Color.Red
Label42.Text = "ERROR"
Timer1.Stop()
End Try
Timer1.Start()
Label37.Text = Now.ToShortTimeString()
End Sub