Visual Basic (página 2)

Partes: 1, , 3

Parte 3: Tipos De Datos, Constantes

y Variables

Tipos de Datos

Un tipo de dato determina la naturaleza del dominio de valores que puede tomar una variable, las operaciones en que puede participar y el espacio de memoria que necesita. La tabla siguiente muestra los tipos de datos, incluyendo el tamaño de almacenamiento y el intervalo.

Nota: Las matrices de cualquier tipo de datos requieren 20 bytes de memoria más cuatro bytes para cada dimensión de matriz, más el número de bytes que ocupan los propios datos. Por ejemplo, los datos de una matriz unidimensional que constan de cuatro elementos de datos tipo Integer de dos bytes cada uno, ocupan ocho bytes. Los ocho bytes que requieren los datos más los 24 bytes necesarios para la matriz suman un requisito total de memoria de 32 bytes para dicha matriz. Un tipo Variant que contiene una matriz requiere 12 bytes más que la matriz por sí sola.

Convertir tipos de datos

Visual Basic proporciona varias funciones de conversión que puede utilizar para convertir valores de tipos de datos específicos. Por ejemplo, para convertir un valor a Currency, utilice la función Ccur:

PagoPorSemana = Ccur (horas * PagoPorHora)

La siguiente tabla muestra las funciones de conversión:

Nota: Los valores que se pasan a una función de conversión deben ser válidos para el tipo de dato de destino o se producirá un error. Por ejemplo, si intenta convertir un tipo Long en un Integer, el tipo de Long debe de estar en el intervalo válido del tipo de dato Integer.

Variables

Las variables se utilizan para almacenar valores temporalmente durante la ejecución de una aplicación. Las variables tienen un nombre (la palabra que utiliza para referirse al valor que contiene la variable) y un tipo de dato (que determina la clase de dato que la variable puede almacenar).

Almacenamiento y recuperación de datos en variables

Utilice una sentencia de asignación para realizar cálculos y asignar el resultado a una variable:

ManzanaVendidas = 10 ‘ Se pasa el valor 10 a la variable

ManzanasVendidas = ManzanasVendidas + 1

Observe que el signo igual del ejemplo es un operador de asignación, no un operador de igualdad; el valor 10 se asigna a la variable ManzanasVendidas.

Declaración de Variables

Declarar una variable es decirle al programa algo de antemano. Se declara una variable mediante la instrucción Dim, proporcionando un nombre a la variable, según la siguiente sintaxis:

Dim nombre-variable [As tipo]

Las variables que se declaran en un procedimiento mediante la sentencia Dim sólo existen mientras se ejecuta el procedimiento. Cuando termina el procedimiento, desaparece el valor de la variable. Además, el valor de una variable de un procedimiento es local a dicho procedimiento; es decir, no puede tener acceso a una variable de un procedimiento desde otro procedimiento. Estas características le permiten utilizar los mismos nombres de variables en distintos procedimientos sin preocuparse por posibles conflictos o modificaciones accidentales.

El nombre de una variable debe cumplir con los siguientes requisitos:

