如何改变这种阵列的大小

[bobogg]

正常下我们都可以重新改变动态阵列的大小
例如
Redim A(1 To 100) As Long
Redim A(100 To 500) ' 重新改变阵列的大小
Redim A(-100 To 20) ' 重新改变阵列的大小

=========================================================
但是如下的形式不知有何方法变

Dim V as Variant

Redim A(1 To 100) As Long

V = A

此时若想重新改变 封装在 V 里面的阵列大小
不知是否有方法办到 ?

============================================================
又例如

V = Split("1,2,3,4,5,6,7,8,9", ",")
V 里面可以看到有一个 String() 阵列
但是想重新改变 String() 阵列大小却是无可奈何 !!

[bcrun]

楼主你都没用Preserve啊,其实这样就可以了啊

ReDim Preserve v(20)

[skylinecn]

引用 1 楼 bcrun 的回复:

楼主你都没用Preserve啊,其实这样就可以了啊

ReDim Preserve v(20)

顶

[bobogg]

引用 1 楼 bcrun 的回复:

楼主你都没用Preserve啊,其实这样就可以了啊

ReDim Preserve v(20)

v = Split("1,2,3,4,5,6,7,8,9", ",")

ReDim Preserve v(20)

不行啊,失败

我简化我的问题好了, 如下

=================
v = Split("1,2,3,4,5,6,7,8,9", ",")
有没有人有办法让 封装在 v 里面那个 字符串阵列 重新改变大小

[bobogg]

引用 1 楼 bcrun 的回复:

楼主你都没用Preserve啊,其实这样就可以了啊

ReDim Preserve v(20)

可以了
我成功啦
原来一定要写 Dim V As Variant
不然不能写 ReDim Preserve v(20)