Collection对象在VBA脚本中还是会被经常使用的。Collection对象作为一个数组,使用起来也非常方便。
一般来说,有两种方法对数组进行遍历。
一种方法是,使用索引下标来访问。
另一种方法是,直接遍历数组的元素。
这两种方法,在使用时,都非常方便。
下面介绍两种方法的示例代码供大家参考:
Sub 按钮1_Click() Dim coll As Collection Set coll = New Collection Dim i As Integer i = 1 For i = 1 To 5 coll.Add i Next MsgBox "这是第一种方法" For i = 1 To coll.Count MsgBox coll(i) '上面这一句等价于: MsgBox coll.Item(i) Next MsgBox "这是第二种方法" Dim itm As Variant For Each itm In coll MsgBox (itm) Next End Sub
注意,在使用for each遍历Collection对象时,接收item的变量要定义为Variant类型。
本站所有内容均为原创,本站保留所有权利。在保留原始来源链接的情况下,允许非商业用途的转载。拒绝一切商业性转载。