DSAFEARRAY.AppendVarmethod

COMmethodDSafeArray.incdocumented

Syntax

FUNCTION AppendVar (BYREF dvData AS DVARIANT) AS HRESULT

Also documented as Append — one description covers them all.

Parameters

Name		Description
`pData`		Pointer to a variable of the appropriate data type.
`bsData`		The BSTRING to insert, if the safe array is of type VT_BSTR.
`dvData`		The DVARIANT to insert, if the safe array is of type VT_VARIANT.
`vData`		The VARIANT to insert, if the safe array is of type VT_VARIANT.

Return value

S_OK (0) on success or an HREUSLT code on failure.

Description

Appends a value to the end of the one-dimensional safe array.

Appends a string to the end of the one-dimensional safe array.

Examples

' // Creates a one-dimensional array of doubles 'DIM dsa AS DSAFEARRAY = DSAFEARRAY(VT_R8, 2, 1) DIM dsa AS DSAFEARRAY = DSAFEARRAY("DOUBLE", 2, 1)

DIM dblVal AS DOUBLE = 12345.12 dsa.Put(1, @dblVal) dblVal = 74447.34 dsa.Put(2, @dblVal) dblVal = 63535.567 dsa.Append(@dblVal)

dsa.Get(1, @dblVal) print dblVal dsa.Get(2, @dblVal) print dblVal dsa.Get(3, @dblVal) print dblVal

' // Creates a one-dimensional array of variants 'DIM dsa AS DSAFEARRAY = DSAFEARRAY(VT_VARIANT, 2, 1) DIM dsa AS DSAFEARRAY = DSAFEARRAY("VARIANT", 2, 1) dsa.PutVar(1, "Test string") dsa.PutVar(2, 12345) dsa.AppendVar("Test string appended")

DIM dvOut AS DVARIANT dvOut = dsa.GetVar(1) print dvOut dvOut = dsa.GetVar(2) print dvOut dvOut = dsa.GetVar(3) print dvOut

Reference

Include file DSafeArray.inc
Defined in AfxNova/DSafeArray.inc:1707
Documented in COM/DSAFEARRAY Class.md
Topic: DSAFEARRAY Class