我有一个类,里面有一个属性是collection,我如何给它赋值?
我有一个类,里面有一个属性是collection,我如何给它赋值?

Dim poso As Postinfo
Set poso = New Postinfo
Set InputOne = New InputElement

InputOne.InputID = 11
InputOne.InputName = "rk "
InputOne.InputValue = "ty "
poso.allInputs.Add InputOne

这样怎么会报错
我建立一个临时colleciton然后 Set poso.allInputs = inputCollection
好像也不行

谢谢

[解决办法]
把类的代码贴上来。
[解决办法]
set poso.allInputs = new Collection

poso.allInputs.Add InputOne
[解决办法]
解决了就结贴吧
[解决办法]
嗯，蹭分
^_^