Gemeinsam zu mehr Effizienz in der Anwendungserstellung
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) 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 If (0 / 1) + (Not Not TestArray) = 0 Then Debug.Print "Array ist nicht initialisiert" Else Debug.Print "Array ist initialisiert" End If