En el primer formulario que se cargue:
Código:
Private Declare Function InitCommonControls Lib "comctl32.dll" () As Long
Private Sub Form_Initialize()
InitCommonControls
End Sub
El archivo manifest es asi:
Código:
<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0">
<assemblyIdentity type="win32" processorArchitecture="*" version="6.0.0.0" name="mash"/>
<description>Aca_pongo_el_nombre_del_exe_incluida_la_extencion</description>
<dependency>
<dependentAssembly>
<assemblyIdentity
type="win32"
name="Microsoft.Windows.Common-Controls" version="6.0.0.0"
language="*"
processorArchitecture="*"
publicKeyToken="6595b64144ccf1df"
/>
</dependentAssembly>
</dependency>
</assembly>
Este archivo guardalo con el nombre del exe + .manifest en el mismo directorio donde está el exe. Por ejemplo si tu ejecutable se llama mi_programa.exe el manifest es mi_programa.exe.manifest (con las dos 'extenciones')
A mi me funciona bien con los temas de XP, espero que te ayude
Un saludo