求助！！！控件中Variant类型的转换问题

Question

我用VC编写了一个控件，其中有个事件定义如下：void CommunicationInfo(VARIANT& data)
参数data的子类型为一个BYTE型的数组。请问在VB中使用此事件时怎样将data赋给一个byte型的数组?

Answer 1

在VB中此事件原型为：Private Sub CommunicationInfo(Byval data as Variant)
请问如何将参数data 赋给一个Byte型数组

Answer 2

Private Sub CommunicationInfo(ByVal data As Variant)
  Dim b(5) As Byte '可以用动态数组
  Dim i As Integer
  For i = 0 To UBound(data)
      b(i) = data(i)
  Next i
End Sub