类实例字典，如何分配新值？

Question

我有一个包含类实例的字典。不知何故，我找不到将值（分配新的类实例）更改为字典的方法。

例如

Dim t as new Product 
'initialize t
if dictionaryP.Exists(keyValue) then
    'in the next line i get an error "Object doesn't support this property or method"
    dictionaryP.Item(keyValue)=t 
else
    'no problem with this line...
    dictionaryP.Add keyValue, t
end if

找不到任何有关在 VBA 中使用带有对象值的字典的信息，而不仅仅是纯字符串或整数。如何更改存储对象（类实例）的字典的字典值，因为我似乎无法使用

dictionary.Item(key) = <new Object value> ' as i thought it sould be, from this source

http://www.experts-exchange.com/Software/Office_Productivity/Office_Suites/MS_Office/A_3391-Using-the-Dictionary-Class-in-VBA.html

我错过了什么？如果值是对象（不是普通值），我如何更改字典值？

Answer 1

对象必须使用Set. 该属性.Item是默认属性，因此可以删除（但不会造成危害）。尝试

Set dictionaryP (keyValue) = t