I sent this message earlier, I got a response but am still confused how to utilize this code. Any more help or advice would be appreciated!


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


11-28-1999 12:06 PM

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"

End If