Timing a form

[bparsons]

Can I set a form to stay on the screen for a pre-determined amount of
time? For example, I'm creating a voting booth in Access. I'd like the
last screen (form) to stay up for about 30 seconds. Then I want it to
go to another (beginning) form. How do I do that?

Thanks.

[pietlinden]

Option Compare Database

Private Sub Form_Load()
Me.TimerInterval = 5000
End Sub

Private Sub Form_Timer()
'MsgBox "Time's up... closing.", vbOKOnly
DoCmd.Close acForm, Me.Name
End Sub

[pietlinden]

Option Compare Database

Private Sub Form_Load()
Me.TimerInterval = 5000
End Sub

Private Sub Form_Timer()
DoCmd.OpenForm "frmGame", acNormal
DoCmd.Close acForm, Me.Name
End Sub