GetSafeArrayPointer: Unterschied zwischen den Versionen
Aus API-Wiki
Pks (Diskussion | Beiträge) |
K (vb) |
||
| Zeile 1: | Zeile 1: | ||
liefert einen Pointer zu einem [[Array]] , ist dieser 0 (Null), ist das Array (noch) nicht dimensioniert | liefert einen Pointer zu einem [[Array]] , ist dieser 0 (Null), ist das Array (noch) nicht dimensioniert | ||
| − | + | <vb>Private Declare Sub GetSafeArrayPointer Lib _ | |
| − | |||
| − | |||
"msvbvm60.dll" Alias "GetMem4" (pArray() As Any, sfaPtr As Long) | "msvbvm60.dll" Alias "GetMem4" (pArray() As Any, sfaPtr As Long) | ||
| − | |||
Dim mArr() As Long | Dim mArr() As Long | ||
| Zeile 15: | Zeile 12: | ||
ReDim mArr(5) | ReDim mArr(5) | ||
Call GetSafeArrayPointer(mArr, pSafeArr) | Call GetSafeArrayPointer(mArr, pSafeArr) | ||
| − | MsgBox (pSafeArr <> 0) | + | MsgBox (pSafeArr <> 0)</vb> |
Version vom 13. Mai 2008, 16:35 Uhr
liefert einen Pointer zu einem Array , ist dieser 0 (Null), ist das Array (noch) nicht dimensioniert
<vb>Private Declare Sub GetSafeArrayPointer Lib _
"msvbvm60.dll" Alias "GetMem4" (pArray() As Any, sfaPtr As Long)
Dim mArr() As Long Dim pSafeArr As Long Call GetSafeArrayPointer(mArr, pSafeArr) MsgBox (pSafeArr <> 0) ReDim mArr(5) Call GetSafeArrayPointer(mArr, pSafeArr) MsgBox (pSafeArr <> 0)</vb>
