将“number”转换为“variable name”

问：

如何将数字“转换”为变量名称？

好的，所以我通过网络从外部来源接收一个数字和一个值。有 aprox 600 号码。 所以现在我需要把这个值放到我的程序中的变量中。 我可以使用一个长选择案例来查找数字，然后将发送的值存储在相应的变量中。 或者，还有其他方法吗？就像将所有变量名称存储在数组中与数字对应的位置，然后从数组中获取变量名称并将接收到的值设置为该变量？

Sub WriteToMyVars(varNumber, val)
    Select varNumber
        Case "100"
            MyVarName1 = val
        Case "101"
            MyVarName2 = val
        Case "102"
            MyVarName3 = val
        'etc etc
    End Select
End Sub

'or -----------------------------------

Dim a(600) As String
a(100) = "MyVarName1"
a(101) = "MyVarName2"
a(102) = "MyVarName2"
'etc etc

Sub WriteToMyVars(varNumber, val)
    a(varNumber) = val 'this won't work I know, it'll put the val in the array instead of the varname, but something like this would be way shorter than the above
End Sub