感谢您使用微软产品。关于在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 SubSub 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)。