ZholvaX escribió:creo que soy demasiado zoquete xD
no me sale de esta manera, es que nunca llegamos a usar el comando BOX, que yo recuerde
En visual basic 6.0 funciona, lo acabo de probar:
Private Sub Combo1_
Click ()
If Combo1.ListIndex = 0 Then
MsgBox "1"
ElseIf Combo1.ListIndex = 1 Then
MsgBox "2"
ElseIf Combo1.ListIndex = 2 Then
MsgBox "3"
End If
End Sub
Es importante que sea en la propiedad CLICK, por defecto sale change, yo he probado en el click.
A la hora de meter datos en el combo por diseño sabes como se hace no??
Un saludo!!
![adios [bye]](/images/smilies/nuevos2/adio.gif)
[bye]
EDITO:
Se me acaba de ocurriar hacer un select case en vez de ifs, como han dicho por aqui, creo que la cosa seria tal que asi (no lo he probado, pero si quieres puedes probar):
Private Sub Combo1_
Click ()
Select Case Combo1.ListIndex
Case 0
MsgBox "1"
Case1
MsgBox "2"
Case 2
MsgBox "3"
End Select
End Sub