VBA函数接收窗体名后如何正确引用控件？解决限定符错误

这个报错的核心原因是你在函数里的控件引用语法不对，而且没有正确获取到窗体对象。咱们一步步来修正：

错误根源 #

你用frm![Controls("WPQ" & n)]的写法是错误的——!运算符是用来直接引用集合的成员（比如窗体的控件、字段），但Controls本身就是窗体的一个集合属性，这种嵌套的写法会让Access混淆，所以抛出“Qualifier must be a collection”的错误。而在窗体的SUB里用Me.Controls("WPQ" & n)能正常运行，是因为Me直接代表当前窗体对象，Controls是它的合法集合属性。

正确的解决步骤 #

要在函数里正确引用窗体控件，你需要先把传入的窗体名称字符串转换成实际的窗体对象，再通过Controls集合访问控件：

1. 获取窗体对象
   函数接收窗体名称字符串后，先通过Forms集合获取对应的窗体实例（你在窗体内部调用的话，窗体肯定处于打开状态，这点无需担心）。

2. 正确访问控件
   用frm.Controls("WPQ" & n)或者更简化的frm("WPQ" & n)来访问控件，再进行赋值操作。

完整函数示例 #

Public Sub LoadQuestions(strFormName As String)
    Dim frm As Form
    Dim n As Integer
    
    ' 将传入的窗体名称转换为实际窗体对象
    Set frm = Forms(strFormName)
    
    ' 示例：循环给WPQ1到WPQ3赋值
    For n = 1 To 3
        ' 方式1：通过Controls集合访问（逻辑更清晰）
        frm.Controls("WPQ" & n).Value = "问题" & n & "的内容"
        
        ' 方式2：直接通过窗体索引访问（简化写法）
        ' frm("WPQ" & n).Value = "问题" & n & "的内容"
    Next n
    
    ' 释放对象（养成良好的编码习惯）
    Set frm = Nothing
End Sub

窗体中的调用方式 #

' 直接传入当前窗体名称
LoadQuestions Me.Name

额外注意事项 #

• 如果你的窗体可能处于未打开状态，需要先执行DoCmd.OpenForm strFormName打开窗体，再获取对象。
• 确保控件名称完全匹配（大小写、拼写都不能出错），否则会触发“找不到控件”的错误。

内容的提问来源于stack exchange，提问作者Tom36