VB程序实现XP效果的界面
来源:优易学  2010-1-15 16:32:39   【优易学:中国教育考试门户网】   资料下载   IT书店

  具体的实现方法如下:  

  ①:在你的窗体加入代码。如果是多个窗口,可以将此代码放到模块中。  

  代码如下:  

  '声明API函数

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

  Private Sub Form_Initialize()

  InitCommonControls

  End Sub 

  注意:千万不要在Form_load()事件下写InitCommonControls这句话,否则你的窗体会启动不了。(不要怪我没告诉你啊~~~~) 

  ②:建立一个和你的.exe同名的.exe.manifest文件(假如:如果你最后编译好的文件名为WindowXPStyle.exe,则建立一个文件名为WindowXPStyle.exe.manifest的文件),并且此文件必须存在于和你Exe文件的同一目录下。 

  以WindowXPStyle.exe为例,则这个WindowXPStyle.exe.manifest的文件的内容如下:  

  version="1.0.0.0"

  processorArchitecture="X86"

  name="CompanyName.ProductName.YourApp"

  type="win32"

  />

  Your application description here.

  type="win32"

  name="Microsoft.Windows.Common-Controls"

  version="6.0.0.0"

  processorArchitecture="X86"

  publicKeyToken="6595b64144ccf1df"

  language="*"

  />

  将以上内容保存为WindowXPStyle.exe.manifest。并且和执行文件放在一个目录下(一定要记住)。

责任编辑:cyth

文章搜索:
 相关文章
热点资讯
资讯快报
热门课程培训