I see, you want to pass a pointer, not the actual array..
In that case your only option would be to use one of the Undocumented and Unsupported Pointer Functions in VB, like VarPtr() to give you the Pointer to a Local Array which you can store as a part of a User Defined Type.
Something like:
------------------Code:Type Type1 par1 As Integer myArr As Long End Type Dim myType As Type1 Dim Arr(1000) As Double myType.myArr = VarPtr(Arr(0))
Aaron Young
Analyst Programmer
[email protected]
[email protected]




Reply With Quote