vbRightButton是VB定义的一个常量,它的值等于2,也就是说,上面那句If判断永远是真,所以只要有鼠标单击,就会执行if块中的弹出操作.
把常量换成字面量,你就明白了:
If Button = 2 Or vbRightButton Then
相当于:
If Button = 2 Or 2 Then
所以应该去掉vbRightButton,才能达到预期的效果.当然为了代码好理解,可以使用这个常量:
If Button = vbRightButton Then
这样就是表示,当Button等于右键单击时操作If中的代码.