Preserve 可选的。关键字,当改变原有数组最末维的大小时,使用此关键字可以保持数组中原来的数据。 

解决方案 »

  1.   

    (摘自MSDN)
    如果使用了 Preserve 关键字,就只能重定义数组最末维的大小,且根本不能改变维数的数目。例如,如果数组就是一维的,则可以重定义该维的大小,因为它是最末维,也是仅有的一维。不过,如果数组是二维或更多维时,则只有改变其最末维才能同时仍保留数组中的内容。下面的示例介绍了如何在为已有的动态数组增加其最末维大小的同时而不清除其中所含的任何数据(摘自吴文智语录,呵呵)
    举个例子:
        Dim strTest() As String
        
        ReDim strTest(1)
        strTest(0) = "天花板"
        
        ReDim Preserve strTest(2)  '你分别把这句和后一句注释掉,运行时就看到区别了.
        'ReDim strTest(2)
        MsgBox strTest(0), vbInformation