有关xp样式格式的帮助 [英] help about xp style format

查看:99
本文介绍了有关xp样式格式的帮助的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!

问题描述

有一个艺术名称Give xp look to vb 6在视觉基础文章中


i做了以下关于ariticle的内容


1.复制代码并制作一个 VB6.exe。清单

在vb6.exe文件夹中


2创建一个名为abc的项目作为项目名称,form1作为表单

只有一个标签,一个文本框和一个组合框


3制作一个名为abc.exe的项目的exe


4再次复制记事本中的代码,并在我的abc.exe存在的文件夹中创建一个文件abc.exe.manifest




5运行exe所以我的项目看起来像xp表格


但是当我运行exe时它会给我错误

there is an artical name "Give xp look to vb 6" in visual basic article

i had done the following about the ariticle

1. copy the code and make a VB6.exe.manifest
in vb6.exe folder

2 make a project with name abc as project name and form1 as form
with only one label ,one text box and one combo box

3 make a exe of the project with name abc.exe

4 again copy the code in notepad and make a file abc.exe.manifest
in the folder where my abc.exe exist

5 run the exe so my porject look like xp form

but when i run the exe it give me error

展开 | 选择 | Wrap | 行号

推荐答案

我也遇到那篇文章而且它有效..
i have also encounter that article and it works..


well

是我错过了任何一步

well
is there any step i am missing


i也遇到那篇文章而且它有效..
i have also encounter that article and it works..


确定你错过了非常重要的事情:D $ / $

在你的项目中的任何模块中声明这个API函数


Public Declare Sub InitCommonControls Lib" comctl32.dll" ()


从你的项目Form_Initialize事件中的每个Form Initialize事件中调用它

它让VB常用控件初始化自己使用xp样式和另一个信息你可以需要,如果你使用microsoft common controll 5.0它将适用于xp风格6.0而不是5.0有bug可以填充地球行星:D祝贺


Private Sub Form_Initialize()

调用InitCommonControls

End Sub
sure man u missing very important thing :D

declare this API function in any moudle in ur project

Public Declare Sub InitCommonControls Lib "comctl32.dll" ()

call it from each Form Initialize Event in ur project Form_Initialize event
it let VB common controls initial it self to work with xp style and another information that u can need, if u use microsoft common controll 5.0 it will work with xp style 6.0 not and 5.0 have bugs can fill earth planet :D congratulation

Private Sub Form_Initialize()
Call InitCommonControls
End Sub


这篇关于有关xp样式格式的帮助的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!

查看全文
登录 关闭
扫码关注1秒登录
发送“验证码”获取 | 15天全站免登陆