Msql

Mysql
HOLA he decido cambiar de access a sql ya que parece que acess esta pasado de moda ya tengo creada la base de datos en mysql y lo que no se es como establecer la conexión desde visual basic ... Tengo este código
option explicit
dim conexion as adodb.connection
dim rs as adodb.recordset
conts Racceso as string = "C:\mibase"
private from_load()
set conexion = new adodb.connection
set rs = new adodb.recordset
with conexion
¿¿aca me falta lo que iria
end with
osea lo equibalente a :
with conexion
.Provider=Microsoft.Jet.OLEDB.4.0& racceso etc ect
.open
end whit
La version de sql que uso es la 4.0.18
desde ya agradezco su respuesta