xp前提Private Declare Function InitCommonControls Lib "Comctl32.dll" () As LongPrivate Sub Form_Initialize()
InitCommonControls
End Sub
从系统目录中那一个.manifest
该名称 你的exe文件名.manifest余兴就行了例
a.exe
添加a.exe.manifest

解决方案 »

  1.   

    有两种办法:
    一种是去掉标题栏,在窗体客户区做
    http://www.dapha.net/soure/ocx/WINDOWS_XP_CONTROLSCreatedInVB6.zip
    这种方法比较简单,但加上菜单后,界面会变得很奇怪另一种是响应“WM_NCPINT”等消息,取得整个窗体的DC,进行绘制
    http://211.155.60.164:8088/vcfan/vb/codes/codes_form/vbskin.zip
    这种方法效果比较好,可以随心所欲的做界面,就是比较复杂