hola, ojala alguién me pueda ayudar..
lo que pasa es lo siguiente, estoy modificando un codigo que pille para aprender
y no me resulta llamar uno de los datos por que es un número, lo convierto a string pero me sale error, no entiendo mucho..pero aquí dejo el source para que alguien me heche una mano..
quiero que me pueda llamar palabras.
Código:
Private Sub LoadValues(ByVal vValue As Boolean)
Dim i As Integer
ComboN.Clear
For i = 0 To TotalPerson - 1
ComboN.AddItem MyPerson(i).pName '*** Adding a new Item ***
'*** Adding Numeric Value/Array Index depending upon the request *** <--- Aquí está lo que tengo que modificar o no.. para que pueda llamar texto
ComboN.ItemData(ComboN.NewIndex) = IIf(vValue, MyPerson(i).pAge, i)
Next i
cboName.Refresh
'*** Setting default Value into the combobox ***
ComboN.Text = ComboN.List(DefaultText)
End Sub
Y LLAMA ESTOS DATOS
MyPerson(0).pName = "Pepe"
MyPerson(0).pCountry = "spain"
MyPerson(0).pAge = "20"
MyPerson(1).pName = "Zindal"
MyPerson(1).pCountry = "France"
MyPerson(1).pAge = "21"
Private Sub ComboN_Click()
Dim idx As Integer
idx = cboName.ListIndex
If chkValue.Value = vbChecked Then
txtAge.Text = ComboN.ItemData(idx)
ElseIf chkValue.Value = vbUnchecked Then
txtAge.Text = MyPerson(ComboN.ItemData(idx)).pAge
txtCountry.Text = MyPerson(ComboN.ItemData(idx)).pCountry
End If
End Sub
asi lo llama al seleccionar el combobox..
pero yo quiero que en el Año ".pAge".. pueda ser una palabra como los demas datos.
GRACIAS