• Debe comenzar con una letra.
• No puede incluir un punto o un carácter de declaración de tipo ($,&,!,%,#,@).
• No debe exceder de 255 caracteres.
• Debe ser única en el mismo alcance, que es el intervalo desde el que se puede hacer referencia a la variable: un procedimiento, formulario, etc.

La cláusula opcional As tipo de la sentencia Dim le permite definir el tipo de dato o de objeto de la variable que va a declarar. Los tipos de datos definen el tipo de información que almacena la variable. Algunos ejemplos de tipos de datos son String, Integer y Currency. Las variables también pueden contener objetos de Visual Basic u otras aplicaciones. Algunos ejemplos de tipos de objeto de Visual Basic, o clases, son Object, Form1 y TextBox.

Hay otras formas de declarar variables:

• Declarar una variable en la sección Declaraciones de un módulo de formulario, estándar o de clase, en vez de un procedimiento, hace que la variable esté disponible para todos los procedimientos del módulo.
• Declarar una variable mediante la palabra clave Public hace que esté accesible para toda la aplicación.
• Declarar una variable local mediante la palabra clave Static conserva su valor aunque termine el procedimiento.

Declaración Implícita

No tiene por qué declarar una variable antes de utilizarla. Por ejemplo, podría escribir una función donde no hiciera falta declarar TempVal antes de utilizarla:

Visual Basic crea automáticamente una variable con ese nombre, que puede utilizar como si la hubiera declarado explícitamente. Aunque es cómodo, puede provocar errores sutiles en el código si se equivoca de nombre de variable. Por ejemplo, suponga que ha escrito esta función:

A primera vista, parece igual. Pero como se ha escrito erróneamente la variable TempVal en la tercera línea, la función devolverá siempre cero. Cuando Visual Basic encuentra un nombre nuevo, no puede averiguar si realmente desea declarar una variable nueva o simplemente ha escrito de forma errónea una variable existente, por lo que crea una variable nueva con ese nombre.

Declaración Explícita

Para evitar problemas al equivocarse de nombre en las variables, puede configurar Visual Basic para que le avise siempre que encuentre un nombre que no se haya declarado explícitamente como una variable.

Para declarar variables de forma explícita:

• Incluya esta sentencia en la sección Declaraciones Generales del módulo de clase, de formulario o estándar:

Option Explicit

– o bien –

En el menú Herramientas, elija Opciones, haga clic en la ficha Editor y active la opción Declaración de variables requerida. Esto inserta automáticamente la sentencia Option Explicit en los módulos nuevos, pero no en los ya creados, por lo que tendrá que agregar manualmente Option Explicit a los módulos existentes en el proyecto.

Si hubiera tenido efecto dicha instrucción en el módulo de formulario o módulo estándar que contiene la función Raíz, Visual Basic habría reconocido TempVal y TemVal como variables no declaradas y habría generado errores para ambas. Debería, por tanto, declara explícitamente TempVal:

Alcance de las Variables

El alcance de una variable define en qué partes del código son reconocidas. Cuando declara una variable en un procedimiento, sólo el código de dicho procedimiento puede tener acceso o modificar el valor de la variable; tiene un alcance local al procedimiento. A veces, sin embargo, se necesita utilizar una variable con un alcance más general, como aquella cuyo valor está disponible para todos los procedimientos del mismo módulo o incluso para todos los procedimientos de toda la aplicación. Visual Basic le permite especificar el alcance de una variable cuando la declara.

Establecido el alcance de las variables

Dependiendo de cómo se declara, una variable tiene como alcance un procedimiento (local) o un módulo.

Variables utilizadas en un procedimiento

Las variables al nivel de procedimiento sólo se reconocen en el procedimiento en el que se han declarado. Se las conoce también como variables locales. Se declaran mediante las palabras clave Dim o Static. Por ejemplo:

Los valores de variables locales declaradas con Static existen mientras se ejecuta la aplicación, mientras que las variables declaradas con Dim sólo existen mientras se ejecuta el procedimiento.

Variables utilizadas en un módulo

De forma predeterminada, una variable al nivel de módulo está disponible para todos los procedimientos del módulo, pero no para el código de otros módulos. Cree variables al nivel de módulo declarándolas con la palabra clave Private en la sección Declaraciones Generales al principio del módulo. Por ejemplo:

Private intTemp As Integer

Al nivel de módulo, no hay diferencia entre Private y Dim, pero es preferible usar Private porque contrasta con Public y hace que el código sea más fácil de comprender.

Variables utilizadas por todos los módulos

Para hacer que una variable al nivel de módulo esté disponible para otros módulos, utilice la palabra clave Public para declararlas. Los valores de las variables públicas están disponibles para todos los procedimientos de la aplicación. Al igual que todas las variables al nivel del módulo, las variables públicas se declaran en la sección Declaraciones Generales al principio del módulo. Por ejemplo:

Public intTemp As Integer

Nota: No puede declarar variables públicas en un procedimiento, sólo en la sección Declaraciones Generales de un módulo.

Constantes

A menudo verá que el código contiene valores constantes que reaparecen una y otra vez. O puede que el código dependa de ciertos números que resulten difíciles de recordar (números que, por sí mismos, no tienen un significado obvio).

En estos casos, puede mejorar mucho la legibilidad del código y facilitar su mantenimiento si utiliza constantes. Una constante es un nombre significativo que sustituye a un número o una cadena que no varía. Aunque una constante recuerda ligeramente a una variable, no puede modificar una constante o asignarle un valor nuevo como ocurre con una variable. Hay dos orígenes para las constantes:

• Constantes intrínsecas o definidas por el sistema proporcionadas por Visual Basic.
• Las constantes simbólicas o definidas por el usuario se declaran mediante la instrucción Const.

Creación de sus propias constantes

La sintaxis para declarar una constante es la siguiente:

[Public|Private] Const nombre_constante [As tipo] = expresión

El argumento nombre_constante es un nombre simbólico válido (las reglas son las mismas que para crear nombres de variable) y expresión está compuesta por constantes y operadores de cadena o numéricos; sin embargo, no puede utilizar llamadas a funciones en expresión. Una instrucción Const puede representar una cantidad matemática o de fecha y hora:

Const conPi = 3.14159265358979

Public Const conMaxPlanetas As Integer = 9

Const conFechaSalida = #1/1/95#

Se puede utilizar también la instrucción Const para definir constantes de cadena:

Public Const conVersion = " 07.10.A"

Const conNombreClave = "Enigma"

Puede colocar más de una declaración de constante en una única línea si las separa con comas:

Public Const conPi=3.14, conMaxPlanetas=9, conPobMundial=6E+09

A menudo, la expresión del lado derecho del signo igual ( = ) es un número o cadena literal, pero también puede ser una expresión que dé como resultado un número o una cadena (aunque la expresión no puede contener llamadas a funciones). Puede incluso definir constantes en términos de constantes previamente definidas:

Const conPi2 = conPi * 2

Una vez que defina las constantes, puede colocarlas en el código para hacerlo más legible. Por ejemplo:

Static SistemaSolar (1 To conMaxPlanetas)

If numPersonas > conPopMundial Then Exit Sub

Alcance de las constantes definidas por el usuario

Una instrucción Const tiene igual alcance que una declaración de variable y se le aplican las mismas reglas:

• Para crear una constante que sólo exista en un procedimiento, declárela dentro del procedimiento.
• Para crear una constante disponible para todos los procedimientos de un módulo, pero no para el código que está fuera del módulo, declárela en la sección Declaraciones Generales del módulo.
• Para crear una constante disponible en toda la aplicación, declare la constante en la sección Declaraciones Generales de un módulo estándar y coloque delante de Const la palabra clave Public. No se pueden declarar las constantes públicas en un módulo de clase o de formulario.

Evitar referencias circulares

Como es posible definir constantes en términos de otras constantes, deberá tener cuidado para no establecer un ciclo o referencia circular entre dos o más constantes. Se produce un ciclo cuando se tienen dos o más constantes públicas, cada una de las cuales está definida en función de la otra. Por ejemplo:

'En el Módulo 1:

Public Const conA = conB * 2 ' Disponible en toda la aplicación

'En el Módulo 2:

Public Const conB = conA / 2 ' Disponible en toda la aplicación

Si se produce un ciclo, Visual Basic generará un error cuando intente ejecutar la aplicación. No puede ejecutar el código hasta que resuelva la referencia circular. Para evitar la creación de un ciclo, restrinja todas las constantes públicas a un único módulo o, al menos, al menor número posible de módulos.

Convenciones para Nombres de Constantes y Variables

Las variables se deben definir siempre con el menor alcance posible. Las variables globales (públicas) pueden hacer lógica de una aplicación muy difícil de entender. Las variables globales también hacen más difícil mantener y volver a usar el código.

En Visual Basic las variables pueden tener el alcance siguiente:

En una aplicación de Visual Basic, las variables globales se deben usar sólo cuando no exista ninguna otra forma cómoda de compartir datos entre formularios. Cuando haya que usar variables globales, es conveniente declararlas todas en un único módulo agrupadas por funciones y dar al módulo un nombre significativo que indique su finalidad, como Públicas.

Una práctica de codificación correcta es escribir código modular siempre que sea posible. Por ejemplo, si la aplicación muestra un cuadro de diálogo, coloque todos los controles y el código necesario para ejecutar la tarea del diálogo en un único formulario. Esto ayuda a tener código de la aplicación organizado en componentes útiles y minimiza la sobrecarga en tiempo de ejecución.

A excepción de las variables globales ( que no se deberían pasar), los procedimientos y funciones deben operar sólo sobre los objetos que se les pasan.

Prefijos de alcance de variables

A medida que aumenta el tamaño del proyecto, también aumenta la utilidad de reconocer rápidamente el alcance de las variables. Esto se consigue escribiendo un prefijo de alcance de una letra delante del prefijo de tipo, sin aumentar demasiado la longitud del nombre de las variables.

Una variable tiene alcance global si se declara como Public en un módulo estándar o en un módulo de formulario. Una variable tiene alcance de nivel de módulo si se declara como Private en un módulo estándar o en un módulo de formulario, respectivamente.

Nota: La coherencia es crucial para usar esta técnica de forma productiva; el corrector de sintaxis de Visual Basic no interceptará las variables de nivel de módulo que comience con "p".

Constantes

El nombre de las constantes se debe escribir en mayúsculas y minúsculas, con la letra inicial de cada palabra en mayúsculas. Aunque las constantes estándar de Visual Basic no incluyen información de tipo de datos y el alcance de una constante. Para los nombres de constantes, se deben seguir las mismas normas que para las variables. Por ejemplo:

Variables

Declarar todas las variables ahorra tiempo de programación porque reduce el número de errores debidos a nombres de variables errados (por ejemplo, aNombreUsuarioTmp frente a sNombreUsuarioTmp frente a sNombreUsuarioTemp). En la ficha Editor del cuadro de diálogo Opciones, active la opción Declaración de variables requerida. La instrucción Option Explicit requiere que declare todas las variables del programa de Visual Basic.

Las variables deben llevar un prefijo para indicar su tipo de datos. Opcionalmente, y en especial para programas largos, el prefijo se puede ampliar para indicar el alcance de la variable.

Tipos de datos de variables

Use los siguientes prefijos para indicar el tipo de datos de una variable.

Nombres descriptivos de variables y procedimientos

El cuerpo de un nombre de variable o procedimiento se debe escribir en mayúsculas y minúsculas y debe tener la longitud necesaria para describir su funcionalidad. Además, los nombres de funciones deben empezar con un verbo, como IniciarNombreMatriz o CerrarDiálogo.

Para nombres que se usen con frecuencia o para términos largos, se recomienda usar abreviaturas estándar para que los nombres tengan una longitud razonable. En general, los nombres de variables con más de 32 caracteres pueden ser difíciles de leer en pantalla VGA.

Cuando se usen abreviaturas, hay que asegurarse de que sean coherentes en toda la aplicación. Alterar aleatoriamente entre Cnt y Contar dentro de un proyecto provoca una confusión innecesaria.

Tipos definidos por el usuario

En un proyecto grande con muchos tipos definidos por el usuario, suele ser útil dar a cada uno de estos tipos un prefijo de tres caracteres. Si estos prefijos comienzan con "u", será fácil reconocerlos cuando se esté trabajando con tipos definidos por el usuario. Por ejemplo, "ucli" se podría usar como prefijo para las variables de un tipo Cliente definido por el usuario.

Tipos Adicionales de Variables

Registros o Estructuras

Son tipos de datos definidos por el usuario. Es básicamente un conjunto de varios datos de tipos elementales agrupados bajo una denominación común. Debe declararse en la sección Declaraciones Generales de un módulo. Se usa la palabra reservada Type.

Sintaxis

Ejemplo

Arreglo de Variables

Un arreglo es una colección de elementos del mismo tipo con un nombre común. Los elementos son identificados por el nombre común y un índice.

Sintaxis

Dim NombreDelArreglo( Dimensión1, Dimensión2, … ) As TipoDeDato

Visual Basic soporta hasta 60 dimensiones. Al declarar las dimensiones se puede indicar un solo número, en cuyo caso se entiende que dicha dimensión va de cero hasta el número indicado. También es posible indicar explícitamente el inicio y término de la dimensión.

Ejemplo

Arreglos Dinámicos

Hay situaciones en las cuales se desea usar un arreglo, pero al momento del diseño no se sabe sus dimensiones. Para este tipo de situaciones Visual Basic permite declaraciones de arreglos del siguiente modo:

Dim x ( ) As Integer

…

…

Redim x (lstLista.ListCount)

Cuando se redimensiona un arreglo, los valores almacenados anteriormente se pierden, porque cada elemento es reinicializado con cero o null dependiendo del tipo de dato del elemento. Si se desea preservar los valores debemos usar la palabra clave Preserve en la sentencia de redimensionamiento.

Redim Preserve x ( intNúmeroDeElementos )

OPERADORES

Aritméticos

^ Exponenciación

* Multiplicación

/ División

División entera

Mod Residuo entero (Ejm: A Mod B)

+ Suma

• Resta

& Concatenación de cadenas

Comparación

= Igual

<> Distinto

• Menor que

<= Menor o igual

>= Mayor o igual

Like Compara dos cadenas

* Cero o más caracteres (Ejm: cad Like "ma*")

? Cualquier carácter

# Cualquier dígito (0-9)

[lista] cualquier carácter en lista

[¡lista] cualquier carácter que no esta en lista

Is Usado para comparar dos variables de referencia a objetos

Lógicos

And "Y" lógico

Or "O" lógico

Xor "O" Exclusivo

Not Negación

Parte 4: Estructuras de Control

Estructuras de Control

Las estructuras de control le permiten controlar el flujo de ejecución del programa. Tenemos dos tipos de estructuras de control:

• Estructuras de decisión
• Estructuras de bucle

Estructuras de Decisión

Los procedimientos de Visual Basic pueden probar condiciones y, dependiendo de los resultados, realizar diferentes operaciones. Entre las estructuras de decisión que acepta Visual Basic se incluyen las siguientes:

• If…Then
• If…Then…Else
• Select Case

If…Then

Use la estructura If…Then para ejecutar una o más instrucciones basadas en una condición. Puede utilizar la sintaxis de una línea o un bloque de varias líneas:

• If condición Then Sentencias
• If condición Then

Sentencias

End If

Condición normalmente es una comparación, pero puede ser cualquier expresión que dé como resultado un valor numérico. Visual Basic interpreta este valor como True o False; un valor numérico cero es False y se considera True cualquier valor numérico distinto de cero. Si condición es True, Visual Basic ejecuta todas las sentencias que siguen a la palabra clave Then. Puede utilizar sintaxis de una línea o de varias líneas para ejecutar una sentencia basada en una condición, los siguientes dos ejemplos son equivalentes:

Observe que el formato de una única línea de If…Then no utiliza la instrucción End If. Si se desea ejecutar más de una línea de código cuando condición sea True, debe utilizar la sintaxis de bloque de varias líneas If…Then…End If.

If…Then…Else

Utilice un bloque If…The…Else para definir varios bloques de sentencias, uno de los cuales se ejecutará:

If condición1 Then

[bloque de sentencias 1]

[ElseIf condición2 Then

[bloque de sentencias 2]] …

[Else

[bloque de sentencias n]]

End If

Visual Basic evalúa primero condición1. Si es False, Visual Basic procede a evaluar condición2 y así sucesivamente, hasta que encuentre una condición True. Cuando encuentra una condición True, Visual Basic ejecuta el bloque de instrucciones correspondientes y después ejecuta el código que sigue a End If. Opcionalmente, puede incluir un bloque de instrucciones Else, que Visual Basic ejecutará sin ninguna de las condiciones es True.

If…Then…ElseIf es un caso especial de If…Then…Else. Observe que puede tener cualquier número de cláusula ElseIf o ninguna. Puede incluir una cláusula Else sin tener en cuenta si tiene o no cláusula ElseIf.

Por ejemplo, la aplicación podría realizar distintas acciones dependiendo del control en que se haya hecho clic de una matriz de controles de menú:

Observe que siempre puede agregar más cláusulas ElseIf a la estructura If…Then. Sin embargo, esta sintaxis puede resultar tediosa de escribir cuando cada ElseIf compara la misma expresión con un valor distinto. Para estas situaciones, puede utilizar la estructura de decisión Select Case.

Select Case

Visual Basic proporciona la estructura Select Case como alternativa a If…Then…Else para ejecutar selectivamente un bloque de sentencias entre varios bloques. La sentencia Select Case ofrece posibilidades similares a la instrucción If…Then…Else, pero hace que el código sea más legible cuando hay varias opciones.

La estructura Select Case funciona con una única expresión de prueba que se evalúa una vez solamente, al principio de la estructura. Visual Basic compara el resultado de esta expresión con los valores de cada Case de la estructura. Si hay una coincidencia, ejecuta el bloque de sentencias asociado a ese Case:

Cada lista_expresiones es una lista de uno a más valores. Si hay más de un valor en una lista, se separan los valores con comas. Cada bloque de sentencias contiene cero o más instrucciones. Si más de un Case coincide con la expresión de prueba, sólo se ejecutará el bloque de instrucciones asociado con la primera coincidencia. Visual Basic ejecuta las instrucciones de la cláusula (opcional) Case Else si ningún valor de la lista de expresiones coincide con la expresión de prueba.

Por ejemplo, suponga que agrega otro comando al menú Edición en el ejemplo If…Then…Else. Podría agregar otra cláusula ElseIf o podría escribir la función con Select Case:

Observe que la estructura Select Case evalúa una expresión cada vez que al principio de la estructura. Por el contrario, la estructura If…Then…Else puede evaluar una expresión diferente en cada sentencia ElseIf. Sólo puede sustituir una esructura If…Then…Else con una estructura Select Case si la intrucción If y cada instrucción ElseIf evalúa la misma expresión.

Otros Ejemplos

Estrucuras de Repetición

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

• Do…Loop
• For…Next
• For Each…Next

Do…Loop

Utilice el bucle Do para ejecutar un bloque de sentencias un número indefinido de veces. Hay algunas variantes en la sentencia 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).

