Gemeinsam zu mehr Effizienz in der Anwendungserstellung
K |
K |
||
Zeile 1: | Zeile 1: | ||
- | [[Kategorie:Code-Schnipsel| | + | [[Kategorie:Code-Schnipsel|Array - Prüfen ob Array initialisiert ist]] |
Mit <code>IsArray(..)</code> kann man zwar prüfen, ob eine Variable ein Array beinhaltet, man kann aber nicht prüfen, ob ein dynamisches Array dimensioniert/initialisiert ist. | Mit <code>IsArray(..)</code> kann man zwar prüfen, ob eine Variable ein Array beinhaltet, man kann aber nicht prüfen, ob ein dynamisches Array dimensioniert/initialisiert ist. |
Mit IsArray(..)
kann man zwar prüfen, ob eine Variable ein Array beinhaltet, man kann aber nicht prüfen, ob ein dynamisches Array dimensioniert/initialisiert ist.
Dim TestArray() As Long Debug.Print "IsArray(TestArray) = "; IsArray(TestArray), If (0 / 1) + (Not Not TestArray) = 0 Then Debug.Print "Array ist nicht initialisiert" Else Debug.Print "Array ist initialisiert" End If
Dim TestArray() As Long ReDim TestArray(0) Debug.Print "IsArray(TestArray) = "; IsArray(TestArray), If (0 / 1) + (Not Not TestArray) = 0 Then Debug.Print "Array ist nicht initialisiert" Else Debug.Print "Array ist initialisiert" End If
Dim TestArray(5) As Long Debug.Print "IsArray(TestArray) = "; IsArray(TestArray), If (0 / 1) + (Not Not TestArray) = 0 Then Debug.Print "Array ist nicht initialisiert" Else Debug.Print "Array ist initialisiert" End If