Установить значение из коллекции в переменную

Question

Я пытаюсь выполнить некоторую отладку, и у меня есть коллекция, которую я создал из нескольких разных строк. Я хотел бы вернуться и установить другую переменную, равную второму элементу в коллекции. Это возможно? См. Очень упрощенный пример ниже:

Dim TagForms As New Collection

Dim TagForm1 As String
Dim TagForm2 As String
Dim TagForm3 As String
Dim Test As String

TagForm1 = "Cat"
TagForm2 = "Dog"
TagForm3 = "Pig"

Set TagForms = New Collection

TagForms.Add TagForm1
TagForms.Add TagForm2
TagForms.Add TagForm3

Test = TagForms(2)     'This doesn't work
Set Test = TagForms(2) 'This also doesn't work

Answer 1

Поскольку переменная «Test» является строкой, последняя строка кода «Set Test = TagForms (2)» не работает. Правильная строка кода - «Test = TagForms (2)». Этот код возвращает «Собака»