模块中的MS Access 2013事件触发器,而不是类模块

时间:2016-02-17 05:28:04

标签: vba ms-access

我有许多具有相同控件的表单,例如,年份用于不同的报表。有几十种形式的控件名为Year with GotFocus / OnFocus事件触发器。我试图避免用几乎相同的代码编写一堆类模块,这些代码需要类似:

Private Sub Year_OnFocus()

我想在模块中编写一个函数,所以我可以参考相对于它的形式的年份:

Forms!Home!NavigationSubForm.Form.Year.OnGotFocus

这似乎不起作用,更不用说与Private Sub Year_GotFocus的行为方式相同。所以想知道是否有人有任何建设性的建议。

1 个答案:

答案 0 :(得分:2)

您正在寻找WithEvents。文档很差,但这里有一个很好的介绍。浏览标题 A Little History

A Little History