excel - MouseUpはDoubleClickによって中断されます

Question

フレームがクリックされたときにアニメーションを模倣しようとしています

Private Sub frameGo_MouseDown ...
frameGo.Top = frameGo.Top - 2

Private Sub frameGo_MouseUp ...
frameGo.Top = frameGo.Top + 2

しかし、doubleClikでは、フレームは元の最高値に戻らずに継続的に上昇しています。
どうすればこれを防ぐことができますか？

Answer 1

DblClickイベントのアクションをキャンセルします

Private Sub frameGo_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
    Cancel = True
End Sub