淘小兔

vb界面在很多的编程人员看来都是不怎么美化的,都是需要使用到一些其它的美化软件来美化的,如果有需要美化的朋友,你现在就可以试试下面的这款比较好用的专业适合vb界面美化软件(Xtreme Suite Pro ActiveX)!

vb界面美化软件(Xtreme Suite Pro ActiveX)使用方法

知识兔

1、需要下载以及安装打开vb6.0;

Microsoft Visual Basic 6.0 中文版
类型:编程工具大小:145.3M语言:中文时间:9-15评分:7.8

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聽 已安装成功,所以我们可以看到部件引用中有如下内容

202202132002219055980001

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

202202132002232051150002

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

Private Sub Form_Load()

Dim FileName as string

Dim IniFile as string

FileName ="C:/Program Files/Codejock Software/ActiveX/Xtreme SuitePro ActiveX v12.0.1/Samples/SkinFramework/Styles/Office2007.cjstyles"

IniFile="NormalBlue.ini"

SkinFramework1.LoadSkin Dlg.FileName, IniFile
SkinFramework1.ApplyWindow Me.hWnd
SkinFramework1.ApplyOptions = SkinFramework1.ApplyOptions Or xtpSkinApplyMetrics

End Sub

这里我们利用SkinFramework的LoadSkin方法找到指定的皮肤文件,然后再调用ApplyWindow方法,并且设置了ApplyOptions 属性,注意这里的设置其实就是SkinFramework的默认值。

按F5运行工程,出现在我们眼前的界面将是下面这个样子了

202202132002239856190003

简单的引用,简单的代码,出现在我们面前的却已经是如此漂亮的界面,到这里我们已大告功成了。

点击下载

下载仅供下载体验和测试学习,不得商用和正当使用。

下载体验

请输入密码查看内容!

如何获取密码?

 

点击下载