Select Case Visual Basic La sintaxis a emplear

Select Case Visual Basic

� La sintaxis a emplear con Visual Basic es la que indicamos a continuación. Como se podrá comprobar, mediante esta instrucción establecemos una serie de casos que se podrían cumplir para el valor de una expresión o variable, y en función del valor de la variable se ejecutarán una serie de instrucciones asociadas u otra.

La sintaxis es la siguiente: SELECT CASE (variable) CASE (valor 1): (acción para caso valor 1) CASE (valor 3): (acción para caso valor 2) CASE (valor 3): (acción para caso valor 3) CASE ELSE: (acción en caso de que no se cumpla ningún anterior caso) END SELECT

Select Case en Visual Basic equivale a la instrucción switch de otros lenguajes. La expresión a evaluar puede ser un valor numérico o una cadena de texto. Sólo se puede evaluar una expresión y no múltiples expresiones. La evaluación de expresiones puede ser: a) De coincidencia: por ejemplo, Case 12 indicaría que si la expresión evaluada vale 12 se ejecutarán las instrucciones anexas. � b) De intervalo: usando la palabra clave To. Por ejemplo, Case 12 To 14 indicaría que si la expresión evaluada tiene un valor comprendido entre 12 y 14 (incluidos los extremos de los intervalos), se ejecutarán las instrucciones anexas. c) De comparación: usando la palabra clave Is. Por ejemplo, Case Is <= 14 indicaría que si la expresión evaluada tiene un valor menor o igual a 14 se ejecutarán las instrucciones anexas

La instrucción Select Case permite utilizar tantas condiciones (o casos) como sea necesario, y conviene escribir el código para situaciones en las que hay muchas opciones. Por ejemplo, suponga que el programa utilizó una variable String para almacenar una opción de color y se necesitaba obtener el valor de color. El código para la instrucción Select Case podría ser similar al siguiente: VB � Select Case Color Case "red" Msg. Box("You selected red") Case "blue" Msg. Box("You selected blue") Case "green" Msg. Box("You selected green") End Select �

Case El ejemplo anterior funciona cuando conoce todas las condiciones posibles, pero ¿qué sucede si hay una condición con la que no contaba? Por ejemplo, si el valor de Color es yellow, el código simplemente evaluará los tres casos sin encontrar una coincidencia y no se mostrará ningún cuadro de mensaje. � La instrucción Case Else se puede utilizar para ejecutar el código cuando no se encuentra ninguna coincidencia, como en el siguiente ejemplo. VB � Select Case Color Case "red" Msg. Box("You selected red") Case "blue" Msg. Box("You selected blue") Case "green" Msg. Box("You selected green") Case Else Msg. Box("Please choose red, blue, or green") End Select � En el código anterior, si el valor de Color es yellow el código lo comparará con las primeras tres líneas Case sin encontrar una coincidencia. Cuando se llega a la línea Case Else, se ejecuta la siguiente línea de código antes de pasar a End Select. �

Para utilizar la instrucción Select Case 1. . En el menú Archivo, seleccione Nuevo proyecto. 2. . En el cuadro de diálogo Nuevo proyecto, en el panel Plantillas, haga clic en Aplicación para Windows. 3. . En el cuadro Nombre, escriba Select. Case y haga clic en Aceptar. 4. . Se abre un nuevo proyecto de formularios Windows Forms. 5. . En el Cuadro de herramientas, arrastre un control Text. Box y un control Button al formulario. 6. . Haga doble clic en el botón para abrir el Editor de código. 7. . En el controlador de eventos Button 1_Click, escriba el siguiente código. VB � Dim Number As Integer = CInt(Textbox 1. Text) Select Case Number Case 1 Msg. Box("Less than 2") Case 2 To 5 Msg. Box("Between 2 and 5") Case 6, 7, 8 Msg. Box("Between 6 and 8") Case 9 To 10 Msg. Box("Greater than 8") Case Else Msg. Box("Not between 1 and 10") End Select 8. . Presione F 5 para ejecutar el programa. 9. . En el cuadro de texto, escriba un número y haga clic en el botón. 10. . Aparecerá un cuadro de mensaje que muestra el mensaje de la instrucción Case que coincide con el número que ha especificado.