ちなみにプログラムはこうなっています。
http://www.borujoa.org/upload/source/upload12298.txt
dim命令で確保した以上の要素は使っていないと思うのですが・・・。