Access - Problemas con Combo Box

Tengo el siguiente programa

Set rprov = CreateObject("Adodb.recordset")

rprov.Open "select * from productos where productos.nomprov = '" & nomprov & "'", CurrentProject.Connection, 3, 3

la consulta como puedo cargar esta consulta de SQL a un "combo box"

Gracias

Hola Diego:
Para asignar el Origen de la Fila a un Cuadro Combinado cuya Tabla (Productos en tu caso) esté en la base de datos activa, no necesitas conectar mediante Recordset ADO, puedes hacerlo directamente:

CuadroLista.RowSource = "select * from productos where nomprov = '" & nomprov & "'"

Ahora bien, si la Tabla estuviera en una Base de Datos externa, entonces si sería necesario, pero parece que no es el caso.

Saludos
Enrique