SEP日期控制 - DateChange事件不起作用

Question

我使用VBA处理SEP日期控件（使用Office 2016）。通常它似乎工作正常，但是当我在DateChanged（）过程中添加任何代码时，日期不会改变。 我使用此代码：

Private Sub LDDate1_DateChanged()
    Debug.Print Me.LDDate1.Date
End Sub

例如：callendar的当前日期是2017/12/14。当我点击日历并选择（鼠标点击）2017/12/15时，它会在立即窗口中返回2017-12-14（两次！）。日历也仍然是2017/12/14。删除时日历工作正常

Debug.Print Me.LDDate1.Date

我真的很乐意为这些

提供任何支持