28分!!一个小问题???

[csdnlmzhang]

有个函数
sub way(size as LONG ,lp as LONG)

第一个size 数组的大小,
第二个lp市数组的内容

我现在想把数组的内容传入函数,
how to do??
或者觉得第一个参数就是多余的,
请指教!!!!!!!!

[hydnoahark]

看这个函数的定义，lp是一个数组的地址，所以第一个参数是不可少的。

[ozw]

用Variant型做参数
Sub Way(a As Variant)
Dim i As Integer
On Error GoTo ErrHandle
For i = 0 To UBound(a)
MsgBox a(i)
Next
ErrHandle:
End Sub

Private Sub Command1_Click()
Dim xx(2) As String
xx(0) = "I"
xx(1) = "Love"
xx(2) = "You"
Way (xx)
End Sub

[snakeegg]

没听懂

传就传呗 ,怎么了