新建个类，能否给它添加一个数组形式的属性呀？

Question

？我想建一个类，要求这个类包含一个数组形式的属性，可是类模块属性编辑窗口里面没有数组这个选项，怎么办？
还有类编辑窗口里的集合是什么，有什么用？

Answer 1

1、用变体就可以传递数组。
2、集合就是集合啊，去看看msdn里面关于集合的描述。

Answer 2

'类模块
Private Brr As Variant
Public Property Get Arr() As Variant
Arr = Brr
End PropertyPublic Property Let Arr(ByVal vNewValue As Variant)
Brr = vNewValue
End Property
'窗体
Private Sub Form_Load()
Dim a As Class1
Set a = New Class1
a.Arr = Array(1, 3, 5, 7, 9)
For i = 0 To UBound(a.Arr)
s = s + a.Arr(i)
Next
MsgBox s
End Sub

Answer 3

把你想怎么call的样例代码写出来看看。。