En el siguiente ejemplo de Do…Loop, las sentencias se ejecutan siempre y cuando condición sea True:

Do While condición

Sentencias

Loop

Cuando Visual Basic ejecuta este bucle Do, primero evalúa condición. Si condición es False (cero), se salta todas las sentencias. Si es True (distinto de cero) Visual Basic ejecuta las sentencias, 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 sentencias si condición es False inicialmente. Por ejemplo, este procedimiento cuenta las veces que se repite una cadena destino dentro de otra cadena repitiendo el bucle tantas veces como se encuentre la cadena de destino:

Si la cadena destino no está en la otra cadena, InStr devuelve 0 y no se ejecuta el bucle.

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

Do

Sentencias

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 False en vez de True.

For…Next

Los bucles Do funcionan bien cuando no se sabe cuántas veces se necesitará ejecutar las sentencias del bucle. Sin embargo, cuando se sabe que se va a ejecutar las sentencias un número determinado de veces, es mejor elegir el bucle For…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]

Sentencias

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 que finalizar o no se ejecutarán las sentencias del bucle. Si incremento es negativo, iniciar debe ser mayor o igual que finalizar para 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 las sentencias.
4. Incrementa contador en 1 o en incremento, si se especificó.
5. Repite los pasos 2 a 4.

Este código imprime los nombres de todas las fuentes de pantalla disponibles:

