在网上看到xtreme介绍,下来试了一下,还是不错,skin framework可以直接更换当前的皮肤,并且还带有皮肤编辑器,对于懒得弄UI的我来说是个好东西;先试一下。。。
Private Sub Form_Load()
'指定载入的皮肤
SkinFramework.LoadSkin App.Path + "Office2007.cjstyles", "NormalBlue.ini"
'适用于当前载入的皮肤在指定的窗口
SkinFramework.ApplyWindow Me.hWnd
End Sub
刚开始时没有注意到 SkinFramework.ApplyWindow Me.hWnd 这句代码,搞得新窗口都有样式,主窗口却没有。。。所以一定要注意这个