如何在VBA中重现Collection示例？

我想在Excel中的不同文件中读取大量string，并使用它们创build一个组。

如果我理解正确，因为我不知道有多less个string，最好使用集合而不是数组。

我只是想现在重现这个例子来学习如何使用集合。

' Create a list of strings. Dim salmons As New List(Of String) salmons.Add("chinook") salmons.Add("coho") salmons.Add("pink") salmons.Add("sockeye") ' Iterate through the list. For Each salmon As String In salmons Console.Write(salmon & " ") Next 'Output: chinook coho pink sockeye 

我没有修改任何东西，它是给我的

编译错误：预期：语句结束

一张纸条说

有关本主题中的示例，请包括System.Collections.Generic和System.Linq命名空间的Imports语句。

我做到了，问题依然存在。

 Imports System.Collections.Generic Imports System.Linq 

我错过了什么？

Answer 1

你的例子是.NET，它完全不同于VBA。

在VBA中你可以这样做：

 Dim salmons As Collection Set salmons = New Collection salmons.Add "chinook" salmons.Add "coho" salmons.Add "pink" salmons.Add "sockeye" Dim item as Variant ' Iterate through the list. For Each item In salmons Debug.Print item Next Set salmons = Nothing 

编辑 ：

---

由于您是VBA的新手，为了将来的参考，请记住，VBA支持With语句。 因此，上面的例子可能是这样写的：

 With salmons .Add "chinook" .Add "coho" .Add "pink" .Add "sockeye" End With