自定义函数中如何使用数组参数？

Question

1.要求有返回值，应该用Function ，
 Sub不能带返回值吧。
2.传递数组有个ByRef,我没用过，你试试吧。

Answer 1

错误一大堆：
1.dim  x(1024),y(1024) as single  改成
  dim  x(1024) as single,y(1024) as single
2.你定义的fft是sub，调用时怎么用函数来调
3.dim  my as you,myson(1024) as you
4.将
type  you
  x as integer
  y as single
  z as byte
end type
放在public moudle里
5. get是vb系统关键字，换名
6.将sub  get( z as you,qq() as you)放在moudle里做为public sub
7.同样，怎么用函数来调用sub get

Answer 2

传递数组可这样：
dim arrayx(0 to ...) as integer
dim a as long
a=myfunc(arrayx)其中函数定义如下：
function myfunc(myarray as variant) as ...

Answer 3

问题已得到解决，感谢MAXZHY朋友的提示。自定义函数或过程均可以，
如果只有一个数组参数，向maxzhy朋友那样定义即可；如有两个参数，则应定义为：
function myfun( myarray1() as bariant,myarray2() as integer)
也就是说，如有N各书朱参数，则前面N-1各参数必须定义成variant,二的N各参数是什么类型就定义成什么类型。
    说句题外话，作为一个搞程序的，态度还使应该严谨一点好！不必装除一副老子天下第一的样子。回答问题最好自己试过，没问题才贴上来！！！！