Code:

 conn = New MySqlConnection()
  conn.ConnectionString = "server=" & txtServer.Text & ";" _
    & "user id=" & txtUsername.Text & ";" _
    & "password=" & txtPassword.Text & ";" _
    & "database=in_out"

  Try
    conn.Open()
    MessageBox.Show("Connection Opened Successfully")
    conn.Close()
  Catch myerror As MySqlException
    MessageBox.Show("Error Connecting to Database: " & myerror.Message)
  Finally
    conn.Dispose()
  End Try