AJUDA COM MYSQL

Imports MySql.Data.MySqlClient
Public Class frmLogin
    Dim ComandoDB As New MySqlCommand
    Dim myDataReader As MySqlDataReader
    Dim Conexao As New MySqlConnection
    Dim myAdapter As New MySqlDataAdapter

    Private Sub btnLogin_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnLogin.Click
        Conexao.ConnectionString = [Ô]server=***************.com.br;user id=*********_root;password=***************;database=isuporte_database[Ô]

        Try
            Conexao.Open()
        Catch ErroConn As MySqlException
            MsgBox([Ô]Não foi possível conectar ao Banco de Dados![Ô])
            End
        End Try

        ComandoDB.Connection = Conexao
        ComandoDB.CommandText = ([Ô]SELECT * FROM usuarios WHERE usuarios.Nome LIKE [ô][Ô] & txtUsuario.Text & [Ô][ô] AND usuarios.senha LIKE [ô][Ô] & txtSenha.Text & [Ô][ô][Ô]

        myAdapter.SelectCommand = ComandoDB
        myDataReader = ComandoDB.ExecuteReader

        If myDataReader.HasRows = True Then
            MsgBox([Ô]Login efetuado com sucesso![Ô])
        Else
            MsgBox([Ô]Usuário ou senha inválidos![Ô])
        End If

    End Sub
End Class