这一段时间做程序,一直在做界面方面的工作,刚开始是简单的贴图操作,后来感觉不通用,代码重用性不好,并且要做很多基本工作(要在界面上添加图片,此外还要设定叠放顺序)。后来,把它封装成类,代码重用性提高了,可是界面上还要自己添好多控件,此外窗体变化和放缩,也得添好多代码。后来突然想到VB可以实现控件的自动添加,一试,果然好使,后来有把一些事件也集成到类中了。
目前又把类封装成了控件,使用更加简单了,仅需一条指令就可完成界面换肤和多语言版本
Private Sub Form_Load()
YFSkin1.SkinInit Me '仅需这一行代码
End Sub
这是我已经设计好的几个界面截图(皮肤和语言文件可自定义,可无限扩充)
控件使用源码下载地址: http://www.sky-walker.com.cn/yefan/yfskins.rar
不过很可惜,不能适应菜单,有时间再完善它。目前又添加了几个皮肤。