只要InitCommonContorls就可以了
(API函数)另:你把分给http://www.csdn.net/expert/topic/527/527734.xml吧,
答案是他先说的,俺来晚一步    :-)

解决方案 »

  1.   

    建议给分给他们!!!!!!!!!!!!!!!!!!!
    你把分给http://www.csdn.net/expert/topic/527/527734.xml吧增加一个文件,程序里加2句话,一切就可以搞定了!http://qianqian.533.net/qadocs/XP.JPG代码:Declare Function InitCommonControls Lib "Comctl32.dll" () As LongPrivate XP_Start()
    InitCommonControls
    End Sub
      

  2.   

    ==================================================================
    Windows XP 版本提供外观风格。通过使用助手库和应用编程接口 (API),您无需更改过多代码即可在您的应用程序中使用 Windows XP 的外观风格。有关详细信息,请参阅 MSDN Library 中的 Platform SDK 文档。ComCtl32.dll 版本 6
    Windows XP 操作系统上运行的所有应用程序都有一个非客户端区域,其中包括窗口框架和非客户端滚动条。默认情况下,外观风格将应用于非客户端区域。这意味着非客户端区域的外观由当前安装的外观风格指定。要将外观风格应用于客户端区域中的常用控件,必须使用 ComCtl32.dll 版本 6 或更高版本。与 ComCtl32.dll 的早期版本不同,ComCtl32.dll 版本 6 不可重新分发。要使用动态链接库 (DLL) 的版本 6,唯一途径是使用包含它的操作系统。Windows XP 同时提供版本 5 和版本 6。ComCtl32.dll 版本 6 中包含用户控件和常用控件。默认情况下,各种应用程序使用 User32.dll 中定义的用户控件和 ComCtl32.dll 版本 5 中定义的常用控件。如果要让您的应用程序使用外观风格,必须添加应用程序声明,指出如果 ComCtl32.dll 版本 6 可用,则应该使用它。版本 6 包括一些新控件和其它控件的新选项,但是,最大的变化是支持对控件在窗口中的外观进行更改。外观风格任务
    要将外观风格添加到您的控件,可能需要执行以下一些任务。在未使用第三方扩展的应用程序中使用 ComCtl32.dll 版本 6
    下面是一些未使用第三方扩展的应用程序示例。
    计算器
    FreeCell
    扫雷
    记事本
    纸牌 要创建声明并使您的应用程序能够使用外观风格,请执行以下步骤: 链接到 ComCtl32.lib 并调用 InitCommonControls(请参阅 MSDN Library 中的 Platform SDK 文档)。
    ==================================================================
      

  3.   

    这里有你要的http://www.21code.com/codebase/?pos=down&id=1930
      

  4.   

    有些 VB 6 的程序无法 Apply Windows Theme,目前我认为使用外部 manifest 文件最好。上面发言的各位,你没有多少人对自己说的方法进行过全面测试的?