例: Erase statement

' Use Erase to reinitialize the Integer elements of the
' array baseLine to zero.
Option Base 1
Dim baseLine(3) As Integer ' Declare the fixed array baseLine.
baseLine%(1) = 1           ' Assign values to baseLine.
baseLine%(2) = 2
baseLine%(3) = 6
Erase baseLine%            ' Erase baseLine.
Print baseLine%(1)         ' Prints 0.