Comment exécuter un code à la première exécution d'un progra

[url=#prem_execution]Comment exécuter un code à la première
exécution d'un programme ?[/url]


Il y a plusieurs méthodes pour faire cela. Habituellement
on utilise un emplacement particulier du registre situé sous cette clé
:
HKEY_CURRENT_USER\Software\VB and VBA Program
Settings\appname\section\key

Cette partie du registre est directement manipulable avec
les quatre fonctions suivantes :

• SaveSetting appname, section, key, value : permet de créer ou de modifier
  une clé du registre.
  
• GetSetting(appname, section, key [, default]) ou GetAllSettings((appname,
  section) : permet de récupérer une ou des clés
  
• DeleteSetting appname, section, key : supprime une clé.
  

Bien sûr, ces fonctions ne permettent pas une gestion
complète du registre mais elles vous permettent de stocker quelques valeurs très
simplement. C'est ce que nous allons faire avec le code suivant.

Code:

Private Sub Form_Load()

'vérifie l'existence de la clé
If Len(GetSetting("MonAppli", "Demar", "DejaEx")) = 0 Then
    'si elle n'existe pas création de celle-ci
    SaveSetting "MonAppli", "Demar", "DejaEx", "Vrai"
    'Le code placé ici ne s'exécutera qu'une fois
    MsgBox "Je n'apparaîtrais plus", vbInformation + vbOKOnly
End If

End Sub