Problema con array.. - VB-MUNDO

geq · #1 (**permalink**) 24-02-2005, 19:57:04

Tengo un problema cuando quiero borrar todos los elementos de un arreglo. Yo utilizé esto:

Código:

Dim i As Integer

For i = 0 To MyArr.Count
  MyArr.Remove i
Next

Pero el problema es que no borra todos.. Comprobé que MyArr.Count era, por ejemplo, 23. Pero cuando llegaba i a 17, daba un error que decía que el índice estaba fuera del intérvalo y no continuaba borrando.. Pero 17 es menor que 23!!

Quisiera saber si alguien tiene una solución/explicación o algún otro método para vaciar arreglos.. Se me había ocurrido eliminarlo y volverlo a declarar, pero no sé cómo..

Muchas gracias!

acalanto · #2 (**permalink**) 24-02-2005, 20:30:34

Esto hace referencia a tu pregunta explode y realmente considero que estás utilizando una colección como array cuando deberías usar simplemente array.

Lo que te sucede es que estás removiendo índices en la collection y si tienes 27 -inicialmente- y borras el índice 27, ya no lo puedes borrar, sencillamente porque no existe.

Además has de tener en cuenta que manipular una collection (o HasTable si prefieres llamarla) mediante sus índices es, paradójicamente, mucho más lento que a través de sus claves de acceso.

Anda, mírate el ejemplo Split que seguro que es mucho más eficiente que lo que tratas de implementar.

geq · #3 (**permalink**) 24-02-2005, 20:38:09

Si. Entiendo. Pero Lo de split ya esta resuelto (y estoy agradecido). Esto es para otro uso. Necesito vaciar un arreglo que creo con:

Código:

Dim MyArr as New Collection

para poder cargar nueva información.. Eso es todo.

Si yo lo declaro con

Código:

Dim MyArr(50)

Puedo escribir en el elemento 51 (ej.) sin problemas? O debo crear el nuevo elemento/agregar elementos?

Yo utilizo Collection para poder agragar objetos con

Código:

MyArr.Add("nuevo valor")

Pero me surge el problema anterior cualdo quiero eliminarlos para poder volver a utilizar el código anterior, pero que no agregue en el elemento siguiente sino en el 0..

Muchas gracias!

acalanto · #4 (**permalink**) 25-02-2005, 06:00:00

Es que Collection no es ni se comporta como un Array. Cuando eliminas un elemento de la lista -por ejemplo el 354- el 355 pasa potéticamente a ocupar su lugar y así sucesivamente.

Para vacirar totalmente una Collection

Set micol = nothing

lo mejor sería que utilices pares de datos ya que Collection te acepta KEY:ITEM y así

micol.add "354", "Valor"

Si deseas eliminar un valor

micol.remove "354"

para recuperar

mival = micol.item("354")

Ten cuidado porque si la clave solicitada no existe se produce un error en tiempo de ejecución que debes capturar.

Otra cosa, las Collections, como son un Array, no se dimensionan; son estructuras de datos dinámicas que ajustan su tamaño según añades datos.

No sé si ahora me he explicado mejor.

MiguelP. · #5 (**permalink**) 27-02-2005, 02:47:25

Si vas eliminando, a la misma vez va cambiando el Count del Array. Prueba a borrarlos así:

Código:

Dim i As Integer 
Fin=MyArr.Count 
For i = Fin To 0 step -1
  MyArr.Remove i 
Next

Suerte. No sé si te entendí bien. Pero creo que es esto.

MiguelS · #6 (**permalink**) 27-02-2005, 15:18:38

Código:

For Each...Next Statement
      

Repeats a group ofstatements for each element in anarray orcollection.

Syntax

For Each element In group
[statements]
[Exit For]
[statements]

Next [element]

geq · #7 (**permalink**) 28-02-2005, 19:42:50

Muchas gracias a todos! Entiendo lo de Collection. En base a esto, escribí un código similar al que envió MiguelP. Estaba por publicarlo, pero él lo hizo primero..

Creo que será mejor utilizar, Acalanto, Set. Muchísimas gracias y (sinceramente) tus explicaciones son exelentes.

Agradezco mucho la atención en este foro. Muchas gracias! :smt003

P.D.: Después les comento acerca del proyecto que me llevó a realizar mis dos últimos posts..