Day 026: ERASE

[bplus]

Dammit! I was just about to use that as my signature. Now I have to come up with something else. Too bad Steve is busy! 

"So old I knew better once but forgot."

BTW Minerva was hinting at a memory leak if start Dynamic arrays in subs... does the above test for that?
Not seeing it:

Code: (Select All)

Do
    pete
Loop

Sub pete
    ReDim a$(10) ' Dynamic array in a sub.
    a$(5) = "3"
    Print "a$(5) in Pete sub:"; a$(5)
    'Erase a$
    'Print "erased a$() ? a$(5) "; a$(5)  'error subscript out of range
    Print "a$(5) after ERASE is non-existent."
    Print
End Sub

Pete just got a little bit older