Excel VBA高级编程:枚举算子可能不捕捉添加的项

:枚举算子可能不捕捉添加的项

当枚举集合时，如果给集合添加了项，一些枚举算子将能包含添加的项，而一些枚举算子则不会。例如，枚举 Forms 集合时就不枚举刚加载的任何窗体。

如果将它们添加到集合末尾，则在枚举时集合，对象就能枚举添加的项。因此下列循环永远不会终止（即直到按 CTRL+BREAK 组合键）：

Dim col As New Collection
Dim vnt As Variant
col.Add "Endless"
col.Add "Endless"
Each vnt In col
   MsgBox vnt
   col.Add "Endless"
Next
另一方面，添加到集合开始的项不会包含在枚举里。

Dim col As New Collection
Dim vnt As Variant
col.Add "Will be enumerated"
For Each vnt In col
   MsgBox vnt
   '在开始处添加项。
   col.Add "Won't be enumerated", Before:=1
Next