18/7/2010

Condicional multiple "SELECT CASE"

La estructura condicional multiple SELECT CASE (si multiple), nos permite que el flujo del pograma se bifurque en varias ramas y no solo en dos como en las estructuras If/Then. Asi, si se tiene un valor 1, se ejecuta la accion1, si se tiene un valor 2, se ejecuta la accion 2, si toma un valor N, se ejecuta una accion N. y despues se continua con el resto del programa.

Seudocodigo


01 SI [CONDICION] TOMA
02  Valor 1: Hacer accion 1
03  Valor 2: Hacer accion 2
04  Valor 3: Hacer accion 2
05  ...
06  Valor N: Hacer accion N
07 FIN 
La estructura selectiva es muy flexible, lo que permite aplicarla de diferentes formas

1. Esta aplicacion pide un numero por consola y si este se encuentra entre 1,2,3 ó 4, escribe en pantalla su valor en formato String, si el numero no se encuentra dentro de ese rango, escribe "fuera de rango"


01 Module Module1
02 
03     Sub Main()
04         Dim numero As Integer
05         numero = Val(Console.ReadLine)
06         Select Case numero
07             Case 1
08                 Console.WriteLine("UNO")
09             Case 2
10                 Console.WriteLine("DOS")
11             Case 3
12                 Console.WriteLine("TRES")
13             Case 4
14                 Console.WriteLine("CUATRO")
15             Case Else
16                 Console.WriteLine("FUERA DE RANGO")
17         End Select
18         Console.ReadLine()
19     End Sub
20 
21 End Module

2. Este programa pide un numero por consola, despues evalua el numero introducido, si el numero es "0", escribe "el numero es cero", si el numero esta entre el rango de 1 a 10, escribe "el numero se encuentra entre 1 y 10", si el numero es mayor a 10 pero menor a 20, escribe "el numero es mayor a 10 pero menor a 20", si el numero tiene uno de los valores 20, 30, 40, escribe "el numero es 20, 30 ó 40", si el numero no entra en ninguno de esos rangos, el programa escribe "no se que numero es..."


01 Module Module1
02 
03     Sub Main()
04         Dim numero As Integer
05         numero = Val(Console.ReadLine)
06         Select Case numero
07             Case 0
08                 Console.WriteLine("el numero es Cero")
09             Case 1 To 10
10                 Console.WriteLine("el numero se encuentra entre 1 y 10")
11             Case Is > 10, Is < 20
12                 Console.WriteLine("el numero es mayor a 10 pero menor a 20")
13             Case 20, 30, 40
14                 Console.WriteLine("el numero es 20, 30 ó 40")
15             Case Else
16                 Console.WriteLine("no se que numero es...")
17         End Select
18         Console.ReadLine()
19     End Sub
20 
21 End Module
En este ejemplo hacemos uso de SELECT CASE y para evaluar correctamente el numero ingresado hacemos uso de Case 1 to 10, esto quiere decir que ejecutara la accion si el numero esta en el rango de 1 a 10 , es equivalente a escribir 1,2,3,4,5,6,7,8,9,10.
Tambien se hace uso de "Case Is > 10, Is <20" , esto quiere decir que ejecutara la accion SI el numero es mayor a 10 Y menor a 20.

6 comentarios:

Franklin S. Cappa Ticona dijo...

Bueno ta interesante, creo que tomare algunos ejercicios para mis practicas y bueno a mi blogs,
Saludos

Anónimo dijo...

buenos dias, estimados

poseo uncodigo similar a este y funciona correctamente solo al colocar los datso una celda por vez, sin embargo al colocar datos en varias celdas al mismo tiempo arroja un error me podrian ayudar en este caso?

Anónimo dijo...

ESTA MUY BUENO, DEARIA QUE CUELGUEN MAS EJEMPLOS SOY UN ESTUDIANTE Y ME PIDIERON AVERIGUAR TODO SOBRE LA FUNCION MULTIPLE SELECT CASE

Anónimo dijo...
Este comentario ha sido eliminado por un administrador del blog.
Anónimo dijo...

hola

Anónimo dijo...

hol :3

Publicar un comentario en la entrada

 
Design by Free WordPress Themes | Bloggerized by Lasantha - Premium Blogger Themes | cna certification