C#からMySQLにアクセス

Imports MySql.Data.MySqlClient      ' MySQLアクセス用

Dim conn As MySqlConnection         ' MySQL接続用定義
Dim reader As MySqlDataReader       ' MySQL接続用定義
Dim command As MySqlCommand         ' MySQL接続用定義

Dim connStr As String               ' 接続用文字列
Dim sSql As String                  ' SQL文

' 既にopenしていたら、いったんcloseする。
If Not conn Is Nothing Then conn.Close()

' 接続文字列　設定
connStr = String.Format("server={0};user id={1}; password={2}; database=test; pooling=false", "", "root", "test")

' 接続
Try
    conn = New MySqlConnection(connStr)
    conn.Open()
Catch ex As MySqlException
    MessageBox.Show("Error connecting to the server: " + ex.Message, "接続失敗", MessageBoxButtons.OK, MessageBoxIcon.Error, MessageBoxDefaultButton.Button1)
    Exit Sub
End Try

Try
    sSql = "select * from user where loginid = 'test' and password = 'test';"
    command = New MySqlCommand(sSql, conn)
    reader = command.ExecuteReader

    If reader.Read() Then
    Else
        MessageBox.Show("ERR", "ERR", MessageBoxButtons.OK, MessageBoxIcon.Exclamation, MessageBoxDefaultButton.Button1)
    End If
Catch ex As MySqlException
    MessageBox.Show("Error connecting to the server: " + ex.Message, "アクセス失敗", MessageBoxButtons.OK, MessageBoxIcon.Error, MessageBoxDefaultButton.Button1)
Finally
    If Not reader Is Nothing Then reader.Close()
    If Not command Is Nothing Then command.Dispose()
    If Not conn Is Nothing Then conn.Close()
    If Not conn Is Nothing Then conn.Dispose()
End Try