回复 3楼 风吹过b
我刚又试了下,貌似又不是那么回事
DOWN与UP是冲突的
CLICK似乎只认UP,而DOWN是优先级最高的,但是处理完DOWN之后就完全跳过了UP跟CLICK
Private Sub Form_Click()
MsgBox "click"
End Sub
Private Sub Form_DblClick()
MsgBox "doubleclick"
End Sub
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
MsgBox "down"
End Sub
Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
MsgBox "up"
End Sub