求高手帮忙啊~实在搞不懂

musawei 发布于 2012-06-12 21:13， 474 次点击

我用vb6想编写一个程序，获得每一次鼠标按下和松开时候的系统时间，用的是timegettime函数。具体来说，是在mousedown里a=timegettime，在mouseup里b=timegettime。

奇怪的是，在mousedown里获得的鼠标按下的系统时间，总会出现两个一样的时间值，mouseup里就不会出现。。。

这是怎么回事啊！？

1 回复

woaishuijia2012-06-25 11:34

程序代码：

Private Sub Command1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
Me.Caption = Time()
End Sub

Private Sub Command1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
Me.Caption = Time()
End Sub