Function 模块函数frm.setfocus运行时2449错误

我有一个函数问题，它导致frm.setfocus行上出现“运行时错误2449，表达式中存在无效方法”。所引用的表单是一个子表单，是否有人可以帮助解决此错误

功能是：

Function NewItemsSaveAfter(frm As Form)

If frm.Parent.PartSaveYesNo = "Yes" Then
    varCurrRec = frm.CurrentRecord
    frm.Parent.Form.Refresh
    frm.SetFocus
    DoCmd.GoToRecord , , acGoTo, varCurrRec
Else
End If

End Function

---

将焦点设置为包含子窗体的子控件。

谢谢您的评论，请原谅我的无知，但我该怎么做？单击子窗体的边框（在主窗体中显示时），您将获得包含子窗体的控件的名称（例如

subX

）（在属性中）。然后使用

ParentForm.subX.SetFocus

cheers，这对我不起作用，因为可以从不同的子窗体调用模块函数，所以我确实需要使用“frm”变量。