GetSafeArrayPointer: Unterschied zwischen den Versionen

Aus API-Wiki
Wechseln zu: Navigation, Suche
 
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
  
<<syntaxhighlight lang="vb">>Private Declare Sub GetSafeArrayPointer Lib _
+
<syntaxhighlight lang="vb">Private Declare Sub GetSafeArrayPointer Lib _
   "ms<syntaxhighlight lang="vb">vm60.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 12: Zeile 12:
 
   ReDim mArr(5)
 
   ReDim mArr(5)
 
   Call GetSafeArrayPointer(mArr, pSafeArr)
 
   Call GetSafeArrayPointer(mArr, pSafeArr)
   MsgBox (pSafeArr <> 0)</<syntaxhighlight lang="vb">>
+
   MsgBox (pSafeArr <> 0)</syntaxhighlight>

Aktuelle Version vom 5. November 2016, 22:47 Uhr

liefert einen Pointer zu einem Array , ist dieser 0 (Null), ist das Array (noch) nicht dimensioniert

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)