Class Property Arrays in VB6?

Is this possible?

How would I change the following class property in VB6 to an ARRAY?

Private mvarProduct         As String

Public Property Let Product(ByVal vData As String)
    mvarProduct = vData
End Property

Public Property Get Product() As String
    Product = mvarProduct
End Property

Thanks!