Ayuda para conectar Visual Basic 6.0 con phpmyadmin

[VbOkonly]

Hola a todos, alguien tiene un ejemplo para conectar phpmyadmin(lo tengo en local-wamp 2-) con vb 6 ?, ya instalé mysql-connector-odbc-5.1.8-win32.msi, pero no tengo idea de como indicar las referencias en el proyecto ... si alguien tiene alguna ayudita por ahi? por lo menos para orientarme busque mucho en san google pero los codigos que consegui no funcionaban :(

Agradesco!

PD: Ya tengo la base de datos creada

[VbOkonly]

Código vb:

Public BD As ADODB.Connection
Public RecSQL As ADODB.Recordset
Private Sub Command1_Click()
On Error GoTo Ver
 
Set BD = New ADODB.Connection
BD.ConnectionString = "driver={MySQL ODBC 5.1 Driver};" & _
"Server=" & Text1 & ";" & _
"Port=" & Text2 & ";" & _
"Database=" & Text3 & ";" & _
"User=" & Text4 & ";" & _
"Password=" & Text5 & ";" & _
"Option=3;"
 
BD.Open
 
MsgBox "Conexión establecida!!!", vbExclamation, "Conexión"
 Dim arre As Boolean
 arre = True
 mostrarconsulta (arre)
Exit Sub
Ver:
 MsgBox "Nº de error: " & Err.Number & " | " & Err.Description, vbCritical, "Control de errores"
 Err.Clear
End Sub
 
Private Sub Command2_Click()
On Error GoTo cerrar
BD.Close
MsgBox "la conexion se cerro"
Exit Sub
cerrar:
MsgBox "no se cerro la conexion"
cerrar.Clear
 
End Sub
Function mostrarconsulta(arre As Boolean)
MsgBox "ok"
Set RecSQL = New ADODB.Recordset
RecSQL.Open "Select usuario FROM usuarios WHERE usuario = 'asd'", BD
End Function
 

Por ahora tengo esto, la conexion funciona, pero no logro traer datos de la bd, nosé como mostrarlos ...

una ayudita?