VBA：禁用双击表单控件（按钮）

Question

我在Excel中有一个VBA表单，其中包含“Next”和“Previous”按钮，用于更新Image控件的图片源。

我希望能够非常快速地单击这些按钮以循环显示图像。但是，当我连续点击两次（双击）时，我只得到一个回复​​。

我怀疑是这种情况，因为当两次点击非常接近时，按钮上的双击事件会被触发，而不是点击事件。

我的目标是完全禁用双击事件，允许我尽快点击按钮。有没有办法做到这一点？

Answer 1

取代MouseUp事件。

Answer 2

常规命令按钮可能不是最佳控件;你正在做的事情听起来更像是一个旋转按钮（具有下一个/后一个控制的按钮）。

如果没有削减它，那么愚蠢的简单解决方案就是双击即使只是简单地调用点击事件两次。

Answer 3

我实际上找到了一个非常简单的解决方法：

在DoubleClick活动中，我可以简单地调用Click事件：

Private Sub NextBtn_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
    NextBtn_Click
End Sub

我现在能够尽快点击按钮，每次点击后都会执行相同的代码。