Hola Kitty,
Una vez que ya tienes generado el recordset, para cargar el ComboBox:
Código:
Do Until recordset.EOF
Combo1.AddItem recordset.Fields("NombreDelCampo")
recordset.MoveNext
Loop
pero si lo que quieres es enlazarlo directamente, debes usar el control DataCombo y asignarle las siguientes propiedades:
Set DataCombo1.RowSource = recordset
DataCombo1.ListFields = "NombreDelCampo"
Un saludo