feed twitter facebook LinkedIn facebook

VBScript » Redimensionar un array con VBScript

febrero 9, 2008 por Víctor Cuervo 1 Comentario Imprimir Imprimir

Una de las funcionalidades que tiene VBScript en el manejo de arrays es la capacidad de redimensionar el tamaño del array. Para ello se basa en la sentencia REDIM. La idea es modificar el tamaño del array.

Para demostrar su utilización vamos a definir un array con los dias de la semana, el cual volcaremos por pantalla. Seguidamente redimensionaremos el array para quitar el sábado y domingo, quedándonos un array con los cinco días hábiles.

Lo primero que haremos será el definir el array e insertarle los diferentes elementos:

dim semana()
redim semana(6)

semana(0) = "Lunes"
semana(1) = "Martes"
semana(2) = "Miercoles"
semana(3) = "Jueves"
semana(4) = "Viernes"
semana(5) = "Sabado"
semana(6) = "Domingo"

Hay que indicar que desde el principio definimos con la sentencia REDIM el array.

Una vez cargado el array, recorremos y mostramos todos sus elementos. Para ello nos apoyamos en un bucle for, el cual irá desde el elemento 0 hasta el último elemento. Para saber cual es el último elemento de un array utilizamos la función UBound.

'Mostramos todos los dias de la semana
document.write("Dias de la semana <br>")
for x=0 to UBound(semana)
  document.write (semana(x) & " ")
next

Ahora pasaremos a redimensionar el array. Para ello volvemos a utilizar la sentencia REDIM. Si bien, si queremos que se nos conserven los elementos ya existentes hay que utilizarla junto a la sentencia PRESERVE.

'Recortamos el array
redim preserve semana(4)

Ahora solo nos quedará el recorrer nuevamente el array

Visualizar el ejemplo | Descargar el código

tags: , , , ,

Artículos relacionados:

1 comentario »

RSS feed para los comentarios de esta entrada. TrackBack URI

Deja un comentario

XHTML: <a href="" title=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <cite> <code> <del datetime=""> <em> <i> <q cite=""> <strike> <strong>

*