VB：2D配列をSubに渡す

Question

私は、（）内のサイズが静的ではない2D配列を持っています。コードは後でサイズを割り当てます。私はこの配列に関数を渡したいので、それを使ってたくさんのコードを実行できます。

マイ配列：

'generate Ingredient array 
Dim Ingredients(checkCount2 - 1, 3) As String 
Dim maxDim0 As Integer = UBound(Ingredients, 1) 
Dim maxDim1 As Integer = UBound(Ingredients, 2) 

私は次のことを試してみました：

For i As Integer = 0 To maxDim0 
    For j As Integer = 0 To maxDim1 
     GenerateNewImport(Ingredients(i, j), F_IDCode, F_Description, F_VersionDate, F_VersionNumber) 
    Next j 
Next i 

OR

GenerateNewImport(Ingredients, F_IDCode, F_Description, F_VersionDate, F_VersionNumber) 

OR

GenerateNewImport(Ingredients(), F_IDCode, F_Description, F_VersionDate, F_VersionNumber) 

OR

GenerateNewImport(Ingredients(checkCount2-1, 3), F_IDCode, F_Description, F_VersionDate, F_VersionNumber) 

となどが、私のようなエラーを得続ける：

(Ingredients, ... : Value of type '2-dimensional array of String' cannot be converted to '1-dimension 

となど

My機能は次のとおりです。

Sub GenerateNewImport(ByVal Ingredients(,) As String, ByVal F_IDCode As String, ByVal F_Description As String, ByVal F_VersionDate As String, ByVal F_VersionNumber As String) 

End Sub 

私に合格する方法上の任意の提案を関数呼び出しに配列？

以下で参照および他の多く：

https://msdn.microsoft.com/en-us/library/5dk93f6e(v=vs.90).aspx

Answer 1

ByVal Ingredients(,) As String 

はに

ByRef Ingredients As String(,) 

EDITに置き換えられました：私は、キーワードのByValを置き換え

ByRefの によって

Answer 2

あなたはこのコード

GenerateNewImport(Ingredients, F_IDCode, F_Description, F_VersionDate, F_VersionNumber) 

で

Sub GenerateNewImport(ByVal Ingredients(,) As String, ByVal F_IDCode As String, ByVal F_Description As String, ByVal F_VersionDate As String, ByVal F_VersionNumber As String) 

End Sub 

を呼び出そうとしましたが、その組み合わせが実際に正しいと述べました。受け入れられる答えは、Ingredients(,) As StringからIngredients As String(,)への署名の変更と、それが配列なのでByRefを使用して処理しなければなりません。しかし、配列は参照型として渡されますので、これは重要ではありません。いずれの場合も(,)の配置は同じです

ここでは、多次元配列をメソッドに渡す方法と、最初は問題がないことを示す簡単な例を示します。出力は、すべての署名が等価であることを示し、およびすべてのByRef

を渡していると

Option Explicit On 
Option Strict On 

Module Module1 

    Sub Main() 
     Dim ingredients(1, 1) As String 
     ingredients(0, 0) = "a" 
     ingredients(0, 1) = "b" 
     ingredients(1, 0) = "c" 
     ingredients(1, 1) = "d" 
     Signature1(ingredients) 
     Signature2(ingredients) 
     Signature3(ingredients) 
     Signature4(ingredients) 
     For i As Integer = ingredients.GetLowerBound(0) To ingredients.GetUpperBound(0) 
      For j As Integer = ingredients.GetLowerBound(1) To ingredients.GetUpperBound(1) 
       Console.WriteLine(ingredients(i, j)) 
      Next 
     Next 
     Console.ReadLine() 
    End Sub 

    Sub Signature1(ByVal ingredients As String(,)) 
     ingredients(0, 0) = UCase(ingredients(0, 0)) 
     Console.WriteLine("You called Signature1") 
    End Sub 

    Sub Signature2(ByVal ingredients(,) As String) 
     ingredients(0, 1) = UCase(ingredients(0, 1)) 
     Console.WriteLine("You called Signature2") 
    End Sub 

    Sub Signature3(ByRef ingredients As String(,)) 
     ingredients(1, 0) = UCase(ingredients(1, 0)) 
     Console.WriteLine("You called Signature3") 
    End Sub 

    Sub Signature4(ByRef ingredients(,) As String) 
     ingredients(1, 1) = UCase(ingredients(1, 1)) 
     Console.WriteLine("You called Signature4") 
    End Sub 

End Module 

あなたは、あなたがSignature4
A と呼ばSignature3
と呼ばsignature2の
と呼ばSignature1
と呼ばれます
B
C
D