procesador de textos
Windows Web Server
Ver Más instrucciones
1
Para que se dispare la sentencia case , se debe ser activado por un evento . En este caso , vamos a crear un sencillo formulario que contiene un cuadro de texto para el curso entero a suscribir , así como un botón , lo que dará lugar a la declaración del caso y mostrar el grado de la letra resultante .
< Forma id = " form1 " runat = "server" >
< asp: Button ID = " Button1 " runat = texto " server" = "Button" /> < /form> En primer lugar, tenemos que crear una variable , que llevará a cabo el número entero de recogida de TextBox1 en el evento de clic de botón. Protected Sub Button1_Click (remitente de ByVal como objeto , ByVal e como System.EventArgs ) Handles Button1.Click NumberGrade Dim As Integer NumberGrade = TextBox1.Text End Sub a continuación, vamos a crear cada una de las cinco posibilidades de caso basado en el número decidido rangos. Protected Sub Button1_Click (remitente de ByVal como objeto , ByVal e como System.EventArgs ) Handles Button1.Click NumberGrade Dim As Integer NumberGrade = TextBox1.Text Select Case NumberGrade caso 90 A 100 Response.Write ("A" ) Case 80 a 89 respuesta . Escribir ("B" ) asunto 70 a 79 Response.Write ("C " ) caso 60 a 69 Response.Write ( "D " ) caso es < 60 Response.Write ("F " ) End Select End Sub Ahora , podemos probar nuestra declaración de caso mediante la introducción de un número. Por ejemplo, si se introduce el número "87" en TextBox1 y Button1 se hace clic , se mostrará el valor resultante : "B " Los únicos números enteros que se no ser manejados mediante la instrucción caso anterior son los superiores a 100 . Para agregar un controlador para estos números , puede utilizar la instrucción Case Else en el extremo , que se encargará de todo lo que entró en el cuadro de texto que no entra dentro de sus rangos especificados . Protected Sub Button1_Click ( remitente de ByVal como objeto , ByVal e como System.EventArgs ) Handles Button1.Click NumberGrade Dim As Integer NumberGrade = TextBox1.Text Seleccione Case NumberGrade Case 90 A 100 Response.Write ("A" ) caso 80 A 89 Response.Write ("B" ) caso 70 A 79 Response.Write ("C " ) Case 60 a 69 Response.Write ("D " ) caso es < 60 Response.Write ("F " ) Case Else Response.Write ( "No es una ley número válido " ) End Select End Sub En el ejemplo anterior , si se introduce en el cuadro de texto el número " 237 " , se mostrará lo siguiente: " No es un número válido de grado . "
2
3
4
5