Como lleno el ItemData de un ComboBox
Tengo un combo que quiero llenar con los datos de un Recorset, el código es el siguiente:
Do While Not rsCombo.EOF
objCombo.AddItem rsCombo(1)
objCombo.ItemData(i) = rsCombo(0)
rsCombo.MoveNext
i = i + 1
Loop
Me manda un error en el siguiente error en el ItemData. "No Coinciden los tipos". Mi pregunta si es correcto lo que hago o de que forma puedo hacer que el combo me de la clave del item seleccionado con respecto al recorset
Do While Not rsCombo.EOF
objCombo.AddItem rsCombo(1)
objCombo.ItemData(i) = rsCombo(0)
rsCombo.MoveNext
i = i + 1
Loop
Me manda un error en el siguiente error en el ItemData. "No Coinciden los tipos". Mi pregunta si es correcto lo que hago o de que forma puedo hacer que el combo me de la clave del item seleccionado con respecto al recorset
Respuesta de ragys2001
1