Método TrimToSize

Define la capacidad en el número real de elementos en el objeto ArrayList.

Sintaxis

Object.TrimToSize()

Argumentos: Object: necesario. Siempre es el nombre del objeto ArrayList.

Observaciones

En el siguiente ejemplo se muestra el uso del método TrimToSize.

Ejemplo 1:

'Create ArrayList Object
Dim Obj
Set Obj = CreateObject("System.Collections.ArrayList")

'Add Elements to the end of ArrayList Object
Dim Index
Index = Obj.Add(10)
Index = Obj.Add(40)
Index = Obj.Add(20)

'Sets the capacity to the actual number of elements in the ArrayList object
Obj.TrimToSize ()
'Output: Internally ArrayList Capacity changed to the actual number of elements in the ArrayList object