Question

vb6.0 判断是否按下鼠标右键?

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
If (Button And 2) = 2 Then
Print "press right button"
End If
为什么用了and就可以不管button的值而直接判断鼠标是否按下右键？

Answer 1

button
一个整数，它对应鼠标各个按钮的状态，如果某个按钮按下，其中就有一个二进制位被设置。button
参数是具有相应于左按钮（位
0），右按钮（位
1），以及中间按钮（位
2）的一个位字段。这些位的值分别等于
1，2，和
4。它指示这些鼠标按钮的整体状态；三个二进制位中的一些、全部、或一个也没有被设置，指示这些按钮中的一些、全部、或一个也没有被按下。
只有当button=2时，(Button
And
2)
=
2
这个等式才成立，也就是按下了鼠标右键。

Answer 2

事件写错了,MouseDown