Código:
Saludos y gracias desde ya por las respuestas. conn.Open "driver={mysql};" _ & "user=root;" _ & "password=123;" _ & "server=localhost;" _ & "database=barraca;"