1) en lógica que es una estructura caso (selector múltiple)
R//Con la estructura de control CASE podemos evaluar una
variable y realizar acciones dependiendo del valor de esta. La diferencia con
el IF consiste en que el número de posibilidades de la evaluación de esta
variable no tiene por qué ser sí o no, pudiendo hacer cosas para un número
indeterminado de valores.
La sintaxis es la siguiente:
La sintaxis es la siguiente:
Selección caso (variable)
Caso (valor1):
(Acción
para caso valor1)
Caso (valor2):
(Acción
para caso valor2)
Caso (valor3):
(Acción
para valor3)
Caso más:
(Acción
en caso de que no se cumpla ningún anterior caso)
Fin selección:
2) describa la sintaxis lógica del caso.
R// cambiar (variable
a evaluar)
{Case opcion1:
código a ejecutar si la variable coincide con la
opcion1;
break;
case opcion2:
código a ejecutar si la variable coincide con la
opcion1;
break;
case opción:
código a ejecutar si la variable coincide con la
opción;
break;
default:
código a ejecutar en caso de que ninguna de las
opciones anteriores sea correcta;}
código a ejecutar si la variable coincide con la
opcion1;
break;
case opcion2:
código a ejecutar si la variable coincide con la
opcion1;
break;
case opción:
código a ejecutar si la variable coincide con la
opción;
break;
default:
código a ejecutar en caso de que ninguna de las
opciones anteriores sea correcta;}
3) de un ejemplo concreto de un algoritmo que tenga la
estructura caso
R// Sub Select Case ()
A1 = Range ("E1").Value
Select Case Range ("D1").Value
Case Is = A1
ActiveSheet.Range ("D4").Value = "Los Valores de D1 y E1 son iguales"
Case Is > A1
ActiveSheet.Range ("D4").Value = "D1 es mayor que E1"
Case Is < A1
ActiveSheet.Range ("D4").Value = "E1 es mayor que D1"
End Select
End Sub
A1 = Range ("E1").Value
Select Case Range ("D1").Value
Case Is = A1
ActiveSheet.Range ("D4").Value = "Los Valores de D1 y E1 son iguales"
Case Is > A1
ActiveSheet.Range ("D4").Value = "D1 es mayor que E1"
Case Is < A1
ActiveSheet.Range ("D4").Value = "E1 es mayor que D1"
End Select
End Sub
