怎么使函数返回值返回一个数组？

Question

char * p=new char [100];
,.....
retuen p;

Answer 1

Function ReturnArray() As String()
   Dim arrReturn(3) As String
   Dim i
   For i = 0 To 2
     arrReturn(i) = CStr(i)
   Next
End Function

Answer 2

Sorry，掉了一句Function ReturnArray() As String()
  Dim arrReturn(3) As String
  Dim i
  For i = 0 To 2
    arrReturn(i) = CStr(i)
  Next
  ReturnArray = arrReturn
End Function

Answer 3

感谢两位的回答，不过blre兄用的是C的格式？？