vb如何区别左右键点击？

Question

如题

Answer 1

vbKeyLButton=1 左键
vbKeyRButton=0 右键

Answer 2

我试了，你看一下并不行
vbKeyLButton=1 左键
vbKeyRButton=2 右键
是常量，不管怎么点一样

Answer 3

一般在mousedown事件中，通过判断button的值

Answer 4

一般在mousedown事件中，怎么判断

Answer 5

测试mousedown事件中button的值
常数（button） 值 描述 
vbLeftButton 1 左按钮被按下 
vbRightButton 2 右按钮被按下 
vbMiddleButton 4 中间按钮被按下 常数（换挡） 值 描述 
vbShiftMask 1 SHIFT 键被按下。 
vbCtrlMask 2 CTRL 键被按下。 
vbAltMask 4 ALT 键被按下。 

Answer 6

Private Sub ListAll_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
    If Button = 2 Then  '如果右击鼠标
        .........
    End If
End Sub