13518219792
'既然制定了是2维数组所以要用括号这是规定写法
成都创新互联专注于离石网站建设服务及定制，我们拥有丰富的企业做网站经验。 热诚为您提供离石营销型网站建设，离石网站制作、离石网页设计、离石网站官网定制、重庆小程序开发公司服务，打造离石网络公司原创品牌,更为您提供离石网站排名全网营销落地服务。
'shuzu%(0, 0)获得里面的元素，第一个0代表一维，第二个0代表其中第一个元素
Dim shuzu%(,) = {{1, 2, 3}, {4, 5, 6}, {7, 8, 9}}
Dim a As Integer
a = shuzu%(0, 0)
ReDim 语句支持这样的语法，它与固定数组中使用的语法相同。对于每一维数，每个 ReDim 语句都能改变元素数目以及上下界。但是，数组的维数不能改变。
ReDim DynArray (4 to 12)
例如，用第一次声明在模块级所建立的动态数组 Matrix1：
Dim Matrix1 () As Integer
然后，在过程中给数组分配空间：
Sub CalcValuesNow ()
.
.
.
ReDim Matrix1 (19, 29)
End Sub
这里的 ReDim 语句给 Matrix 分配一个 20 × 30 的整数矩阵（元素总大小为 600）。
1、点击VS工具。
2、打开后，新建一个Windows窗体应用程序。
3、新建完毕后，如图所示。
4、拖动一个按钮。
5、定义数组最常见的方法，如图示。
6、运行后，点击按钮，弹出提示正常。
7、定义数组第二种方法，属于动态的方法。
8、运行后，点击按钮，数组成功输出。
根据你的语句，上下标是确定的，所以定义语句修改为：
Dim ary(UBound(temp), 1) As String '声明二维数组
'二维数组10*10的integer类型
dim num(10,10) as integer 'VB6.0 从1-10为10个元素 *10元素
num(1,1)=5
mum(1,2)=8
'从1开始依此类推到10
num(2,1)=6
num(2,2)=4
'从1开始依此类推到10
'以上二维数组相当于：
'10行*10例的表格如下图!
