>>254
Sub Kansuu(a() As Byte)
　・
　・
　・
End Sub

Dim a(5) As Byte
Call Kansuu(a)

>>255
可能。