锐客网

  1. 首页 > 生活百科 > it技术 > >

vb.net皮肤下载 vbnet keydown

IT技术皮肤

vb.net mdi窗体 皮肤控件 报错vb.net皮肤下载我刚用过,
在父窗体vb.net皮肤下载的构造函数中写
skinEngine1.SkinFile
=
"Longhorn.ssk";
"longhorn.ssk"是vb.net皮肤下载你要用的皮肤名称,记住把皮肤放到\bin\Debug目录下
只要在父窗体使用皮具即可,其vb.net皮肤下载他窗体自动实现窗体更换
采纳后可以追问
用于vb.net程序皮肤DotNetSkin.dll 找这个破解的dll
，它的皮肤你上官方网站下 。
这个控件不到1m，很小 ， 速度也快，美观方面，也够用了 。
VB.net高手进 透明窗体皮肤form的opacity属性和form的transparencykey属性 opacity数据类型为双精度浮点型 ， 它决定窗体本身的透明度 。例：me.opacity=0.5 transparencykey的属性决定窗体上的控件的所在区域是否完全透明 。当窗体上的控件的背景色与窗体的transparencykey属性相同时，则该控件的所在区域完全透明 。例：me.transparencykey=color.red me.textbox1.backcolor=color.red 上面的代码为窗体上的textbox控件完全透明
vb怎么加载皮肤转载此出处
说到换肤，我们脑子当中可能就会浮现很多商业软件那些漂亮的皮肤，自从XP流行以来，程序的外观变得比以往更加引人注意 ， 像Office 系列的界面，一直是很多程序员模仿的范例 ， 今天我就利用Xtreme Suite Pro ActiveX 轻松的给自己程序加上皮肤应用功能，为我们自己的程序增色 。
目标：制作一个具有换肤功能的程序，程序界面模仿Office 2007样式
一、准备工作
1、开发工具VB6 ， 当然也可以用.Net ， 这里以VB6做示例
2、Xtreme Suite Pro ActiveX12英文正式版
下载地址为：
Part1:
【vb.net皮肤下载 vbnet keydown】Part2:
二、工具安装
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事件中
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运行工程 ， 出现在我们眼前的界面将是下面这个样子了
（图3）
简单的引用，简单的代码，出现在我们面前的却已经是如此漂亮的界面，到这里我们已大告功成了 。
四、扩展
Xtreme Suite Pro ActiveX的SkinFramework 不但支持以cjstyles为扩展的皮肤文件，同时也支持XP的themes文件，即以msstyles为扩展名的文件，知道了这点我们的皮肤来源就非常广了 。
下面为大家推荐一个地方，里面有很多免费的皮肤
安装完Xtreme Suite Pro ActiveX ， 官方即包含Office2007.cjstyles，Vista.cjstyles，WinXP.Luna.cjstyles，WinXP.Royale.cjstyles四个皮肤文件，同一个皮肤文件中可能包含几个配置文件，比如Office2007.cjstyles就包含NormalBlue.ini 、NormalAqua.ini 、NormalSilver.ini 、NormalBlack.ini 四个配置文件，可以放在LoadSkin方法的第二个参数中，就可以显示不同配置文件所达到的不同皮肤的效果 。
为了读取皮肤文件所包含的配置文件，我们可以用下面的方法
Dim Discription As SkinDescription
Dim i As Integer
Dim FileName as string
FileName ="C:/Program Files/Codejock Software/ActiveX/Xtreme SuitePro ActiveX v12.0.1/Samples/SkinFramework/Styles/Office2007.cjstyles"
Set Discription = SkinFramework1.EnumerateSkinFile(FileName )
For i = 0 To Discription.Count - 1
debug.print "IniFile:"Discription.IniFile(i).IniFileName"/ColorScheme:"Discription.IniFile(i).ColorScheme_
"/FontSize:"Discription.IniFile(i).FontSize
Next
写到这里，我们才真正搞定了皮肤的开发，为了大家的使用方便 ， 我特意写了一个示例程序
下载地址为：
另外这里包含了几个皮肤文件:
有兴趣的可以参考一下
关于vb.net皮肤下载和vbnet keydown的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站 。

    推荐阅读


    上一篇：5万订单需要redis多大内存，redis 10万qps

    下一篇：主播直播刷礼物可以露脸吗，直播刷礼物是可以变成钱吗