function getValus()
dim i,a()
Redim preserve a(i)
for i=0 to n then
a(i)=i
next
end function
请问如何将数组a的所有值返回?作者: my_way 时间: 2010-8-11 09:46
function的返回值当然可以是数组。如下:
Dim i,n,a
n=5
a=GetValues(i,n)
For i=0 to n
print a(i)
Next
Function GetValues(i,n)
Redim a(n)
For i=0 to n
a(i)=i
next
GetValues=a
End Function作者: mzhy 时间: 2010-8-11 15:52
可以