Checking if Dynamic Array is initialized

[99mel]

Can u not use the isArray(Myarray) for a dynamic array?

If i check what UBound of MyArray is it returns 'Subscript out of range'

If i then do IsArray(Myarray) it returns true *shrug*

Cheers for any help!

 

[JohnYingling]

Dim I as long
I = -1
On Error resume next
    I = UBound(MyArray)
On Error go to 0
if I < 0 then
    Redim myArray(....)
End if

http://WWW.VBCompare.Com

 

[rvBasic]

Following code is extracted from MSPRESS Hardcore Visual Basic, Second Edition ISBN 1-57231-422-2 p.279

Function IsArrayEmpty(va As Variant) As Boolean
Dim f As Boolean
On Error Resume Next
f = IsObject(va(LBound(va)))
IsArrayEmpty = (Err <> 0)
End Function

It is published on the web by MS at:

http://support.microsoft.com/support/kb/articles/Q173/8/40.ASP

(corrections to this edition)
_________________________________
In theory, there is no difference between theory and practice. In practice, there is. [attributed to Yogi Berra]