comp • gb • collection

Collection (gb)

Implementa una tabla hash (en la cual se pueden buscar rápidamente pares clave-valor), en la que los elementos tienen una clave de tipo cadena y los valores son de tipo variant.

Cuando no hay nada asociado a una clave, se emplea el valor NULL. En consecuencia, asociar el valor NULL con una clave, tiene el mismo efecto que eliminarlo de la colección.

El tamaño de la tabla hash interna crece automáticamente al insertar datos.

Esta clase es
Crea una nueva colección.
instanciable
.
Esta clase actúa como un array de
Devuelve el valor asociado a una clave Key.
lectura
/ escritura.
Esta clase es
Enumera cada valor de los guardados en una colección.
enumerable
con la palabra clave FOR EACH.

Propiedades

Métodos
Devuelve el número de elementos almacenados en la colección.
Count  
Default   First  
Devuelve la clave del último elemento leído o enumerado.
Key  
Last  
Devuelve el número de elementos almacenados en la colección.
Length  
Añade un elemento a la colección.
Add  
Elimina todos los elementos de la colección.
Clear  
Copy  
Devuelve TRUE si hay algo asociado con la clave indicada en la colección.
Exist  
Elimina un elemento de la colección.
Remove  

Ejemplo

PUBLIC SUB Main()

  DIM cAbbr2Weekday AS Collection = ["mo": "Monday", "tu": "Tuesday", "we": "Wednesday", "th": "Thursday", "fr": "Friday", "sa": "Saturday", "su": "Sunday"]
  DIM cCopy AS Collection
  DIM sAbbr AS String
  
  ' To access the data
  PRINT cAbbr2Weekday["fr"]
  
  ' Print mapping key to value
  FOR EACH sAbbr IN cAbbr2Weekday
    PRINT cAbbr2Weekday.Key & " --> " & sAbbr
  NEXT

  ' Lenght/Count return both 7
  PRINT cAbbr2Weekday.Count
  PRINT cAbbr2Weekday.Length

  ' Add element and remove it again
  cAbbr2Weekday.Add("sat", "Saturday")
  cAbbr2Weekday.Remove("sat")
  
  ' Test if a key is present
  PRINT cAbbr2Weekday.Exist("we")
  
  ' Make a copy and clear the original collection
  cCopy = cAbbr2Weekday.Copy()
  cAbbr2Weekday.Clear()

END