Welcome Message?

connordrew

Registered User.
Local time
Today, 17:49
Joined
Aug 14, 2003
Messages
22
I have created a form which I want to use as a welcome message.

It is simply called form 1 and if the database is opened, I want form1 to be displayed for about 10seconds.

Thanx
 
The form Timer Interval (thousanths of a second) property and OnTimer event is what you want.

For an open form (whether hidden or not) the OnTimer event is executed at each occurrence of the Timer Interval.
 
Code:
Private Sub Form_Load()
    Me.TimerInterval = 3200
    DoCmd.Hourglass True
End Sub
Code:
Private Sub Form_Timer()

    If Me.TimerInterval <> 0 Then
        Me.TimerInterval = 0
    End If
    
    DoCmd.Hourglass False
    DoCmd.Close
    DoCmd.OpenForm "frmMain"
End Sub
________
THINKMILL
 
Last edited:

Users who are viewing this thread

Back
Top Bottom