Visual Basic - Como relleno el combo box con una base de dato

Hola a todos, tengo una pequeña duda, como relaciono una base de datos a un combo box.

Para llenar un combobox con los datos de una tabla puedes recurrir a un bucle (For..Next, Do.. While, etc.)
suponiendo que ya tienes establecido tu objeto recordset podrias hacer esto:
Rs.MoveFirst
For i=0 to Rs.Recordcount - 1
ComboBox1.AddItem Rs!Nombre
Rs.MoveNext
Next i
Aunque seria mas sencillo si utilizas un DataCombo o DBCombo (en caso de usar DAO), para lo cual solo harias esto:
Set DataCombo1.RowSource=Rs
DataCombo1.ListField="Nombre"

Estoy utilizando ADO, que puedo hacer?, muchas gracias por la ayuda