Clases y Collection
Publicado por Gabriel (38 intervenciones) el 26/12/2007 22:23:53
Estimados, les esccribo debido a que tengo un problema, a modo de prueba estoy queriendo implementar colecciones de clases para después utilizarlas individualmente, en un módulo de clase (cDatos) tengo por ej
public id as long
public nombre as string
y en un formulario ahgo
dim Datos as new collection
dim NuevoDato as cDatos
set nuevodato = new cdatos
nuevodato.id = 1
nuevodatos.nombre = "uno"
datos.add nuevodatos.nombre, nuevodatos.id
nuevodato.id = 2
nuevodatos.nombre = "dos"
datos.add nuevodatos.nombre, nuevodatos.id
Ahora bien yo quisiera realizar un bucle para poder obtener el id y el nombre de las clases que fueron agregadas a la colección, es decir que me aparezca
1
uno
2
dos
probé con el for each pero no hay caso, alguien me puede decir como puedo hacer esto??
Atentamente
public id as long
public nombre as string
y en un formulario ahgo
dim Datos as new collection
dim NuevoDato as cDatos
set nuevodato = new cdatos
nuevodato.id = 1
nuevodatos.nombre = "uno"
datos.add nuevodatos.nombre, nuevodatos.id
nuevodato.id = 2
nuevodatos.nombre = "dos"
datos.add nuevodatos.nombre, nuevodatos.id
Ahora bien yo quisiera realizar un bucle para poder obtener el id y el nombre de las clases que fueron agregadas a la colección, es decir que me aparezca
1
uno
2
dos
probé con el for each pero no hay caso, alguien me puede decir como puedo hacer esto??
Atentamente
Valora esta pregunta


0