8.- UN EJEMPLO EN EL ANTIGUO BASIC

Palabras reservadas (instrucciones del lenguaje)
Así como los lenguajes naturales usan un vocabulario de palabras para construir frases, el VBA tiene un vocabulario de palabras reservadas que son las instrucciones y no las podemos usar como nombres de variable. Un lenguaje natural tiene muchísimas palabras (el castellano tiene entre 300.000 y 400.000), un lenguaje como el VBA tiene apensas unas decenas, y las que usamos normalmente son muy pocas. Una lista completa se puede ver aquí, y esta es una lista de las más comunes:

Dim, Do, Double, Else, Elseif, End, Exit, For, Function, Get, Global, Gosub, Goto, if, Integer, Long, Module, Private, Public, REM, Resume, Return, Single, Step, Stop, String, Then,  To, True, Variant, Wend, While, Xor, =, <, >

Como ven, para programar basta con manejar un vocabulario de menos de 40 palabras, que se combinan para hacer las diferentes expresiones. ¡Cualquiera puede aprenderlas!

Para efectos pedagógicos solamente, vamos a agregar dos instrucciones que son del antiguo Basic: Input, que permite recibir datos entrados desde el teclado y Print, que muestra datos en pantalla. Estas dos instrucciones ya no se usan en VBA pero son intuitivas y fáciles de comprender así es que haremos algunos ejemplos usando código Basic antiguo, lo que además les sirve si después quieren aprender Python u otros lenguajes que usan estas instrucciones.

Usando antiguo código Basic, explicaremos como funciona el condicional If y los loop con For, veamos

Ejemplo con If - Then -End if
Ingresar los datos de cantidad de un artículo comprado y precio unitario, almacenarlos en dos variables que llamaremos (arbitrariamente) CantCompra y PrecUnit, determinar si la compra excede o no el cupo de 500000, si no lo excede, poner en pantalla "Compra Autorizada", si lo excede poner "No Autorizada-Excede Cupo", luego, en cualquiera de los casos, debe poner el mensaje "FIN", el código en Basic es el siguiente:

Input "Ingrese Cantidad", CantCompra
Input "Ingrese Precio Unitario", PrecUnit
TotVta=CantCompra*PrecUnit
If TotVta > 500000 Then
         Print "No Autorizada-Excede Cupo"
End If
If TotVta <= 500000 Then
         Print "Compra Autorizada"
End If
Print "FIN"

Comentario del código:
Este código contiene 10 líneas o "expresiones", equivalentes a 10 frases en lenguaje natural, se ejecutan secuencialmente, una después de otra de arriba a abajo, es una lista de instrucciones. Las primeras dos líneas piden que entremos datos a las variables CantCompra y PrecUnit usando el teclado, para ello muestran dos mensajes constantes que son "Ingrese Cantidad" e "Ingrese Precio Unitario", los mensajes y valores de texto (String) constantes se escriben entre comillas para distinguirlos de las variables. Su valor es siempre el mismo. Las variables en cambio pueden almacenar cualquier valor que les ingresemos, o sea sus valores son distintos cada vez.

Las variables generalmente pueden recibir su valor de dos maneras: ingresadas por el usuario (por ejemplo desde el teclado) o generadas por el programa mediante un cálculo o una instrucción. En la línea 3 se define una nueva variable que le pusimos nombre TotVta y se genera por el programa mediante un cálculo: multiplicando la cantidad por el precio.

Las líneas 4, 5 y 6 comparan el valor de TotVta con el valor constante de 500000 (como es un número, no va entre comillas, si lo ponemos entre comillas sería tratado como String y no podríamos hacer la comparación). Entonces la condición es ¿TotVta es mayor que 500000?, si es mayor coloca un mensaje que niega la venta y si no es mayor salta a la instrucción siguiente.

Las líneas 7, 8, y 9 comparan nuevamente el valor de TotVta con el valor constante de 500000, pero esta vez la condición es ¿TotVta es menor o igual a 500000? (noten que la condición en este caso es menor o igual, o sea dos en una), si se cumple entonces autoriza la venta.

En cualquiera de los casos salta a la instrucción 10 que coloca en pantalla el mensaje constante "FIN"

Este ejemplo es trivial y no está optimizado, el código se puede mejorar un poquito -lo dejo como ejercicio- pero lo escribí así para una máxima claridad pedagógica. Ese código lo podemos representar en un Diagrama de Flujo que se muestra al comienzo de esta entrada (doble clic para verlo más grande).

Ejemplo con For - To - Next

For i = 1 to 100
      print "Pasada número ", i
Next i
Print "Fin de las pasadas"

Al ejecutarse este programa mostrara 100 mensajes del tipo: "Pasada número 1", "Pasada número 2", "Pasada número 3"... etc. hasta "Pasada número 100". Después de eso mostrará un solo mensaje que dirá  "Fin de las pasadas".

NOTA IMPORTANTE: ¿Se han fijado que todas las instrucciones que van "dentro de un If o un ciclo For aparecen "corridas" hacia la derecha? esto se llama "indentación" y aunque en VBA no es obligatorio es muy importante escribir siempre así es código, para su claridad de lectura, todo lo que sigue a un If o un For se escribe corrido un tab a la derecha, siempre (en otros lenguajes como Python esto es obligatorio).