APUNTES PARA CUARTO SEMESTRE SENTENCIA CASE

La sentencia Case

La sentencia Case es una variante de la sentencia If. Esta es utilizada también para elegir entre varias alternativas. Su formato es muy distinto al de la sentencia If, tal y como se puede apreciar a continuación:

Select Case Expresión

Case vpe1

            [sentencias1]

Case vpe2

            [sentencias2]

Case vpe…N

            [Sentencias…N]

Case Else

            [Sentencias-sino]

End Select

Ejemplo:

Dim Numero As Integer

Numero = InputBox(“Introduzca un número del 1 al 4:”)  ‘Permite que el usuario introd. un numero.

Select Case Numero

Case 1

    MsgBox ("Este es el número Uno.")

Case 2

    MsgBox ("Este es el número Dos.")

Case 3

    MsgBox ("Este es el número Tres.")

          

           Case 4

            MsgBox (“Este es el número cuatro.”)

           Case Else

            MsgBox (“No se a proporcionado los valores 1, 2, 3 o 4”)

End Select

La variable numero almacena el número introducido por el usuario. Si el usuario introduce el número uno, entonces, en la variable numero se almacena valor 1 y, a continuación, se ejecuta el caso uno (vpe1), donde se encuentra la sintaxis MsgBox (“Este es el número Uno.”), si numero toma el valor de 2, entonces, se ejecuta el caso dos (vpe2), y a si sucesivamente

Donde expresión es una expresión numérica o alfanumérica que puede proporcionar una serie de valores distintos y uno de ellos puede o no encontrarse en la lista. A estos valores en una sentencia Case se les podrían llamar “valores proporcionados por la expresión (vpe)”. Las etiquetas vpe1, vpe2, vpe…N representan valores que puede o no proporcionar la expresión. Según sea el valor se ejecutan las sentencias seguidas a la etiqueta (vpeN) correspondiente. La cláusula opcional Case Else indica que si los valores proporcionados por la expresión no se encuentran en la listas de las etiquetas (vpeN) entonces se ejecutarán las [Sentencias-sino].