一个简单的数组问题

Question

dim strCountryCode() as stringredim strCountryCode(X,Y) 
xxxxxxxxxxxxxxxx
.......Code.......
xxxxxxxxxxxxxxxxxReDim Preserve strCountryCode(UBound(strCountryCode) + 2, 2)最后一句有问题-----溢出请帮大家帮忙看看是什么问题呀，谢谢！

Answer 1

//ReDim Preserve strCountryCode(UBound(strCountryCode) + 2, 2)你不会是同时改变了两个维数吧

Answer 2

我上面的语句是只改变了二维数组的第一维（最左边），但后来才知道第一维是不可以改的是吧，可是我要怎样才能得出第二维的最大下标呢，（第一维可用Ubound(数组)），那第二维要怎样才能得出呢？比如 str(4,X) 要怎样才知道X的最大值呢？我其实也就这个问题。

Answer 3

只能改变数组的最后一唯的大小
   a(12,20) as integer
    MsgBox UBound(a, 2)
 是20

Answer 4

谢谢你，我现在才搞懂，在Ubound()里面还要加多一个东东，哈哈，谢谢你！