Scripting.Dictionary的RemoveAll（）方法是否首先释放其所有元素？

Question

在VB6应用程序中，我有一个Dictionary其键是String ，值是自定义类的实例。 如果我在Dictionary上调用RemoveAll() ，它将首先释放自定义对象吗？ 还是我自己明确需要这样做？

Dim d as Scripting.Dictionary

d("a") = New clsCustom
d("b") = New clsCustom

' Are these two lines necessary?
Set d("a") = Nothing
Set d("b") = Nothing

d.RemoveAll

Answer 1

是的，在调用RemoveAll()之后，将释放Dictionary所有对象。 从性能（从速度）的角度来看，我说那些将变量设置为Nothing是不必要的，因为代码必须首先根据键名查找它们，而RemoveAll()将枚举并在一个循环中释放所有内容。

Answer 2

RemoveAll将从Dictionary删除所有关联：键和值。 对于Dictionary保留对Dictionary值的引用将是一个参考泄漏。

Answer 3

如果没有其他变量引用集合中的项目，则这些对象应移交给垃圾收集器，以在下次运行GC时进行清理。

例如，如果您在某个地方sObj是静态变量的情况下执行此操作，那么当系统接下来调用GC时，将清除第一个对象，但不会清除仍被sObj引用的第二个对象。

d("a") = New clsCustom
d("b") = New clsCustom code.
sObj = d("b")

d.RemoveAll()