Cantidad de elementos y Recorrer control DataCombo vb6

Question

Buenos días, quisiera saber como podría obtener la cantidad de elementos de un control DataCombo en vb6 si hay alguna propiedad o método para lograrlo y también como podría recorrer cada elemento del control DataCombo, considerar que no es un control ComboBox.

Gracias de antemano por sus respuestas.

Answer 1

Buenos días, quisiera saber como podría obtener la cantidad de elementos de un control DataCombo en vb6 si hay alguna propiedad o método para lograrlo y también como podría recorrer cada elemento del control DataCombo, considerar que no es un control ComboBox.

Gracias de antemano por sus respuestas.

Puedes usar el index del list con el que llenas el DataCombo.

ejemplo.text = object.VisibleCount

Fuente

---

Si necesitas ayuda sube tu avance de otro modo no puedo ayudarte , Suerte!

Answer 2

Lo he intentado DANE pero esa propiedad solo me indica los elementos que se visualizan al desplegar el DataCombo una vez ya cargado, nada que ver en obtener la cantidad de elementos del DataCombo.

Answer 3

Entiendo que son controles enlazados a un control de datos, en consecuencia donde debes iterar o recuperar la información de los datos es en el control de datos y no en el control que muestra los datos (DataCombo).

Por ejemplo, si el control de datos es un control Adodc (ADO DataControl) entonces puedes recuperar la cantidad de registros que tiene el recordset asociado, algo como:

MsgBox Adodc1.Recordset.RecordCount

No te garantizo que funcione, pero creo que los "tiros van por ahí".

---

Nuestra profesión exige tener pasión por resolver problemas de una manera óptima y eficiente.

Answer 4

Gracias a todos por su ayuda finalmente solo logro recorrer un control Combo y no un control DataCombo.

Saludos

Answer 5

¿Intentaste recuperar la cuenta de registros que contiene el Recordset asociado al control de datos?. Vuelvo a insistir que los datos no están contenidos en el control DataCombo sino en un control de datos asociado mediante la propiedad DataSource. ¿Qué valor tienes especificado en la propiedad DataSource del control DataCombo?

---

Nuestra profesión exige tener pasión por resolver problemas de una manera óptima y eficiente.

Answer 6

Claro Willams eso perfecto con el Recordset puedo obtener el numero de registros pero una ves cargado el DataCombo posteriormente en el formulario ya no se como puedo recorrer el DataCombo.

Module1

Sub llenarcombo(combo As DataCombo, cad As String, sp As String, campo1 As String, campo2 As String)
    Dim rs As New ADODB.Recordset
    rs.CursorLocation = 3
    rs.CursorType = adOpenForwardOnly
    rs.ActiveConnection = cad
    rs.Open sp
    Set combo.RowSource = rs
    combo.BoundColumn = campo1
    combo.ListField = campo2
    'MsgBox rs.RecordCount
    Set rs.ActiveConnection = Nothing
    Set rs = Nothing
End Sub