Object Reference

Classes
Command Interface
- xf_Command
External
- xf_External_VB6_32bit
- xf_External_VB7_32_64bit
General
System Core
System Library

xf_DataListDataList Base Class

Public Function CopyParamArray (
FieldValList As Variant,
Optional ColCount As Integer = 1,
Optional PrintSymmetryError As Boolean = True
) As Boolean

Use the passed list of values to initialise the DataList.
Passing the ColCount allows multiple rows of information to be set.
If PrintSymmetryError is True, then throw an error when an incomplete row of data is passed.

FieldValList as Variant

The list of values to allocate

Optional ColCount as Integer = 1

The column count, to guide breaking the value list into multiple rows

Optional PrintSymmetryError as Boolean = True

Throw an error when an incomplete row of data is passed

Call Template:

Dim obj As New xf_DataList

Dim b As Boolean

b = obj.CopyParamArray(FieldValList)

b = obj.CopyParamArray(FieldValList, ColCount, PrintSymmetryError)

Example 1:

Public Sub PopulateList(ParamArray PairedNameValueList())
Dim lst As New xf_DataList
Dim tmpArr As Variant
tmpArr = PairedNameValueList()

lst.CopyParamArray tmpArr, 2
lst.PrintVals
End Sub

PopulateList "MEL", "Melbourne", "BRN", "Brisbane", "SYD", "Sydney", "DWN", "Darwin"