How can I determine if a dynamic array has not be dimensioned in VBScript

Question

Say I create a dynamic array in VBScript

Dim myArray()

Later on how can I check to see that this array has never been dimensioned?

Ubound(myArray) 'sub script out of range
Lbound(myArray) 'sub script out of range
IsEmpty(myArray) 'returns false

Answer 1

I don't think there's anything built in, but you can create your own function as:

Function IsInitialized(a)    
    Err.Clear
    On Error Resume Next
    UBound(a)
    If (Err.Number = 0) Then 
        IsInitialized = True
    End If
End Function

Which you can then call as:

Dim myArray()
If Not IsInitialized(myarray) Then
    WScript.Echo "Uninitialized"
End If

However, one way to work around it might be to not declare empty arrays, instead declare just a variable and set it to an array later, so change the code above to:

Dim myArray
myArray = Array()
If Not IsInitialized(myarray) Then
    WScript.Echo "Uninitialized"
End If