我可以声明一个可以保留所有学生姓名的变量数组而不是声明这么多变量吗?

Question

我有一个场景，我想为变量分配 5 个国家/地区名称，并且通常，我为分配给每个国家/地区名称的所有五个变量声明五个变量，下面是代码。

Sub Array_Example()
Dim India As String
Dim Australia As String
Dim Singapore As String
Dim Russia As String
Dim Malaysia As String
End Sub

Answer 1

你的意思是声明一个数组，然后分配给该数组吗？

Option Explicit
Sub Array_Example()
Dim India As String
Dim Australia As String
Dim Singapore As String
Dim Russia As String
Dim Malaysia As String
'versus (instead...)
Dim students(0 To 4) As String
students(0) = "India" 'etc
End Sub

记下@Mikku的点 re 2D 数组(如果有关联的值(：

Sub Array_Example()
'2D example
Dim students(0 To 4, 0 To 1) As String
students(0, 0) = "India": students(0, 1) = "India's associated value"
Stop 'Delete me later
End Sub

如果你沿着这条路走(键，值(，那么字典会更有用

Sub Dict_Example()
Dim students As Object
Set students = CreateObject("Scripting.Dictionary")
students.Add "India", "India's associated value" 'etc
Stop 'Delete me later
End Sub