Ms access 在单击事件中引用文本框名称

我正试图找到一种方法，在单击事件中自动引用文本框名称。该名称将用于事件代码调用的子对象中。我知道它可以硬编码，但我有很多文本框，希望有通用代码。任何帮助都将不胜感激

编辑： 是的，我应该打“标签”而不是“文本框”——对不起。无论如何，我希望能够使用一些简单的代码，如：

Private Sub lbl_Charges_Click()
    tabPage (me.activecontrol.name)
End Sub

显然，

activecontrol

方法在标签上不起作用。我调用的代码是：

Private Sub tabPage(page As String)
    page = Mid(page, 5)
    Echo False
    Me.tab_Menu.Pages("pag_" & page).SetFocus
    Me.tab_Menu.Visible = True
    Me.lbl_Hide.SetFocus
    Echo True
End Sub

我这么做的原因是我试图找到一种方法来消除与此相关的所有闪烁（选项卡菜单和标签背景是透明的）

echo

方法将处理选项卡菜单页面的闪烁，但对命令按钮没有帮助

---

TIA

您可以使用

ActiveControl

：

Call SomeClickFunction(Me.ActiveControl.Name)

或者，要传递控件本身：

Call SomeClickFunction(Me.ActiveControl)

---

请提供您目前使用的代码