UC知道一个关于VB的小问题
来源：百度知道 编辑：UC知道 时间：2024/05/15 23:37:23
Private Sub Command1_Click()
Dim p As Integer
Dim countersA(5) As Integer
For p = 0 To 4
countersA(p) = p
Next p
Dim countersB(5) As String
For p = 0 To 4
countersB(p) = "我是VB"
Next p
Dim arrX(2) As Variant
arrX(1) = countersA()
arrX(2) = countersA()
For p = 0 To 4
Print arrX(1)(p)
Next p
Print arrX(2)(3)
End Sub
里面的
arrX(1) = countersA()
为什么countersA()的括号是空的
还有Print arrX(2)(3)
为什么有两个括号
Dim p As Integer
Dim countersA(5) As Integer
For p = 0 To 4
countersA(p) = p
Next p
Dim countersB(5) As String
For p = 0 To 4
countersB(p) = "我是VB"
Next p
Dim arrX(2) As Variant
arrX(1) = countersA()
arrX(2) = countersA()
For p = 0 To 4
Print arrX(1)(p)
Next p
Print arrX(2)(3)
End Sub
里面的
arrX(1) = countersA()
为什么countersA()的括号是空的
还有Print arrX(2)(3)
为什么有两个括号
arrX(1) = countersA()
是把整个数组countersA() 赋值给数组arrX(1)，arrX(1)里面的内容也是一组数组，arrX(2)(3) ，就是数组arrX(2)里的第4个元素，（第一个元素是0），所以有2组括号。
这个比较难理解，需要有一定的数学知识和空间想像力。类似于二维数组。