我不明白为什么这不起作用，而这里的其他问题和答案并没有给我一个答案。

我有一个带有2个列表框的简单项目。一个名为lList，另一个命名为lListH。

以下工作如下：

function MyFunction (byval lList as listbox, byval lListH as listbox)
    lList.Items.Add("Visible list")
    lListH.Items.Add("Hidden List")
end Function

下面是我想要使用的，但是它不起作用：

function MyFunction (byval lList as listbox)
    Dim sControlName = lList.Name & "H"
    Debug.Print(sControlName)  'Outputs lListH as expected