How To Create A Splash Screen In Access 2010

Creating a Microsoft Access Splash Screen:

Software applications often display a splash screen when launching. With Microsoft Access you will often see the splash screen displayed before being presented with the database switchboard or similar form.

The splash screen in Microsoft Access will usually display a logo of the company that has created the database application, contact details of the person responsible for the administration and maintenance of the database or will sometimes display other useful information or tips associated with the database.

We can use the screen to display randomly selected tips or help topics, providing the tip will benefit the end user. To avoid irritating the user, we should also provide them with the option of not having the splash screen appear in the future.

This tutorial details:

How to create and add a splash screen to your Access Database

In the database window choose Forms from the Objects. Double-click Create form in Design View

Open the Properties dialog box for the form (View » Properties) and on the Format tab set the following properties:

Property	Value
Scroll Bars	Neither
Record Selectors	No
Navigation Buttons	No
Dividing Lines	No
Auto Center	Yes
Border Style	Dialog
Control Box	No
Min Max Buttons	None
Close Button	No

Choose File » Save and save the form as frmSplashScreen
The form should look similar to below. We will now want to start modifying this and making it look more presentable:
Change back to form design view. Now, from the Toolbox (if this is not visible go to Tools » Toolbox) and click on the Image tool. With the image tool selected click in the form detail section.
The Insert Picture dialog box appears. Select the image that you want to include in the form and click OK. Access inserts your image in the image control on the form. Select the image and position in the correct location.

As our chosen image is a particular colour, we also need to modify the background colour of the form details section to match. If we right-click on an empty section of the form background, and from the pop-up menu chose Fill/Back Color and select a matching colour (in our case black).
Next we want to add a Check Box control. Add the checkbox to the bottom left hand side of your form.
For the properties of the check box, set the name of the control to chkShowHide, then from the data tab set a default value of 0 for the control.

Set the label caption for the check box to "Don't show this screen again"
Add a label control to the bottom right hand corner of the form. Set the name for the control to lblClose and set the caption for the label to "Close". We will use this to close the splash screen form by adding code to the click event of the label.
If we view the form in form view it will now look similar to the following example:
Now, we need to add code to the On Click event of the Close label that will act as a command to close the splash screen form. In design view of the form, select the label (lblClose) and from the properties sheet choose the Event tab, then select the On Click event.
Using the drop down arrow in the On Click property, select [Event Procedure] and then click on the Ellipsis button (...) to open up the Visual Basic Editor. Enter the following code:
```
Private Sub lblClose_Click()     On Error GoTo Err_lblClose_Click   ' Close the splash screen & ' Open the main database form, frmMain      DoCmd.Close     DoCmd.OpenForm "frmMain"  Exit_lblClose_Click:     Exit Sub  Err_lblClose_Click:     MsgBox Err.Description     Resume Exit_lblClose_Click  End Sub
```

We also need to add some code to the Form Open and Form Close events, that will perform actions depending on the selection made in the checkbox contained on the form (the checkbox that gives the user the option of not displaying the splash screen in future when they open the database). The events will set options as to which form is displayed at start-up, dependant on user preference.

Add the following two sets of code to the Open and Close event procedures for the form:

Private Sub Form_Open(Cancel As Integer)      On Error GoTo FormOpen_Err     If (CurrentDb().Properties("StartupForm") = "frmSplashScreen" Or _       CurrentDb().Properties("StartupForm") = "Form.frmSplashScreen") _         Then         Forms!frmSplashScreen!chkHideSplash = False     Else         Forms!frmSplashScreen!chkShowHide = True     End If FormOpen_Exit:     Exit Sub  FormOpen_Err:     If Err = 3270 Then         Forms!frmSplashScreen!chkShowHide = True         Resume FormOpen_Exit     End If  End Sub  '----------------------------------------------------------------  Private Sub Form_Close()  On Error GoTo Form_Close_Err     If Forms!frmSplashScreen!chkShowHide Then         CurrentDb().Properties("StartupForm") = "frmMain"     Else         CurrentDb().Properties("StartupForm") = "frmSplashScreen"     End If Exit Sub  Form_Close_Err:     If Err = 3270 Then         Dim db As DAO.Database         Dim prop As DAO.Property         Set db = CurrentDb()         Set prop = db.CreateProperty("StartupForm", dbText, _         "frmSplashScreen")         db.Properties.Append prop         Resume Next     End If      End Sub

Save the design of the splash screen, then go to the Tools menu, where we need to set the start-up options.
From the menu, choose Startup to display the startup options dialog box.

Select frmSplashScreen in the Display Form/Page drop down list.

This form will now be displayed the first time that the database is opened.

To see this example in action, you can download the sample Microsoft Access database from the Microsoft Access Forms page or the Microsoft Access Downloads page.