A family of Microsoft relational database management systems designed for ease of use.
That would not work, but you might create an array:
Dim v(1 To 2) As String
Dim i As Long
v(1) = "Test"
v(2) = "Hello"
i = 2
Debug.Print v(i)