fabiola_1
27 de Febrero del 2005

Tengo este problema, al momento de seleccionar un elemento del combo, no muestra nada en la lista, tengo este codigo.

Private Sub Combo1_Change()

If Combo1.ListIndex = "Televisor" Then
Text2.Text = 500



End If
End Sub

Private Sub Form_Load()

Combo1.AddItem "TELEVISOR"
Combo1.AddItem "DVD"
Combo1.AddItem "REFRIGERADORA"
End Sub

q solucion le podria dar.

gracias

Astonifer
27 de Febrero del 2005

Hola que tal.
bueno no estas indicando la propiedad adecuada almomento de seleccionarprueba esto:

Private Sub Combo1_Change()

rem If Combo1.ListIndex = "Televisor" Then
If Combo1.text = "TELEVISOR" Then
Text2.Text = 500
End If
End Sub



OJO: QUE CUANDOUTILICES Listindex, sólo acepta números es decir
.LisIndex=0 (TELVISOR)
.LisIndex=1 (DVD)
.LisIndex=2 ...


esperote sirva ok?
salu2
[email protected]

fabiola_1
27 de Febrero del 2005

pero en la parte de cargar esta bien , solo lo cambio en combo1_change?