在vb中传递二维数组作为参数

2019独角兽企业重金招聘Python工程师标准>>>

关于在VB中一个二维数组给一个函数作为参数，您可以参考以下代码：

Private Sub Command1_Click()

Dim abc(1, 2) As Integer

abc(0, 0) = 1

abc(0, 1) = 2

abc(0, 2) = 3

abc(1, 0) = 4

abc(1, 1) = 5

abc(1, 2) = 6

Test abc

End Sub

Sub Test(iarray() As Integer)

Dim i As Integer, j As Integer

For i = LBound(iarray, 1) To UBound(iarray, 1)

For j = LBound(iarray, 2) To UBound(iarray, 2)

MsgBox (iarray(i, j))

Next

Next

End Sub

- 微软亚洲技术中心 VB技术支持

本贴子仅供CSDN的用户作为参考信息使用。其内容不具备任何法律保障。您需要考虑到并承担使用此信息可能带来的风险。具体事项可参见使用条款 (http://www.csdn.net/microsoft/terms.shtm)。

转载于:https://my.oschina.net/fenglinwansu/blog/1600978