Quick basic
7) Select case
Veamos el siguiente ejemplo:
CLS
PRINT "Opción:
1"
PRINT "Opción:
2"
PRINT "Opción:
3"
PRINT
INPUT "Escoge
una opción:
",
opcion
PRINT
SELECT CASE
opcion
CASE IS =
1
PRINT "Escogiste
la opción: 1"
CASE IS =
2
PRINT "Escogiste
la opción: 2"
CASE IS =
3
PRINT "Escogiste
la opción: 3"
CASE ELSE
PRINT "Escogiste
una opción no válida"
END SELECT
El ejemplo anterior nos presenta un pequeño menú con 3 opciones a escoger, luego selecciona los posibles valores que pudiera tener la variable opcion (SELECT CASE opcion); si escogemos la opción 1, y por tanto le damos a la variable opcion el valor de uno, entonces se ejecutaron las instrucciones que corresponden al caso de que la variable sea igual a 1 (CASE IS = 1), si escogemos la opción 2, entonces se ejecutarán las instrucciones que corresponden al caso de que la variable sea igual a 2 (CASE IS = 2), etc.
Dentro de cada caso que tenga la expresión podemos ejecutar una o más instrucciones, incluyendo bloques IF...THEN...ELSE y anidar bloques SELECT CASE si nos fuera necesario.
Para mas información escribe SELECT y luego presiona F1.
Descargar gratis los programas y compiladores necesarios para aprender a programar
¿Buscas algo?