Devi fare così, solo che utilizzo ado versione 7.0 di vb.net e non ado.net:

dim db as new adodb.connection
db.connectionstring="DSN=prova"
db.open

questo connette mysql a vb.net con ado utilizzando ODBC

ciao