Preserve
与ReDim一起使用以保留内容将调整数组的大小
与ReDim一起使用，以便当数组调整大小时，数据不会重置，但保留。这意味着当放大数组时只有新数据被重置，而旧的数据保持不变。
注意事项：ReDimPreserve在所有情况下可能无法正常工作：
语法
说明
与ReDim一起使用，以便当数组调整大小时，数据不会重置，但保留。这意味着当放大数组时只有新数据被重置，而旧的数据保持不变。
注意事项：ReDimPreserve在所有情况下可能无法正常工作：
Preserve的当前行为是将原始数据保持在内存中，并且仅扩展或截断内存的大小。
当上限发生变化时，它的行为只有很好的定义。如果下限发生变化，当前的结果就是数据实际上被转移到新的下限开始。
如果有多个维度，则只能安全地改变第一维度的上限。如果下位尺寸根本调整大小，则可能难以预测效果。
当上限发生变化时，它的行为只有很好的定义。如果下限发生变化，当前的结果就是数据实际上被转移到新的下限开始。
如果有多个维度，则只能安全地改变第一维度的上限。如果下位尺寸根本调整大小，则可能难以预测效果。
例子
ReDim array(1 To 3) As Integer
Dim i As Integer
array(1) = 10
array(2) = 5
array(3) = 8
ReDim Preserve array(1 To 10)
For i = 1 To 10
Print “阵列（”; i; ") = "; array(i)
Next
Dim i As Integer
array(1) = 10
array(2) = 5
array(3) = 8
ReDim Preserve array(1 To 10)
For i = 1 To 10
Print “阵列（”; i; ") = "; array(i)
Next
与QB差别
- Preserve在PDS 7.1之前不受支持
参考