如何使用公共子对象引用子表单中的控件

时间:2019-03-24 11:12:40

标签: vba ms-access access-vba

我有一个主表单frmMain,其中包含一个子表单C2C2有一个组合框cbo_1。将代码放在子窗体中并将其引用为me时,代码可以正常工作:

Me.ActiveControl.Undo
Me.cbo_1.Requery

但是,我想将此代码放在public sub中,并希望做同样的事情。为此,我要定义myMe代替me并重写代码:

Public myMe as Form

Set myMe = Screen.ActiveForm.C2.Form

myMe.ActiveControl.Undo
myMe.cbo_1.Requery

但是,我得到Error 2467: The expression you entered refers to an object that is closed or does not exist。有人知道我该如何解决吗?

1 个答案:

答案 0 :(得分:0)

我现在不是直接使代码通用,而是直接引用该控件:

frm!frmMain!C2.Form.cbo_1.Undo
frm!frmMain!C2.Form.cbo_1.Requery

它解决了麻烦。