PDA

Click to See Complete Forum and Search --> : Extending Timer range


Electron
Nov 27th, 1999, 10:52 PM
I am using a Timer in a project, but the interval for that control only lasts just over 1 minute and I need up to 30 minutes of time! Any suggestions on how to make a timer for up to 30 minutes?

Thanks!

Jeff

Phobic
Nov 28th, 1999, 11:06 AM
One very simple way: Set your timer's interval to 1 and use this as your code for it:

Static OldTime
If OldTime = "" Then OldTime = Time
If DateDiff("n", CDate(OldTime), Time) = 30 Then
OldTime = ""
MsgBox "30 Minutes has elapsed.", vbInformation, "Time"
'Other code here....
End If