即时通讯与正在处理的程序有问题。
我试图做的是让一个函数接受用户的输入并将该数据存储在数组中
对于小型测试,它是一个3 x 3的阵列
我已经通过回显所有存储的值来使数组在函数内正常工作。
但是,当我尝试将数组返回到被称为子数组的子目录时,出现不匹配错误,我不确定自己在做什么错。

    Sub SubroutineA()
          Dim Array(2,2)

          Array = GetInfo()

    End Sub

    Function GetInfo()
          Dim FunctionArray(2,2)
          {input all data into array}
          GetInfo = FunctionArray()
    End Function

我可以得到的任何帮助都会很棒,因为这对我来说是新的。

最佳答案

Cheran Shunmugavel指出了正确的方向,但他的解释含糊不清。明确说明:

Sub SubroutineA()
      Dim Arr     ' <<<--- do not use parenthesis here and do not use
                  '        the reserved keyword "Array"
      Arr = GetInfo()
End Sub

Function GetInfo()
      Dim FunctionArray(2,2)
      ' {input all data into array}
      GetInfo = FunctionArray     ' <<<--- do not use parenthesis here
End Function

08-19 09:31