如题.

解决方案 »

  1.   

    将参数类型为 Variant 就行了.
      

  2.   

    使用动态数组 如sub command_click()
        dim y() as long
        dim l as long , i as long
            l=fff(y)
        for i=0 to l
          print y(i)
         next
    end sub
    function fff(ly() as long) as long
         dim j as long 
         redim ly(9)
         for j=0 to 9
             ly(j)=j
         next
         fff=j
    end function
    临时写的,没测试,大致过程就这样了。
      

  3.   

    Variant  或者 后面 加括号
      

  4.   

    public function abc(a() as long) as longend function
      

  5.   

    '如果返回值也是数组就:
    public function abc(a() as long) as long()
    dim tempa() as long
    abc=tempa
    end function