silvi
30 de Abril del 2004

buenas. he creado un combobox con una lista de 4 elementos. mi pregunta es komo puedo acceder a cada uno, para luego realizar las operaciones necesarias. segun eliga un elemnto u otro se realizaran operaciones diferentes.
espero vuestra ayuda

Jose oscar
30 de Abril del 2004

private sub form_Load()
combo1.additem "semana santa"
combo1.additem "no esta permitido"
combo1.additem "accion incorrecta"
combo1.additem"accion permitifda"
end sub

private sub Combo1_Click()
if Combo.listindex > 0 then
select case Ucase(combo1.Text)

case "SEMANA SANTA"
msgbox "Semana santa"
case "NO ESTA PERMITIDO"
msgbox "Acccion no permitida"
case "ACCION INCORRECTA"
msgbox "Accion incorrecta"
case "ACCION PERMITIDA"
msgbox "Accion permitida"
ELSE
mSGBOX " NO HAY SOLUCION"
end select
end if
end sub

mas o menos asi seria lo que nesecitas si entendi ien la pregunta

un saludo
Jose Oscar

Yuval
30 de Abril del 2004

Puedes tambien utilizar el evnto combo1_change()

if combo1.text= "elemento1" then
.....
...
...
else
if combo1.text= "elemento2" then
.......
.......
.....
else
..........
.......
end if
end if
....
....

Dentro de los if puedes llamar a un procedimiento si el codigo es amplio para no liarte Suerte