即时通讯与正在处理的程序有问题。
我试图做的是让一个函数接受用户的输入并将该数据存储在数组中
对于小型测试,它是一个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