竟然说我不是高手，不让我回答高手区问题...RE：如何让 VB 6 的程序使用 XP Theme？（DevilXelloss）

[qianqian]

很简单，增加一个文件，程序里加2句话，一切就可以搞定了！
新年以后看我发帖子，或者给我发mail索取。

http://www.1000vb.net

[qianqian]

屏幕图片：

http://qianqian.533.net/qadocs/XP.JPG

代码：

Declare Function InitCommonControls Lib "Comctl32.dll" () As Long

Private XP_Start()
InitCommonControls
End Sub

。。。

[wgku]

9494为什么硬要分高手区与其它的！！！真是的！！！！！CSDN这点太失败了！！

[wyvernwhite]

就算是国外也大牌儿站点也不象这样，是不是CSDN的人已经觉得自己很权威了？

[Amoon]

同意,即使是生手,也有所谓的高手不及的方面嘛!

[Mike_sun]

kao

[mwenyuan]

建立一个和你的exe同名的.exe.manifest文件放在同一个目录下（你的程序是aa.exe，那就要有一个aa.exe.manifest文件放在同一个目录下）。这个文件的内容如下：
<?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="你的exe的文件名" type="win32" />
<description></description>
<dependency>
<dependentAssembly>
<assemblyIdentity type="win32" name="Microsoft.Windows.Common-Controls" version="6.0.0.0" language="*" processorArchitecture="*" publicKeyToken="6595b64144ccf1df" />
</dependentAssembly>
</dependency>
</assembly>
就可以了

[mwenyuan]

或者在你的EXE里面放一个自定义资源类型叫“RT_MANIFEST”，里面放一个叫"1"的资源，然后把刚在的那个文件内容写进去。（你看一下XP自带notepag.EXE，里面有这个资源，用VC++或者VS.NET开，exeScope好像看不见）

[mwenyuan]

打错字了，是Notepad.exe，不是notepag.EXE

[lihonggen0]

9494

[shmily_nnx]

请问谁那里有comctl32 6版本，拿出来share好了：）