让VB程序轻松支持换肤功能计算机二级考试

文章作者 100test 发表时间 2009:06:15 09:03:35
来源 100Test.Com百考试题网

　　说到换肤，我们脑子当中可能就会浮现很多商业软件那些漂亮的皮肤，自从XP流行以来，程序的外观变得比以往更加引人注意，像Office 系列的界面，一直是很多程序员模仿的范例，今天我就利用Xtreme Suite Pro ActiveX 轻松的给自己程序加上皮肤应用功能，为我们自己的程序增色。
　　目标：制作一个具有换肤功能的程序，程序界面模仿Office 2007样式
　　一、准备工作
　　1、开发工具VB6，当然也可以用.Net，这里以VB6做示例
　　2、Xtreme Suite Pro ActiveX 12英文正式版
　　下载地址为：
　　Part1:http://download.csdn.net/source/744548
　　Part2:http://download.csdn.net/source/744597
　　二、工具安装
　　1、VB6的安装不多说
　　2、将上述下载地址的两个文件下载后放在同一个目录下，然后解压Part1，解压完成后，可以看到一个setup.exe文件，按提示安装，其中Sn在对应的文本中，注意我们选用的Sn为Xtreme Suite Pro ActiveX v12.0.1 英文正式版的，Xtreme Toolkit Pro v12.0.1是针对MFC的，不要输入错误。
　　现在假设Xtreme Suite Pro ActiveX 按照默认方式已安装成功，那边我们可以进入到下一步了。
　　三、正式开始
　　1、新建一个VB6的EXE工程
　　2、在工具栏上点击右键找到部件，因为Xtreme Suite Pro ActiveX 已安装成功，所以我们可以看到部件引用中有如下内容

　　（图1）
　　勾中xtreme SkinFramework ActiveX Control 12.0.1，此时我们的界面当中应该可以看到类似下面的图片

　　（图2）
　　到这里，我们的准备工作已完全准备妥当，下面是关键的代码，我们将其放在Form_Load事件中