<-- Previous || Up || Next -->

Vector Property
Sparse Array Class

Public Property Get Vector( _
    ByVal vDim1 As Long _
    ) As Variant

Get the Value of an element when using the SparseArray as a one-dimensional array. (A one-dimensional array is known as a Vector within Entisoft Tools.)

Example: 
    Assuming
       Dim saTemp As New SparseArray
       saTemp.Vector(23) = "SubName"
    for example
       saTemp.Vector(23) = "SubName"
       saTemp.Vector(24) = EmptyValue
vDim1: Number of the array element whose Value will be returned.
Return value: Function returns the value for the specified element. If element vDim1 was not previously set, this function will return an Empty value.
v1.3 BugFix: This Property Get Function has been fixed to support the retrieval of Object and DataObject type Values. 

Public Property Let Vector( _
      ByVal vDim1 As Long _
    , ByVal vValue As Variant _
    )

Set the Value of an element when using the SparseArray as a one-dimensional array.

Example: 
    Assuming
       Dim saTemp As New SparseArray
    for example
       saTemp.Vector(23) = "SubName"
    leaves
       saTemp.Vector(23) = "SubName"
vDim1: Number of the array element whose Value will be set.
vValue: Value to which element number vDim1 will be set. vValue can be any type of Variant value (vbString, numeric, vbDate, vbArray, etc.) except an Object or DataObject.
v1.3 BugFix: The corresponding Property Set Subroutine supports the storage of Object and DataObject type Values. 

Public Property Set Vector( _
      ByVal vDim1 As Long _
    , ByVal vValue As Variant _
    )

Set the Value of an element when using the SparseArray as a one-dimensional array.

Example: 
    Assuming
       Dim saTemp As New SparseArray
       Dim objTemp As Object
       Set objTemp = Nothing
    for example
       Set saTemp.Vector(23) = objTemp
vDim1: Number of the array element whose Value will be set.
vValue: Object or DataObject value to which element number vDim1 will be set.
v1.3 BugFix: This new Property Set Subroutine has been added to support the storage of Object and DataObject type Values.

Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.