各位前辈帮帮忙啊，关于数组的问题
我的数组是一维的
varPoint()
具体的长度是
ubound（varpoint）
我想把数组中这些存的数据，转换成二维数组
或者，复制到二维数组中
我想这样做，怎么出现问题。
Dim pts As string
ReDim pts((UBound(varPoint) / 2), 2)
For k = 0 To UBound(varPoint) - 1 Step 2
pts(k, 1) = varPoint(k)
pts(k, 2) = varPoint(k + 1)
Next k
望各位前辈赐教！！
只是分少了点
[解决办法]
Redim 只能改变数组的最后一维大小
把ReDim pts((UBound(varPoint) / 2), 2)换成ReDim pts(2,(UBound(varPoint) / 2))试下
[解决办法]
Dim pts As string
ReDim pts((UBound(varPoint) / 2), 2)
For k = 0 To UBound(varPoint) - 1 Step 2
pts(k/2, 1) = varPoint(k)
pts(k/2, 2) = varPoint(k + 1)
Next k
