网上讨论编程实现XP风格已经很久了，但对于VB编程实现XP风格，却终没有一个完美的解决方案。笔者通过N个日夜的刻苦钻研终于揭开其中奥秘。下面分为三个方面与大家共享之。

一．用manifest文件实现XP风格

正常情况下，在Windows XP系统中，用VB6开发的应用程序只有窗口标题条具备XP风格，窗体上的按钮、文本框等控件仍然显示Windows传统风格。如图1所示：

通过查阅MSDN里的Visual Style章节知道，Windows XP通过Comctl32.dll（版本6）来加载具备XP风格的组件，应用程序则通过一个XML资源文件来通知系统来做这些。XML文件的内容如下：

＜?xml version="1.0" encoding="UTF-8" standalone="yes"?＞　
　　＜assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0"＞　
　　＜assemblyIdentity　
　　 name="XP style manifest"　　
　　 processorArchitecture="x86"　
　　 version="1.0.0.0"　
　　 type="win32"/＞　　
　　＜dependency＞　　
　　 ＜dependentAssembly＞　　
　　 ＜assemblyIdentity　
　　 type="win32"　　
　　 name="Microsoft.Windows.Common-Controls"　　
　　 version="6.0.0.0"　　
　　 processorArchitecture="x86"　　
　　 publicKeyToken="6595b64144ccf1df"　　
　　 language="*"　　
　　 /＞　　
　　 ＜/dependentAssembly＞　　
　　＜/dependency＞　　
　　＜/assembly＞