Buenas,
supongo que lo quieres en vb6 por que si es una versión superior igual te va mejor con dataset y dataadapters... te pongo un código de ejemplo para sqlserver
Dim lRs As ADODB.Recordset
Set lRs = New ADODB.Recordset
lRs.Open "SELECT *" & _
"FROM ARTICULOS", goConexion, adOpenDynamic, adLockOptimistic
'** Para recorrerlo
If Not (lRs.EOF Or lRs.BOF) Then
Do While Not lRs.EOF
Me.txtNombre.text = lRs("NOMBRE")
lRs.MoveNext
Loop
End If
Set lRs = Nothing
Te lo he puesto de memoria que no tengo el vb6 aqui instalao el tipo de recorset no se si te valdra el ADODB por ser mysql.
Saludos!
EDIT: Si es en .NET
http://support.microsoft.com/kb/308047/es