[vb6] xp style

Dernière mise à jour le par pijaku .

[vb6] xp style

Le fichier Manifest

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>

InitCommonControls

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" ()
'

Appel de la fonction

Appeler la fonction dans le form_initialize, PAS dans le form_load:

'
Private Sub Form_Initialize()
InitCommonControls
End Sub
'

Compiler, lancer

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.

Ce document intitulé « [vb6] xp style » issu de CodeS SourceS (codes-sources.commentcamarche.net) est mis à disposition sous les termes de la licence Creative Commons. Vous pouvez copier, modifier des copies de cette page, dans les conditions fixées par la licence, tant que cette note apparaît clairement.
Tutoriel pour remplir un treeview sous access (2000)
Creation utilisateurs win 2003 avec un script vbs
Rejoignez-nous