Visual Basic 6.0 - Tecnun

Capítulo 3: Lenguaje BASIC página 43programa. Un array dinámico, puede ser redimensionado en cualquier momento de la ejecución. Laforma mejor de redimensionar los arrays es mediante variables que contienen los valores adecuados.Para crear un array dinámico primero hay que declararlo como si fuera una array estático, perosin darle dimensión. Es decir, se deja la lista -entre paréntesis- vacía sin ponerle ningún número.Esto se hace con la sentencia Public si se quiere que sea global, con Dim o Private si se quiere anivel de módulo o con Static, Dim o Private si se quiere que sea local.Para asignar el número actual de elementos del array se utiliza la sentencia ReDim. Lasentencia ReDim puede aparecer solamente en un procedimiento y permite cambiar el número deelementos del array y sus límites inferior y superior, pero no el número de dimensiones. Esto quieredecir que, por ejemplo, no se puede trasformar un vector en una matriz.A continuación se presenta un ejemplo de cómo se declaran arrays dinámicos en Visual Basic.Si se declara el array Matriz a nivel del formulario,Dim Matriz( ) As Integery más tarde, un procedimiento Calculo puede asignar espacio para el array, como se indica acontinuación:Sub Calculo( )...ReDim Matriz(F, C)...End SubCada vez que se ejecuta la sentencia ReDim, todos los valores almacenados en el array sepierden (si son Variant se ponen a Empty; si son numéricos a cero y si son cadenas de caracteres ala cadena vacía). Cuando interese cambiar el tamaño del array conservando los valores del array,hay que ejecutar ReDim con la palabra clave Preserve. Por ejemplo, supóngase un array A de dosdimensiones. La sentencia,ReDim Preserve A(D1, UBound(A, 2) + 2)incrementa el tamaño del array en dos columnas más. Cuando se utiliza la palabra Preserve nopuede cambiarse el índice inferior del array (sí el superior). La función UBound utilizada en esteejemplo es una función que devuelve el valor más alto de la segunda dimensión de la matriz (ver elHelp para más información).3.10 ESTRUCTURAS: SENTENCIA TYPEUna estructura (según la nomenclatura típica del lenguaje C) es un nuevo tipo de datos, un tipodefinido por el usuario, que puede ser manipulado de la misma forma que los tipos predefinidos(Int, Double, String, ...). Una estructura puede definirse como una colección o agrupación de datosde diferentes tipos evidentemente relacionados entre sí.Para crear una estructura con Visual Basic 6.0 hay que utilizar la sentencia Type ... End Type.Esta sentencia solamente puede aparecer en la sección General o de declaraciones de un módulo.Pueden crearse como Public o como Private en un módulo estándar o de clase y sólo como Privateen un formulario. Dim equivale a Public. Véase el siguiente ejemplo,Public Type AlumnoNombre As StringDireccion As String *40Telefono As LongDNI As LongEnd Type