我正在做的一个程序出了问题。我想做的是有一个函数接受用户的输入,并将数据存储在数组中对于小型测试,它是一个3 × 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