在 VBA 中如何使用字符串来引用变量？

我有一个变量strFunction，然后我还有另一个字符串strName = "strFunction"，我想知道的是如何使用 strName 获取 strFunction 的值。

例如，像 getValue(strName) 这样的东西给我 strFunction 的值。 Access VBA 中可以吗？

Thanks!

EDIT:

我有一个strFunction字符串，它是一个常量字符串。 在我的代码中我想使用Len("strFunction")测试它的长度，但我得到的是长度“strFunction”。所以我需要一个从变量名中获取值的函数。我尝试过 Eval()，但它不能做到这一点，即使我写了一个get_strFunction(), eval("get_strFunction()")给我错误，告诉我它找不到它。

Private Const strFunction as String = "FilterByType_1"
Private Function get_strFunction()
    get_strFunction = strFunction
End Function

"我有一个变量 strFunction，然后我有另一个字符串 strName = "strFunction" ，我想知道如何使用 strName 获取 strFunction 的值。"

而不是变量，结构函数可能是 VBA 集合中某个项目的键。

Public Sub darkjh()
    Dim strName As String
    Dim col As Collection
    Set col = New Collection
    col.Add "FilterByType_1", "strFunction"
    strName = "strFunction"
    Debug.Print col(strName)
    Set col = Nothing
End Sub

Edit：您可以使用 Scripting.Dictionary，而不是 VBA 集合。

Dim strName As String
Dim dict As Object
Set dict = CreateObject("Scripting.Dictionary")
dict.Add "strFunction", "FilterByType_1"
strName = "strFunction"
Debug.Print dict(strName)
Set dict = Nothing