En réalité, c'est tout simple.
Il faut créer un module dont la Sub sera nomée ' Sub Main () ' et devra être lancée au démarrage de l'application ( Projet > Propriétés de ... > objet de démarrage : Sub Main ).
Ce module contiendra le texte suivant :
Code :
- Option Explicit
- Private Declare Sub InitCommonControls Lib "comctl32.dll" ()
- Public Sub Main()
- InitCommonControls
- ' Suite de votre code dans la Sub Main.
-
- End Sub
|
En outre, un fichier de même nom que celui de l'exe doit être créé et avoir comme extension ' .manifest '. En clair, si l'exe se nomme ' projet1.exe ', le fichier devra se nommer ' projet1.exe.manifest '. Il devra se trouver dans le même répertoire que le fichier exécutable. Dans ce fichier voilà le code à trouver :
Code :
- <?xml version="1.0" encoding="UTF-8" standalone="yes"?>
- <assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0">
- <assemblyIdentity
- version="1.0.0.0"
- processorArchitecture="X86"
- name="nom_de_votre_projet"
- type="win32"
- />
- <description>Description de votre projet.</description>
- <dependency>
- <dependentAssembly>
- <assemblyIdentity
- type="win32"
- name="Microsoft.Windows.Common-Controls"
- version="6.0.0.0"
- processorArchitecture="X86"
- publicKeyToken="6595b64144ccf1df"
- language="*"
- />
- </dependentAssembly>
- </dependency>
- </assembly>
|
Petite remarque : ce code provient du site www.vbaccelerator.com