Foros - Stratos

Programadores => General Programadores => Mensaje iniciado por: Sergio en 01 de Mayo de 2003, 08:41:25 PM

Título: Recorrer Types en VB
Publicado por: Sergio en 01 de Mayo de 2003, 08:41:25 PM
                                Buenas. Quiero "recorrer" todas las estructuras creadas a partir de un Type mio sin usar arrays en VB. En Blitz se puede hacer asi:

;Defino el tipo 'Alumno'

Type Alumno

  Field Nombre$

  Field Apellidos$

  Field NoExpediente

End Type



nosekien.Alumno=New Alumno

nosecuanto.Alumno=New Alumno

nosedonde.Alumno=New Alumno



'Les doy a todos un valor por defecto

For a.Alumno = Each Alumno

  aNombre$="Vacio"

  aApellidos$="Vacio"

  aNoExpediente=0

Next


La funcion en cuestion es Each, que al colocarlo en un bucle, me va dando la direccion de cada estructura creada a partir del tipo Alumno sin usar matrices ni nada por el estilo. Y luego estan para moverte a partir del 'Alumno' (en este caso) actual, After, Before, First y Last, que te llevan al Alumno siguiente, anterior, primero y ultimo (respectivamente). Existen funciones similares en VB??

Gracias de antemano. Un saludo!!!!!!!