No indica que eso lo saque de una Base de Datos, si es así podría hacer lo siguiente: (esto lo aprendí gracias a un amigo)
Teniendo una Tabla con varios campos de los cuales en el Combo aparezca el Campo Nombre y que al seleccionar el nombre del Combo, salga en un o unos TextBox los demás campos de ese registro, pueden ser todos los demás campos o sólo uno en particular sería algo así:
En Declaraciones:
Dim BaseDatos as Database
Dim Rs as Recordset
En el Load del Form:
Set BaseDatos = OpenDatabase(App.Path+"\BD.mddb")
Rs.Movefirst
Do While Not Rs.EOF
Combo1.AddItem Rs!Nombre
Rs.MoveNext
Loop
Rs.Close
Para el evento Change del Combo:
Text1.Text = Combo1.ListIndex
Para el evento Click del Combo:
Set Rs = BaseDatos.OpenRecordset("SELECT * FROM Tabla ORDER BY Nombre")
Text1.Text = Rs!Nombre
Bueno, con eso yo muestro en un ComboBox el campo Nombre de los registros de una Tabla y al seleccionar el nombre muestra en varios TextBox los demás campos del registro seleccionado.
Voy a estar pendiente de otras respuestas para saber una mejor forma de hacerlo. Supongo que de eso se trata el asunto, sino, no importa y suerte para su asunto.
