一个Sub中的两个事件

Question

Private Sub btnBestellen_Enter()
Call bestelling()
End Sub

Private Sub btnBestellen_Click()
Call bestelling()
End Sub

我有两个单独的潜艇，其中包含相同的代码。有没有办法让它成为一个子？比如这样，当然这不起作用。

提前谢谢

Private Sub btnBestellen_Click,btnBestellen_Enter()
Call bestelling()
End Sub

Answer 1

不幸的是没有。如您所述，VBA没有用于对事件子进行分组的语法。

唯一的解决方法是创建一个手动检查事件的侦听器函数。你应该抓住它们并正确处理它们。虽然我猜这将超出范围：）