Ejemplo para simular un inicio de sesión en Visual Basic 6.

Mira este ejemplo para simular un inicio de sesión bastante sencillo y práctico en Visual Basic 6.

Operadores y Estructuras en Visual Basic 6.0

Para construir expresiones, además de variables o constantes utilizaremos los operadores, que se clasifican de la siguiente forma y respetando la jerarquía que con la que aparecen:

ARITMÉTICOS.

^ Exponenciación.

* Multiplicación    / División

\ División entera

MOD Módulo (resto de la división entera)

+ Suma                   - Resta

ALFANUMÉRICOS.

&, + Concatenan textos.

LÓGICOS.

NOT Negación

AND Y

OR O

COMPARATIVOS.

< Menor que        <= Menor o igual que

> Mayor que        >= Mayor o igual que

= Igual que            <>, != Distinto que

Estructuras.

A continuación veremos las estructuras que podemos usar en Visual Basic:

ESTRUCTURAS DE DECISIÓN

If: Esta estructura nos permite desviar el flujo de programa dependiendo de si se cumple una condición. La sintaxis es:

    If Condición then

        Conjunto de ordenes que se ejecutarán cuando la Condición sea verdadera.

    Else

        Conjunto de ordenes que se ejecutarán cuando la Condición sea falsa.

    End If

Select: Dependiendo del valor de una expresión o variable ejecuta una opción u otra. La sintaxis es:

    Select Case Expresión

              Case Valor1

                        Conjunto de ordenes que se ejecutarán cuando la Expresión tenga Valor1.

              Case Valor2

                        Conjunto de ordenes que se ejecutarán cuando la Expresión tenga Valor2.

               ............

              Case Else

                        Conjunto de ordenes que se ejecutarán cuando la Expresión no sea ningún valor anterior.

    End Select

ESTRUCTURAS DE BUCLE

Las estructuras de bucle permiten ejecutar una o más líneas de código repetidamente. Las estructuras de bucle que acepta Visual Basic son:

Do...Loop: Utilizaremos el bucle Do para ejecutar un bloque de instrucciones un número indefinido de veces. Hay algunas variantes en la instrucción Do...Loop, pero cada una evalúa una condición numérica para determinar si continúa la ejecución. Como ocurre con If...Then, la condición debe ser un valor o una expresión que dé como resultado False (cero) o True(distinto de cero).

Las instrucciones se ejecutan siempre y cuando condición sea True, la sintaxis es:

    Do While condición
        instrucciones

    Loop

Cuando Visual Basic ejecuta este bucle Do, primero evalúa condición. Si condición es False (cero), se salta todas las instrucciones. Si es True (distinto de cero), Visual Basic ejecuta las instrucciones, vuelve a la instrucción Do While y prueba la condición de nuevo.

Por tanto, el bucle se puede ejecutar cualquier número de veces, siempre y cuando condición sea distinta de cero o True. Nunca se ejecutan las instrucciones si condición es False inicialmente. 

Otra variante de la instrucción Do...Loop ejecuta las instrucciones primero y prueba condición después de cada ejecución. Esta variación garantiza al menos una ejecución de instrucciones:

    Do
        instrucciones

    Loop While condición

Hay otras dos variantes análogas a las dos anteriores, excepto en que repiten el bucle siempre y cuando condición sea Falseen vez de True.

Hace el bucle cero o más veces	Hace el bucle al menos una vez
Do Until condición    instrucciones Loop	Do instrucciones Loop Until condición

For...Next

Los bucles Do funcionan bien cuando no se sabe cuántas veces se necesitará ejecutar las instrucciones del bucle. Sin embargo, cuando se sabe que se van a ejecutar las instrucciones un número determinado de veces, es mejor elegir el bucleFor…Next. A diferencia del bucle Do, el bucle For utiliza una variable llamada contador que incrementa o reduce su valor en cada repetición del bucle. La sintaxis es la siguiente:

    For contador = iniciar To finalizar [Step incremento]
        instrucciones

    Next [contador]

Los argumentos contador, iniciar, finalizar e incremento son todos numéricos.

Nota   El argumento incremento puede ser positivo o negativo. Si incremento es positivo, iniciar debe ser menor o igual quefinalizar o no se ejecutarán las instrucciones del bucle. Si incremento es negativo, iniciar debe ser mayor o igual que finalizarpara que se ejecute el cuerpo del bucle. Si no se establece Step, el valor predeterminado de incremento es 1.

Al ejecutar el bucle For, Visual Basic:

1. Establece contador al mismo valor que iniciar.
2. Comprueba si contador es mayor que finalizar. Si lo es, Visual Basic sale del bucle.
   (Si incremento es negativo, Visual Basic comprueba si contador es menor que finalizar.)
3. Ejecuta instrucciones.
4. Incrementa contador en 1 o en instrucciones, si se especificó.
5. Repite los pasos 2 a 4.

Uso de PRINT en Visual Basic 6.0

Crearemos un EXE estándar, al cual le insertaremos de la caja de herramientas un botón, el cual podemos posicionar donde queramos y establecerle el tamaño deseado. Nuestro primer programa ya funcionaría en el sentido de que si lo ejecutásemos ahora, ya podríamos pulsar el botón tantas veces como quisiésemos (no haría nada, pero tampoco provocaría un error).

Para que al pulsar el botón "ocurra algo", debemos escribir el código que deseamos que se ejecute cuando el usuario pulse el botón (que el usuario pulse el botón, significa para Visual que se dispara el evento Click del objeto Command1). Por lo tanto el código deberemos escribirlo en el procedimiento Command1_Click().

La forma más cómoda de hacer esto consiste en hacer doble click sobre el botón de nuestro formulario, esto nos llevará a la ventana de código y además nos escribirá en ella el encabezado y final del evento que necesitamos, dejándolo preparado para que podamos escribir nuestro código:

Como código escribiremos la línea: Print "Has pulsado el botón" que escribe en el formulario el texto encerrado entre comillas.

Para ejecutar nuestro programa tenemos diversas opciones, incluyendo la generación de un ejecutable, pero en la fase de desarrollo de un programa es la opción más lenta. Digamos que hasta que no hayamos terminado de implementar el programa, no crearemos el ejecutable. La forma más cómoda consiste en ejecutarlo sin compilar, es decir, interpretando las órdenes, de esta forma detectamos más rápidamente posibles errores. Para ello iremos al menú Ejecutar / Iniciar, o pulsaremos F5, (también podemos iniciar la ejecución pulsando el botón  de la barra de botones de Visual Basic). Veremos nuestro formulario en pantalla y cada vez que pulsemos el botón, se escribirá en el mismo el texto que indicamos entrecomillado, esto lo podemos hacer tantas veces como queramos.