Combobox

Si lo que quieres es cargar los datos que tienescen una tabla en un combo haz lo siguiente:
Crea: un control data y un combo, luego coloca este código en el load del formulario:
Data1.DatabaseName = App.Path & "\bd.mdb"
Data1.RecordSource = "tabla"
Data1.Refresh
With Combo1
.Clear
Data1. Refresh
While Not Data1.Recordset.EOF
.AddItem Data1. Recordset! Nombre
Data1. Recordset. MoveNext
Wend
End With
Con esto llenas el combo con los nombres que tienes almacenados en la tabla..
Ahora bien cuando dices que quieres guardar los datos del formulario reporte, eso dependerá de que datos quieres guardar...
Saludos, y espero te sirva la ayuda..

Ya tengo un control data, este hace referencia a la tabla reportes, cree otro formulario con un control data para aplicar tu código me da run time error en la tercer linea Data1.Refresh.
El formulario original es para llenar la tabla reportes, quiero seleccionar los nombres a ingresar en un combobox que me muestre los nombres de una tabla llamada nombres y que lo almacene en la tabla llamada reportes junto con el resto de la captura.
Gracias por tu apoyo

Me parece raro que te de ese error porque lo probé y funciona bien, a menos que:
a)No tengas bien instalado el visual
b)ó sea otra version (este ejemplo es con vb 6.0)
De todas formas intenta nuevamente con:
Private Sub Form_Load()
Data1.DatabaseName = App.Path & "\bd2.mdb" ' nombre de la base de datos
Data1. RecordSource = "nombres" ' nombre de la tabla donde tienes los datos requeridos
Data1. Refresh' actualiza los datos del control data para poder utulizarlos
With Combo1
.Clear
Data1. Refresh
While Not Data1.Recordset.EOF
.AddItem Data1. Recordset! Nombre ' nombre del campo de la tabla que tiene en la base de datos
Data1. Recordset. MoveNext
Wend
End With
End Sub
Ahora bien no entiendo bien cuando dices que: quiero seleccionar los nombres a ingresar en un combobox; entonces:
1) El ejemplo sirve para llenar el combo con todos los nombres que tienes guardados en la tabla nombres y luego almacenarlos en la tabla reportes puedes crear un botón y haces larutina de guardado en en botón
2) Lo que necesitas es seleccionar unos determinados nombres (basados en unos criterios)de la tabla nombres para luego guardarlos en la tabla reporte.
Si quieres especifícame bien tus necesidades y que deseas hacer para tratar de ayudarte mejor.. Estoy a la orden

Gracias por el apoyo, pero sigo teniendo problemas, tengo el VB6 y no se por que me sigue dando el error, una molestia más, me puedes enviar la compilación aplicada, este es mi correo
[email protected]
Gracias por anticipado