12.07.2015 Views

Visual Basic 6.0 - Tecnun

Visual Basic 6.0 - Tecnun

Visual Basic 6.0 - Tecnun

SHOW MORE
SHOW LESS
  • No tags were found...

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

Capítulo 3: Lenguaje BASIC página 33condición 1TruecondiciónFalseFalseBloque 1Truecondición 2TrueBloque 1 desentenciasBloque 2 desentenciasFalseBloque 3Bloque 2Por ejemplo,Figura 3.2. Bifurcaciones If e If...Else.Numero = 53 ’ Se inicializa la variable.If Numero < 10 ThenDigitos = 1ElseIf Numero < 100 Then' En este caso la condición se cumple (True) luego se ejecuta lo siguiente.Digitos = 2Else 'En el caso en que no se cumplan los dos anteriores se asigna 3Digitos = 3End If3.6.2 Sentencia SELECT CASEEsta sentencia permite ejecutar una de entre varias acciones en función del valor de una expresión.Es una alternativa a If ... Then ... ElseIf cuando se compara la misma expresión con diferentesvalores. Su forma general es la siguiente:Select Case expresionCase etiq1[sentencias1]Case etiq2[sentencias2]Case ElsesentenciasnEnd Selectdonde expresion es una expresión numérica o alfanumérica, y etiq1, etiq2, ... pueden adoptar lasformas siguientes:1. expresion2. expresion To expresion3. Is operador-de-relación expresion4. combinación de las anteriores separadas por comasPor ejemplo,Numero = 8’ Se inicializan las variable.Select Case Numero ’ Se va a evaluar la variable Numero.Case 1 To 5 ' Numero está entre 1 y 5.Resultado = "Se encuentra entre 1 y 5"' Lo siguiente se ejecuta si es True la expresión.Case 6, 7, 8' Numero es uno de los tres valores.Resultado = "Se encuentra entre 6 y 8"

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!