Help!! with Mouse Clicks

I want to create a routine that watches to see if a mouse was clicked with in the last minute. Is the best way to do this with the Mouse Button Down Clicked event and a timer or is there a better way to do this????

The reason for this is, my program opens another program and if they have not clicked or done anything to the second program then I would like to ask them if they are ready to close the second program and reset the focus to the first program.

use a timer and the Mouse_Down Event

Code:

---


public I

Private Sub Timer1_Timer()
I = I + 1
If I = 60 Then
'...what ever you want to do
End If
End Sub

Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
I = 0
End Sub

---

this may works

Great thanks for the help!!