Dim array1() as double : Redim array1(5) : array1(3)=250 : Redim preserve array1(5,10) 什么意思

dim array1() as double '定义一个名为array1的双精度动态数组
Redim array1(5) '重定array1(0 to 5),确定数组包含6个元素 上界到5
array1(3)=250 '给数组中标号为3的赋值为250
Redim preserve array1(5,10) '重定array1数组为双维度数组，第一维（(0 to 5) 第二维（0 to 10)_
但 存在关键字preserve 无法给一个已定维度的数组增加维度 所以出错 下标越界