vba 如何将数组作为参数

Option Explicit

Type test
a(10) As String
End Type

Sub test()
Dim c As test
Dim i As Integer
For i = 0 To 10
c.a(i) = i ^ 2
Next

Call F1(c)
End Sub

Function F1(b As test)
Dim i As Integer
For i = 0 To UBound(b.a)
Debug.Print b.a(i)
Next。

Option Explicit

Type test
a(10) As String
End Type

Sub test()
Dim c As test
Dim i As Integer
For i = 0 To 10
c.a(i) = i ^ 2
Next

Call F1(c)
End Sub

Function F1(b As test)
Dim i As Integer
For i = 0 To UBound(b.a)
Debug.Print b.a(i)
Next
End Function

这样算不算