For Each…Next

El bucle For Each…Next es similar al bucle For…Next, pero repite un grupo de sentencia por cada elemento de una colección de objetos o de una matriz en vez de repetir las sentencias un número especificado de veces. Esto resulta especialmente útil si no se sabe cuántos elementos hay en la colección. He aquí la sintaxis del bucle For Each…Next:

For Each elemento In grupo

Sentencias

Next elemento

Por ejemplo, el siguiente procedimiento Sub abre la base de datos Biblio.mdb y agrega el nombre de cada tabla a un cuadro de lista.

Tenga en cuenta las restricciones siguientes cuando utilice For Each…Next:

• Para las colecciones, elemento sólo puede ser una variable Variant, una variable Object genérica o un objeto mostrado en el Examinador de objetos.
• Para las matrices, elemento sólo puede ser una variable Variant.
• No puede utilizar For Each…Next con una matriz de tipos definidos por el usuario porque un Variant no puede contener un tipo definido por el usuario.

El siguiente ejemplo habilita todos los Cuadro de Texto del formulario:

Salida de una Estructura de Control

La instrucción Exit le permite salir directamente de un bucle For o de un bucle Do. La sintaxis de la sentencia Exit es sencilla: Exit For puede aparecer tantas veces como sea necesario dentro de un bucle For y Exit Do puede aparecer tantas veces como sea necesario dentro de un bucle Do:

Exit For y Exit Do son muy útiles ya que, algunas veces, resulta apropiado salir inmediatamente de un bucle sin realizar más iteraciones o sentencias dentro del bucle.

Cuando utilice la instrucción Exit para salir de un bucle, el valor de la variable contador difiere, dependiendo de cómo haya salido del bucle:

• Cuando termina un bucle, la variable contador contiene el valor del límite superior más el paso.
• Cuando sale de un bucle prematuramente, la variable contador conserva su valor según las reglas usuales del alcance.
• Cuando sale antes del final de una colección, la variable contador contiene Nothing si se trata de un tipo de dato Object y Empty si es un tipo de dato Variant.