Basic Facil - Sentencia Type

Una estructura (según la nomenclatura típica del lenguaje C) es un nuevo tipo de datos, un tipo
definido 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 datos
de 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 Private
en un formulario. Dim equivale a Public. Véase el siguiente  ejemplo,
Public Type Alumno
   Nombre    As String
   Direccion As String *40
   Telefono  As Long
   DNI       As Long
End Type

Este ejemplo declara un tipo de datos denominado Alumno que consta de cuatro miembros o
campos, denominados Nombre, Direccion, Telefono y DNI.
Una vez definido un nuevo tipo de datos, en un módulo estándar o de clase se pueden declarar
variables Public o Private de ese tipo (en un formulario sólo Private), como por ejemplo:
Public Mikel as Alumno
Para referirse a un determinado miembro de una estructura se utiliza la notación
variable.miembro. Por ejemplo,
Mikel.DNI = 34103315
A su vez, un miembro de una estructura puede ser otra estructura, es decir un tipo definido
por el usuario. Por ejemplo,
Type Fecha
   Dia  As Integer
   Mes  As Integer
   Anio As Integer
End Type
 
Type Alumno
   Alta       As Fecha
   Nombre     As String
   Direccion  As String * 40
   Telefono   AS Long
   DNI        As Long
End Type
Dentro de una estructura puede haber arrays tanto estáticos como dinámicos.
En Visual Basic 6.0 se pueden definir arrays de estructuras. La declaración de un array de
estructuras se hará con la palabra Public, Private o Static, dependiendo de su ámbito. La forma de
hacerlo es la siguiente:
Public   grupoA (1 To 100) As Alumno
Private  grupoB (1 To 100) As Alumno
Static   grupoC (1 To 100) As Alumno
En Visual Basic 6.0, a la hora de declarar arrays de estructuras, sucede lo mismo que al
declarar arrays de cualquier tipo de variables. Con GrupoA(1 To 100), se crea un vector de
estructuras de 100 elementos de tipo  Alumno (grupoA(1),  grupoA(2), ...,  grupoA(100)). Con
grupoB(100), se crearía un vector de estructuras de 101 elementos (grupoB(0), grupoB(1), ...
grupoB(100)).
Es posible asignar una estructura a otra del mismo tipo. En este caso se realiza una copia
miembro a miembro. Véase el siguiente ejemplo:
GrupoA(1) = delegado
Las  estructuras pueden ser también  argumentos en las llamadas a funciones y
procedimientos  Sub. Siempre son pasados por referencia, lo cual implica que pueden ser
modificados dentro del procedimiento y esas modificaciones permenecen en el entorno de llamada
al procedimiento. En el caso de las funciones, las estructuras pueden ser también valores de
retorno.