prova questo:
codice:
Dim conn As New ADODB.Connection()
Dim rs As New ADODB.Recordset()
conn.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};SERVER=127.0.0.1;DATABASE=mychydb;UID=xxxx;OPTION=3"
conn.Open()
rs.Open("select * from utenti", conn)
TextBox1.Text = rs("cognome").Value
rs.Close()
rs = Nothing
conn.Close()
conn = Nothing
Anch'io ho provato alcune soluzioni per un lavore che dovrei fare, l'unica che ha funzionato è stata questa, poi non ho più approfondito la faccenda poichè il progetto per il momento è fermo, se trovi qualche altra soluzione fammi sapere.
Naturalmente devi scaricare i driver