Créer un fichier manifest nommé monapp.exe.manifest
et le placer dans le dossier de l' exe.
Remplacer le nom "monapp" par le nom de votre exe.
<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<name="monapp" type="win32"/>
<description>QCM</description>
<dependency>
<dependentAssembly>
</dependentAssembly>
</dependency>
Déclarer la fonction InitCommonControls en tant que private dans un module
de formulaire, sans le private pour un module standard:
' Option Explicit Private Declare Sub InitCommonControls Lib "COMCTL32.DLL" () '
Appeler la fonction dans le form_initialize, PAS dans le form_load:
' Private Sub Form_Initialize() InitCommonControls End Sub '
Pour les contrôles inclus dans un Frame, ça ne marchera pas parce que
le contrôle Frame n' a pas de hDC. Le remplacer par un Picture Box.
Pour appliquer à l' IDE:
Placer VB6.exe.manifest dans le dossier de vb6.exe. C'est tout.