Foro de elhacker.net

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..

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

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  :-\.


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