Hola, he puesto un Combolist y quiero que al hacer clic en el o en un botón compruebe que a elegido y en cada caso actuar de una forma distinta.
He probado esto peeero no funciona:
Public Sub command1_click()
If c.ListIndex = Op1 Then
MsgBox "Op1"
End If
If c.ListIndex = Op2 Then
MsgBox "Op2"
End If
End Sub
También así
Public Sub command1_click()
If c.ListIndex = Op1 Then MsgBox "Op1"
If c.ListIndex = Op2 Then MsgBox "Op2"
End If
End If
End Sub
Que hago mal o como lo monto?
2 cosas, en el segundo ejemplo que pusiste, en ese caso no debes cerrar el if con End if...
y para eso hace mas facil select case!!
saludos
Dime como lol!
Si quito el end if nada, como lo acabo.
De me que sirve que me digas select case si no consigo hacer el maldito if..
Cita de: Servia en 21 Octubre 2008, 18:38 PM
If c.ListIndex = Op1 Then MsgBox "Op1"
If c.ListIndex = Op2 Then MsgBox "Op2"
End If
End If
eso no tiene sentido, como te dijeron, si es una sola línea no hace falta que cierres los IF, vamos que el uso de select case esta en todo los tutos básicos.
Tu código no me va.
Pásame el enlace del tuto.
mira el select case es simple es como usar varios ifs juntos, aca te resuelvo tu pedido pero busca NO PIDAS, BUSCA un tuto de vb q seguro va a tener select case
Select Case c.ListIndex
Case Op1
MsgBox "Op1"
Case Op2
MsgBox "Op2"
End Select
Cita de: Servia en 21 Octubre 2008, 19:01 PM
Tu código no me va.
Pásame el enlace del tuto.
no era mi código, era el tuyo :-\ :-\ :-\
A ver.. que tan dificil puede ser buscar como hacer uso del "Select case en vb" :huh:
donde estará Krackwar cuando de verdad tiene que estar, este es su trabajo no el mío :xD
y con gente que les facilite el hacer una simple busqueda en google, hay tenemos :-\ :-\
Cita de: cΔssiΔnі en 21 Octubre 2008, 19:12 PM
Cita de: Servia en 21 Octubre 2008, 19:01 PM
Tu código no me va.
Pásame el enlace del tuto.
no era mi código, era el tuyo :-\ :-\ :-\
A ver.. que tan dificil puede ser buscar como hacer uso del "Select case en vb" :huh:
donde estará Krackwar cuando de verdad tiene que estar, este es su trabajo no el mío :xD
y con gente que les facilite el hacer una simple busqueda en google, hay tenemos :-\ :-\
Me ha dado tiempo a copiarlo antes de que lo borraras...
Gracias c0c0 por la ayuda aunque me sigue sin ir buscaré más.
es increible, busque "tutorial select case visual basic" en google y el primer resultado me parecio perfecto
http://www.vbtutor.net/lesson8.html (http://www.vbtutor.net/lesson8.html)
y por si no gusto ese:
http://www.google.com.ar/search?hl=es&q=tutorial+select+case+visual+basic&btnG=Buscar+con+Google&meta= (http://www.google.com.ar/search?hl=es&q=tutorial+select+case+visual+basic&btnG=Buscar+con+Google&meta=)
algo que me olvide de agregar, ahi estas comparando como que Op1 es una variable previamente declarada, si no es asi, ponela entre comillas dobles "Op1" .. ahi tenes el error
Gracias, esque es la primera vez que uso vb6 y no podía buscar eso puesto que desconocía su existencia.
Mi código sólo es
Private Sub List1_Click()
Select Case List1.ListIndex
Case Op1
MsgBox "Op1"
Case Op2
MsgBox "Op2"
End Select
End Sub
Poniéndolo entre "" lo que consigo esque me marque error 13 una falta. y subraye el Case op1
Ahora me leeo el tuto.
Te has leido algun tuto en de VB ? ... Te recomiendo que te leas uno antes de hacer ese codigo que me dio verguenza ajena leerlo :-\ .
Primero op2 es un texto plano o una variable ... estoy cansado la gente que se tira con VB sin lerr un manual ni uno pequeñito :-\.
Citar
donde estará Krackwar cuando de verdad tiene que estar, este es su trabajo no el mío :xD
Que tas insinuando :¬¬ :xD
perdon no me fije que era un long o integer, no lo pongas entre comillas, pero como dice pollo1, debes declarar previamente op1 o op2 como integer y setearle el valor.. sino la variable pasa a ser nula o 0 y nunca te va a caer el case dentro de cada opcion...
y si no sabias eso, leete un manualsito basico..
saludos