关于激发事件的疑问
激发某一事件的时候会伴随其他事件的发生,那如果我同时定义了DblClick、Click事件,我怎么才可以在激发DblClick事件的时候不激发Click事件呢?
2006-02-26 16:52
2006-02-26 17:46
2006-02-26 17:48
Private Sub Form_Click()
Print "Click"
End Sub
Private Sub Form_DblClick()
Print "DblClick"
End Sub
会两个都激发,不信试试

2006-02-26 18:16
2006-02-26 18:42
基本上是不可能的,在触发dbclick之前你已经触发了click
2006-02-27 14:14
自己做个延时(有点傻 -_-d):
Timer1.Interval = 200'(经测试200很合适)
'////////////////
Private Sub Form_Click()
Timer1.Enabled = True
End Sub
Private Sub Form_DblClick()
Timer1.Enabled = False
Print "DblClick"
End Sub
Private Sub Timer1_Timer()
Print "Click"
Timer1.Enabled = False
End Sub

2006-02-27 20:12
服,铁服……不过,好象Interval等于几,是和系统中设定的双击速度有关吧

2006-02-27 21:38
连这你也弄出来了啊?i 服了 you!
2006-02-28 08:54
2006-02-28 12:14