VBA：如何定义一大组stringvariables？

我想（在VBA）来定义大量的stringvariables。 蛮力将是：

Dim Port1 as String Dim Port2 as String etc…

不愉快的说100个variables。 必须有一个更聪明的解决scheme。 我努力了 ：

Dim n As Integer For n = 1 To 100 Dim "Port" & n as String Next n

和它的变化没有成功。 如果有人能指出我正确的方向或分享一个例子，我将不胜感激。

Answer 1

数组完成这个！ 看到这个例子：

 Dim Port(1 to 100) As String Dim i As Long Port(1) = "String" For i = 2 to 100 Port(i) = "String " & i Next i 

它将Port（1），第一个数组元素设置为单词“String”。 其他所有Port(2)及其上，包含“string2”，“string3”等，直到Port(100) 。

我希望有帮助！