Unidad 3. Lenguaje Visual Basic de Aplicaciones (VBA) (XI)



Sentencia condicional: If …  End If; Select Case …. End Select

Sentencia  IF … ELSE … END IF

Sintaxis

If ExpresionCondicional Then

   [ Sentencias 1 ]

Else

   [ Sentencias 2 ]

End If

Permite ejecutar el grupo de sentencias 1 siempre que la evaluación de "ExpresiónCondicional" de cómo resultado Verdadero; en caso contrario se ejecuta el grupo de sentencias 2.

Ejemplo 7

En el siguiente procedimiento, se imprime en pantalla el cuadrado o el cubo del valor ingresado por teclado, según que éste sea un valor menor o mayor o igual a 10.

Sub Potencia

x = InputBox("Ingresa un número entre 0 y 500")

If x < 10 Then

  ValorCalc =x^2

Else

  ValorCalc = x^3

End If

MsgBox(ValorCalc)

End Sub

Nota:

Observe que en este procedimiento no hemos declarado ninguna variable. Esto es correcto también; sin embargo en un procedimiento formal y bastante grande, se recomienda hacerlo.

Nota

La siguiente tabla muestra un conjunto de funciones matemáticas, estadísticas y de texto que pueden ser usadas en un procedimiento.

En esta tabla el rango de los datos numéricos se denomina DATO. La celda C3 contiene un número aleatorio entre 0 y 1. A14 = "Ilmer",  B14 = "Cóndor", A15 = "Ilmer Cóndor Espinoza", A16 = "XP203".

Noviembre-2010
Pág. 3.11

Atrás  Inicio  Adelante





Página inicial  Cursos Informática Gratuitos

Síguenos en:   Facebook       Sobre aulaClic            Política de Cookies