Un plugin permite programar para BlackBerry.

Esta instrucción es ideal para utilizar en aquellas situaciones en que debemos elegir una alternativa de entre muchas. Si bien Choose() hace mas o menos esto mismo (“If…Then” también), por lo general “Select Case” resulta más fácil de leer. Particularmente, yo prefiero utilizar “Choose()” cuando quiero que el código (fuente) sea compacto, y “Select Case” cuando hay muchas alternativas, pero cada programador elije la forma que cree más conveniente.

Su formato es el siguiente:

Select Case <expresión a evaluar>
Case <lista de expresiones1>
     'Instrucciones a ejecutar
Case <lista de expresiones2>
     'Instrucciones a ejecutar
Case <lista de expresiones3>
     'Instrucciones a ejecutar

Case <lista de expresionesN>
     'Instrucciones a ejecutar
Case Else
  'Instrucciones a ejecutar si no se cumple
  ' ninguna de las listas de expresiones anteriores
End Select

La <expresión a evaluar> puede ser algo tan simple como una variable, o una expresión más compleja que Visual Basic resolverá antes de elegir que grupo de instrucciones ejecutar. Las <lista de expresiones> que siguen a cada sentencia “Case” se evalúan, y de ser verdaderas (solo debería serlo una de ellas) se ejecutan las sentencias que estén a continuación.

En caso de que ninguna de las <lista de expresiones> sea verdadera, se ejecutan las instrucciones que están a continuación del “Case Else”. Esta sección no es obligatoria. Si no existe “Case Else” y ninguna de las <lista de expresiones> es verdadera, el programa no ejecutará nada de lo que hay dentro de la estructura.

Veamos como podríamos resolver el ejemplo de los colores visto antes, usando Select Case:


Select Case color
            Case 1
                variable1 = "rojo"
            Case 2
                variable1 = "verde"
            Case 3
                variable1 = "azul"
End Select

Seleccionando colores con Select Case.

Si quisiésemos que, cuando “color” tiene un valor distinto de 1, 2 o 3 “Variable1” fuese igual a la palabra “Error”, podemos agregar la sección “Case Else”:

Select Case color
     Case 1
             variable1 = "rojo"
     Case 2
             variable1 = "verde"
     Case 3
             variable1 = "azul"
    Case Else
            variable1 = "Error"
End Select

Respecto de las expresiones que pueden utilizarse a continuación de las cláusulas “Case”, no tiene por que ser necesariamente un numero. Supongamos que queremos que si “color” vale 1,2 o 3, “Variable1” sea igual a “Correcto”. No necesitamos usar tres “Case” diferentes, sino que podemos hacerlo en uno solo, separando los valores por comas. Quedaría así:

Select Case color
         Case 1,2,3
                variable1 = "Correcto"
       Case Else
               variable1 = "Error"
End Select

Siempre podemos agregar la sección “Case Else”.