关于自定义函数的参数

Question

在自定义函数时，如果想传递数组，也就是说想将一个数组传递到自定义函数里来，怎么写该函数的参数？我怎么写都不对
是不是这样？
Public Sub showqz(xcom(63) As CommandButton, ImageList1 As ImageList)
xcom是一个按扭数组，就连整形数组也不行的
可是这样不对呀

Answer 1

Private Function Test(Byref strarr() As String)
    '参数中的数组必须是空数组
    Msgbox strarr(0)
End Function'在调用时
Private Sub Form_Load()
    Dim strarrTmp() As String
    '在调用时，数组也必须是空数组
    '然后使用Redim 重新分配数组大小
    Redim strarrTmp(1) As String
    strarrTmp(0)="Hello!"
    Call Test(strarrTmo)
End Sub