在类模块中为文本框创build“_Enter”事件处理程序

我有一个类模块TCLabel ，为dynamic填充的用户TCLabel添加事件处理程序。 当用户窗体初始化时，这些标签（和其他控件）将根据ActiveDocument的自定义文档属性dynamic添加。 一切工作正常，除了我发现我无法使用类模块创buildTextbox_Enter事件处理程序。 这里是模块的代码：

 Option Explicit Private WithEvents m_oTextBox As TextBox Public Property Set TextBox(ByVal oTextBox As TextBox) Set m_oTextBox = oTextBox End Property Private Sub m_oTextBox_Change() MsgBox "Success: Change" '<--Works End Sub Private Sub m_oTextBox_DblClick(ByVal Cancel As MSForms.ReturnBoolean) MsgBox "Success: DblClick" '<--Works End Sub Private Sub m_oTextBox_Enter() MsgBox "Success: Enter" '<--Doesn't work End Sub 

在类模块的下拉菜单中，只有用于BeforeDragOver ， BeforeDropOrPaste ， Change ， DblClick ， DropButtonClick ， Error ， KeyDown ， KeyPress ， KeyUp ， MouseDown ， MouseMove和MouseUp选项，但Enter没有选项。 手动创build事件，如上面的代码所示，什么都不做。 Enter是一个有效的事件处理程序的文本框，为什么不能用类模块创build？ 有没有解决方法？