Le Splash-Screen ou comment donner une touche professionnelle à vos applications.

Pour l'image, prenez un bon logiciel de retouche photo, du type Adobe Photoshop Element, Paint Shop Pro ou The Gimp, ce dernier est gratuit et très performant.
Choisissez une police de caractères sur de nombreux sites existants. La plupart proposent des centaines de polices gratuites.

Donner du relief à votre image en appliquant un effet de style "bouton".

Sauvegardez votre image au format GIF ou JPG (JPEG) normalement vous pouvez avoir une belle image pour une quinzaine de kilo-octets. L'exemple ci-dessous est un gif de 10 kilo-octets.

Il ne faut pas oublier que le splash-screen ne reste pas indéfiniment affiché. Ne chargez pas trop en texte, et choisissez une taille suffisamment grande pour que l'utilisateur puisse le lire sans effort. Mettez les informations habituelles comme le nom de l'application, ceux des concepteurs et n'oubliez pas le logo du client et de votre société.

Ne mettez pas le numéro de version de l'application, sinon vous devrez faire des modifications de l'image à chaque nouvelle livraison.

Ouvrez une base de données et créer un formulaire vierge. Insérez l'image en utilisant le contrôle Image et cadrez-la en haut à gauche.
Réglez les propriétés suivantes :

Mettez-vous en mode consultation et utilisez la souris pour régler les dimensions du formulaire. Une fois l'opération effectuée, repassez en mode création et modifiez la dernière propriété du formulaire.

Pour éviter de voir le fond du formulaire, colorez-le en gris

et réduisez la taille du fond et du formulaire pour qu'il colle à l'image.

A ce stade, vous pouvez faire un essai. Pour cela, commencez par enregistrer le formulaire, le nom de frmSplashScreen semble tout indiqué, fermez-le puis rouvrez-le pour qu'il s'affiche au milieu de la fenêtre ACCESS. (propriété Auto Centrer = Oui)

Une des fonctions les plus méconnues d'Access est certainement la minuterie. Celle-ci n'est présente que sur les objets formulaires.
Sa mise en oeuvre se fait à deux niveaux :

• La définition d'un intervalle de temps (exprimé en millisecondes)
  
• La procédure qui sera exécutée toutes les n millisecondes.
  

La procédure événementielle vise à ouvrir le formulaire principal de l'application et à fermer le formulaire au bout de n millisecondes.

Private Sub Form_Timer()

	Me.TimerInterval = 0                    ' arret de la minuterie
	DoCmd.OpenForm "frmMenuPrincipal"       ' ouverture du forms de l'application
	DoCmd.Close acForm, Me.Name   			' fermeture du splash

End Sub

TimeInterval correspond à la propriété Intervalle minuterie. Celle-ci doit être remise à zéro.

Si la minuterie n'est pas remise à zéro, cela peut entraîner une instabilité voire un blocage du système. Seul l'arrêt de la tâche MSACCESS.EXE dans le gestionnaire du même nom (ctrl+alt+del) peut débloquer la situation.

Dans un deuxième temps, on ouvre un formulaire, en principe c'est votre menu.
Puis on ferme le SplashScreen.

Dans un SplashScreen, outre les renseignements statiques, vous souhaiterez peut-être afficher des informations dynamiques comme un numéro de version ou bien le nom de l'utilisateur.
Pour cela nous devons créer une étiquette.

• Ouvrez le formulaire en mode création,
• Ajouter une étiquette où vous souhaitez voir figurer l'information,
• Écrivez "Version-User" à l'intérieur,
• Donner-lui une largeur suffisante.
• Allez dans le menu Format et choisissez Mettre au premier plan,
• Afficher les propriétés en changer le nom en lblVersion.

Cliquez sur le carré en haut à gauche pour sélectionner les propriétés du formulaire.

Créez une procédure sur l'évènement Sur réception focus comme nous avons fais précédemment. Écrivez le code suivant dans la procédure.

    ' on inscrit le N° de version et l'utilisateur Windows
    me.lblVersion.caption = "V. 1.0 - " & Environ("USERNAME")   

    ' ou bien

    me.lblVersion.caption = "V. 1.0 - " & CurrentUser
   ' ici c'est l'utilisateur Access connecté.

Les réglages sont simples car ils ne concernent que le temps d'affichage. Pour les modifier il suffit de jouer sur la valeur de la propriété Intervalle minuterie.
La partie SplashScreen est terminée.

Vous pouvez lancer le formulaire par la macro de démarrage :

• Ouvrez une macro vierge
• Insérez l'action OuvrirFormulaire
• Dans Nom formulaire, indiquez le nom : frmSplashScreen
• Affichage : Formulaire
• Mode fenêtre : Standard
• Enregistrez la macro sous le nom : Autoexec

Vous pouvez également utiliser les options de démarrage d'Access du menu Outils/Démarrer....

Lorsque vous souhaitez effectuer d'autres tâches au démarrage de votre application, préférez plutôt la procédure VBA.
Pour cela, procédez comme pour un démarrage par Macro (Autoexec) mais indiquez l'action ExécuterCode à la place de OuvrirFormulaire.
Donnez le nom de la procédure ; dans notre cas, il s'agit de Startup.

Ouvrez un nouveau module et créez une procédure (Sub) que vous nommerez StartUp().

Sub Startup()

    DoCmd.OpenForm "SplashScreen", acNormal           ' ouvrir le splashscreen
    DoEvents                                          ' pour version 2002 et +
' execute les traitements divers
' ....

    DoCmd.Close acForm, "SplashScreen", acSaveNo      ' ferme le splashscreen

End Sub

Il est évident que dans ce cas la fermeture est conditionnée par une procédure externe (DoCmd.Close acForm, "SplashScreen", acSaveNo).
Il est donc impératif que le splashscreen ne commande pas lui même sa fermeture. Pour cela, il suffit simplement de mettre la minuterie à 0.