Visual Basic - Conexion a MySQL

Estoy utilizando una conexion con el comando ADODB.recordset y
ADODB.Connection.

Pero no me conecto cuando realizo al abrir la conexion,

que puedo hacer.

Que puerto utiliza el ODBC en MYSQL. que hago

Esto no se entiende:
"Pero no me conecto cuando realizo al abrir la conexion,
que puedo hacer."

Respecto al puerto en MySQL, si no has definido otro, es el 3306

checate este codigo a mi me funciona super bien, solo que aun tengo el problema a la hora de guardar los datos desde VB, espero te sierva el codigo....

Adodc1.ConnectionString = "driver={MySQL ODBC 3.51 Driver};server=" & Text7.Text & " ;uid=root;pwd=;database=tubasededatos;connection="
Adodc1.CommandType = adCmdTable
Adodc1.RecordSource = "tutabla"
Adodc1.Refresh