踩踩踩舞蹈 九月奇迹:vb中函数的参数如何使用多维数组?

来源:百度文库 编辑:杭州交通信息网 时间:2024/05/10 19:57:09
我想在自己编的函数里处理一个2维数组

我知道一维的是
private function asd(a1()as long)

...
...
调用时 asd(a1)

多维如何写格式?多谢
最好写个例子
variant好像可以
帮忙举个简单的例子
用函数处理以下多维数组

谢~

声明为变体类变量
a1 as variant
结帖!
例:
Private Sub Form_Load()
Dim i%, j%, l%
Dim rb As Boolean
Dim r(0 To 10, 0 To 10, 0 To 10) As Variant
For i = 0 To 10
For j = 0 To 10
For l = 0 To 10
r(i, j, l) = i + j + l
Next l
Next j
Next i
rb = mm(r)
End Sub
Private Function mm(va As Variant) As Boolean
'如果为多维数组
Dim i%, j%, k%
Dim l As String
For i = 0 To 10
For j = 0 To 10
For k = 0 To 10
l = va(j, k, i)
Me.Print l;
Next k
Next j
Next i
End Function
在VB6.0中调试通过

QQ:546676572

如果可以确定维数的话
可以用a1(m,n)

最好把问题说的清楚点