Visual Basic - Conectar una base de datos Mysql desde visual basi

Hola amigos la verdada soy nuevo en esto

Lo que necesito es conectar una base dedatos en Mysql y manipularla desde visual basic 6 le verdad no se como empezar ya instale el odbc y atraves del control ado puedo ver mis datos ahora lo que quiero es si hay alguna forma de programarlo directamente sin usar el modo grafico solamente codigo. por ejemplo que yo haga mi conexcion .

Set cnEmporio = New Connection
With cnEmporio
.Provider = "Microsoft.Jet.OLEDB.4.0" '& "Data Source=" & sbase & ";" & "Jet OLEDB:Database Password=laclave"
.ConnectionString = "C:\Mis documentos\ProyEmporio\EcaHraHE.mdb"
End With
cnEmporio.Open

esta es una base de datos en access

no se como seria para Mysql

salu2.

Hola.
Lo unico que debes cambiar es tu cadena de conexion.
Ejem.:

ConnectionString="DRIVER={MySQL ODBC 3.51 Driver};SERVER=123.456.789.100;DATABASE=mysqldatabase;UID=TuUser;PWD=TUpassword;OPTION=16427"

set conn = createObject("ADODB.Connection")
conn.ConnectionString = ConnectionString
conn.CursorLocation = 3
conn.Open
Set rs =createObject("ADODB.Recordset")
rs.Open "SELECT * FROM TuTabla", conn,3,3 ' adOpenStatic y adLockOptimistic

En el ejemplo anterior corrige SERVER=123.456.789.100 pon la ip de tu Servidor Mysql o su URL