function函数如何返回字符串数组

[qiuzhilv]

定义了一个function
Function test()As String
dim str(3) as String
……
End Function
如何使调用这个函数的其他函数得到str()这个数组，就是如何return str。

[迈克揉索芙特]

Function test()As String()
dim str(3) as String
……
test=str
End Function

[qiuzhilv]

Function test()As String()
dim str(3) as String
……
test=str
End Function
这样写，但在调用该test()的函数里调用test(0)值执行时报错。

[vbman2003]

Function test()As String()
dim str(3) as String
……
test=str
End Function
这样写，但在调用该test()的函数里调用test(0)值执行时报错。
------------------------------------
dim arr() as string
dim i as integer
arr=test()
for i=0 to ubound(arr)
debug.pring arr(i)
next

[hotoo129]

哦 又学习了~~~~