Visual Basic - Combobox Multicomumna (MSForms 2.0)

Hola a todos, pues les cuento...
Trabajo con Visual Basic 6 y estoy usando los controles de Windows Forms 2.0 y entre los que uso, pues es el combobox... Lo que quisiera saber es como cargar los datos de una tabla que tiene dos campos (IDOperacion, TipoOperacion) en el combobox, pero que una columna estuviera oculta (Como en MS Office Access)

Lo he intentado por la propiedad Column pero no puedo, y cuando quiero buscar ayuda sobre ese control me dice que no se ha encontrado el archivo de ayuda... he buscado en la red y nada

Muchas gracias

Hola diego, mirá, creo que lo que vos necesitas, es algo así:

Sub Listar_Recordset(Lista As Object, MiRecordset as Recordset)
' borramos la lista.
Lista.Clear

' si el recordset estuviese cerrado, lo abrimos.
If (MiRecordset.State = 0) Then MiRecordset.Open

With MiRecordset
' si tiene algún registro...
If (.RecordCount > 0) Then
.MoveFirst
' mientras haya registros
Do While (Not .EOF)
' agregamos a la lista ( parte visible )
Lista.AddItem .Fields("nombre")
' y agregamos el 'id' del registro ( parte no visible)
Lista.ItemData(Lista.NewIndex) = .Fields("id")

' saltamos al siguiente registro
.MoveNext
Loop
End If
End With

If (Lista.ListCount > 0) Then Lista.ListIndex = lista.listcount-1
End Sub

Los parámetros son,
- Lista, que podría ser un ListBox o ComboBox
- MiRecordset, que es el recordset que querés listar. ( vale aclarar que hay
que reemplazar los campos 'id' y 'nombre' por los nombres de los campos a
utilizar )

No se que más decir, en MiRecordset podés poner lo que quieras, hasta el
resultado de una consulta sql... El límite es la imaginación de uno... :P

Tal vez es más recomendado el uso de un DataCombo o DataList, están hechos para
eso, y soportan más registros o items.

Tenía esta función archivada en el baúl de los recuerdos... la retoqué un poco
ahora sobre la marcha, calculo que sacandole las telas de arañas, la tierra
acumulada y unos pequeños ajustes va a funcionar, suerte!

Paul.

Graciaas lo probaré hoy mismo y les aviso, bye