Se pueden anidar un selct case dentro de otro select case?
Por si alguien lo ha hecho para no enredarme esperimetandolo.
Gracias.
Anidar Un Select Case Dentro De Otro Select Case (SOLUCIONADO)
Objetivo: Anidar Un Select Case Dentro De Otro Select Case (SOLUCIONADO)
última edición por ivanovichenco el Jueves, 16 Junio 2011, 17:43; editado 1 vez
última edición por ivanovichenco el Jueves, 16 Junio 2011, 17:43; editado 1 vez
Objetivo: Re: Anidar Un Select Case Dentro De Otro Select Case
La verdad es que nunca he necesitado hacerlo, pero seguramente se pueda hacer aunque lo suyo sea llamar una funcion que tenga ese 2º select, para que quede el código lo mas claro posible...
Saludos
Saludos
Objetivo: Re: Anidar Un Select Case Dentro De Otro Select Case
La consola responde " EL BEBE TIENE UN AÑO"
última edición por ivanovichenco el Jueves, 16 Junio 2011, 17:44; editado 1 vez
PUBLIC SUB Main()
DIM EDAD AS Integer
DIM BEBE AS Integer
EDAD = 1
'Si se puede, hice una prueba sencillita y funciona maravillosamente el anidar un select case dentro de otro.
SELECT CASE EDAD
CASE 0 TO 2
SELECT CASE BEBE
CASE 0
PRINT "BEBE RECIEN NACIDO"
CASE 1
PRINT "EL BEBE TIENE UN AÑO"
CASE 2
PRINT "EL BEBE TIENE DOS AÑOS"
END SELECT
CASE 3 TO 12
PRINT "ES UN NIÑO"
END SELECT
END
DIM EDAD AS Integer
DIM BEBE AS Integer
EDAD = 1
'Si se puede, hice una prueba sencillita y funciona maravillosamente el anidar un select case dentro de otro.
SELECT CASE EDAD
CASE 0 TO 2
SELECT CASE BEBE
CASE 0
PRINT "BEBE RECIEN NACIDO"
CASE 1
PRINT "EL BEBE TIENE UN AÑO"
CASE 2
PRINT "EL BEBE TIENE DOS AÑOS"
END SELECT
CASE 3 TO 12
PRINT "ES UN NIÑO"
END SELECT
END
La consola responde " EL BEBE TIENE UN AÑO"
última edición por ivanovichenco el Jueves, 16 Junio 2011, 17:44; editado 1 vez
Página 1 de 1
No puede crear mensajesNo puede responder temas
No puede editar sus mensajes
No puede borrar sus mensajes
No puede votar en encuestas
No puede adjuntar archivos
Puede descargar archivos
No puede publicar eventos en el calendario
Está utilizando la versión (Lo-Fi). Para ver la versión completa del foro, haga clic aquí.
Powered by Icy Phoenix based on phpBB
Design by DiDiDaDo
Página generada en:: 0.4297s (PHP: -84% SQL: 184%)
Consultas SQL: 46 - Debug off - GZIP Activado