用控件仅一条指令实现界面换肤和多语言版本(YFSkins)

        这一段时间做程序,一直在做界面方面的工作,刚开始是简单的贴图操作,后来感觉不通用,代码重用性不好,并且要做很多基本工作(要在界面上添加图片,此外还要设定叠放顺序)。后来,把它封装成类,代码重用性提高了,可是界面上还要自己添好多控件,此外窗体变化和放缩,也得添好多代码。后来突然想到VB可以实现控件的自动添加,一试,果然好使,后来有把一些事件也集成到类中了。

      目前又把类封装成了控件,使用更加简单了,仅需一条指令就可完成界面换肤和多语言版本

     Private Sub Form_Load()
           YFSkin1.SkinInit Me   '仅需这一行代码
        
     End Sub

     这是我已经设计好的几个界面截图(皮肤和语言文件可自定义,可无限扩充)

    用控件仅一条指令实现界面换肤和多语言版本(YFSkins)

    用控件仅一条指令实现界面换肤和多语言版本(YFSkins)

   用控件仅一条指令实现界面换肤和多语言版本(YFSkins)

   控件使用源码下载地址:http://www.sky-walker.com.cn/yefan/yfskins.rar     

  不过很可惜,不能适应菜单,有时间再完善它。目前又添加了几个皮肤。

 

上一篇:阿里云账号忘记了怎么办?账号用户名找回方法


下一篇:Linux中查看进程的多线程