Dim mia_connesione As New MySQLDatabase
Dim stringaUser As String
Dim stringaPassword As String
Dim msg As String

//--- inizio mostrare finestra login ---
frmLogin.ShowModal //carica e mostra la finestra del login all'utente (e' richiesto user name e password)

stringaUser=ConvertEncoding(frmLogin.tUserID.Text, Encodings.SystemDefault)
stringaUser=Trim(stringaUser) //rimuove eventuali spazi bianchi che quel somaro di utente aveva messo

stringaPassword=ConvertEncoding(frmLogin.tPassword .Text,Encodings.SystemDefault)
stringaPassword=Trim(stringaPassword) //rimuove eventuali spazi bianchi che quel somaro di utente aveva messo

frmLogin.Close //scarica dalla memoria la finestra login
//--- fine mostrare finestra login ---

mia_connesione.Host="localhost"
mia_connesione.Port=3306
mia_connesione.UserName=stringaUser
mia_connesione.Password=stringaPassword
mia_connesione.DatabaseName="miodatabase"
If mia_connesione.Connect=True Then
//manca il codice per mostrare i dati del database
Else
msg="La connessione NON e' riuscita" +Chr(10)
msg="durante il controllo della password"
MsgBox msg
End If
mia_connesione.Close

-----------------------------------------------------------------------------

Installando easyphp 1.6 nel pc non c'è problema perchè la sua versione di MySql è 3,23.49.
Ma installando per esempio wamp5, la cui versione MySql è 5.0.18, allora non funziona più niente nel caso ci sia una password nel sistema.
Per maggiori chiarimenti provare ad installare easyphp 1.6 e poi questo