Дубль-вызов обработчика TextBox_MouseDown - VBA Excel

Формулировка задачи:

Доброй ночи, объясните пожалуйста подробности происходящего: нажатие правой кнопки мыши на TextBox-е приводит к двум подряд вызовам обработчика события TextBox_MouseDown. Это такая фича или настройка моего Excel-а (читать: мои кривые руки) ? Тестовый примерчик прилагаю.

Решение задачи: «Дубль-вызов обработчика TextBox_MouseDown - VBA Excel»

textual
                            Листинг программы 
                        

                            Private Sub TextBox1_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
Static t As Single
  If Timer - t < 0.1 Then t = 0: Exit Sub
  t = Timer
    Label1.Caption = CStr(CInt(Label1.Caption) + 1)
End Sub
                        