Hola,
Te explico una forma sencilla de hacer lo que quieres con un poco código:
Controles en el Form:
Un control Data de ADO (Adodc1)
Un ComboBox (Combo1)
y tantos TextBox como campos de la tabla quieras mostrar (puedes meterlos en un array de controles o no, según tu gusto).
Propiedades (en diseño):
Adodc1: ConnectionString = tu cadena de conexión; RecordSource = nombre de la tabla.
TextBoxes: DataSource = Adodc1; DataField = Cada campo de la tabla.
Combo1: Las que vienen por defecto.
Código:
Private Sub Form_Load()
With Adodc1.Recordset
Do Until .EOF
Combo1.AddItem .Fields(0) ' Si es el primer campo
Combo1.ItemData(Combo1.NewIndex) = .AbsolutePosition
.MoveNext
Loop
End With
End Sub
Private Sub Combo1_Click()
Adodc1.Recordset.AbsolutePosition = Combo1.ItemData(Combo1.ListIndex)
End Sub
Y ese es todo el código que necesitas. Cada vez que selecciones un item del combo, mostrará en los TextBoxes los datos correspondientes.