動的配列を引数で使用するには?


VB特訓中  2008-07-16 22:29:14  No: 100904  IP: 192.*.*.*

2次元の動的配列と1次元の動的配列を引数とし、その引数を使用して結果を返すサブモジュールを作成したいのですが、どのようにしたらよいか分かりません。
サブモジュールを使用するモジュール側の引数の渡し方及び引数を受ける側のサブモジュールの記述方法を教えて下さい。
宜しくお願いします。

編集 削除
ガッ  2008-07-17 03:05:11  No: 100905  IP: 192.*.*.*

たとえば,

'VB6
Option Explicit

Private Sub Form_Load()
    Dim dim2(1, 1) As Variant
    Dim dim1(1) As Variant
    Dim p() As Variant
    Debug.Print hoge(dim2, dim1)(0)
End Sub

Public Function hoge(ByRef dim2(), ByRef dim1())
    Dim ret(1) As Variant
    ret(0) = dim2(0, 0) + dim2(1, 1) + dim1(1)
    hoge = ret
End Function

編集 削除