ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 效率神器,一键搞定繁琐工作
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
让更多数据处理,一键完成 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
楼主: foshan

[分享]根据 ldhyob 版主的作品模仿了一个窗体界面,请大家批评!

[复制链接]

TA的精华主题

TA的得分主题

发表于 2006-3-28 11:25 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
知之不如好之者,好之不如樂之者,吾不知故吾學

TA的精华主题

TA的得分主题

发表于 2006-6-22 18:31 | 显示全部楼层

真是厉害啊!

想破脑壳都想不到还有这等事!

以前白活了!本以为excel就是简单的表格呢!过了这么一段时间,真叫我吃鲸阿!

TA的精华主题

TA的得分主题

发表于 2005-8-14 10:34 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册

1、我已将图片放到工作表了,但以代码却行不通,如何处理?

试试在工作表中插入IMAGE控件,再将图片的picture属性......

2、能否用代码获取窗体上标签控件的总数量放到循环中,从而实现每次手工新增加一个标签控件后不需要修改循环代码,而又能实现新增加的标签控件与原有的标签控件同样的功能?

窗体的controls.count记录着所有控件数量,用controls(1).name、typename(controls(1))可返回某个控件的名称和控件类型,呵呵,其余的不需要我说了吧,foshan自己思考一下。

[此贴子已经被作者于2005-8-14 12:13:15编辑过]

TA的精华主题

TA的得分主题

发表于 2005-8-13 23:07 | 显示全部楼层

foshan的想法很好.我之前在做换肤实例时,因为考虑到接口及支持动态换肤的需要,故将图片及配置文件全部外置.

我们完全可以将图片插入到工作表中去,然后无非就是把原来的picture属性使用loadpicture()方法改成由工作表图片的picture属性赋值的方式即可.或者运用imagelist控件,再或者直接就把图片在设计时直接放到窗体中......呵呵,方法很多.

[此贴子已经被作者于2005-8-13 23:08:55编辑过]

TA的精华主题

TA的得分主题

发表于 2005-8-13 20:13 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册

不错不错,foshan速度真快.总的来说,应用类已达到了效果.想到了利用标签控件的picture属性来加载位图的办法,[em17]

提几点改进建议,假如要求按钮的文字在按下时需要有被按下的动作即下移一点的状态,还要求在设计时不需要布置标签控件,在代码运行时,由类动态增加或删除.即只要指定图片及文字还有位置即可.想一想,该如何完成?

TA的精华主题

TA的得分主题

发表于 2005-8-13 17:13 | 显示全部楼层

不是封装成DLL文件.在VBA中的类模块中添加类.这样制作按钮几乎就象从控件面板拖放控件一样方便了.也就是一句代码的事情.而不用做一个按钮,要手工添加三张图片,还要加相应的事件代码(这些代码又几乎一样).呵呵

建议在坛里搜一下关于类模块编程的帖.会有收获的.

TA的精华主题

TA的得分主题

发表于 2005-8-12 17:51 | 显示全部楼层
不错不错.最好把制作按钮的代码封装成类.就更方便了.

TA的精华主题

TA的得分主题

发表于 2005-8-11 15:38 | 显示全部楼层

制作四个边角的弧形图片肯定是需要的.至于透明不透明倒无关紧要,因为弧形外区域刚好本来就不需要显示出来.

佛山需要将四个边角图片进行微调定位.

为图省事呢,也可以不要做那么多图片,直接做一整张图片,指定给窗体的picture属性就行了.我原来那个工程加解锁器的窗体外观就是这样作的.

TA的精华主题

TA的得分主题

发表于 2005-8-11 12:33 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
[quote]以下是引用foshan在2005-8-11 11:26:55的发言:

再求教:

DwLjg01Z.rar (32.74 KB, 下载次数: 23)

TA的精华主题

TA的得分主题

发表于 2005-8-10 16:31 | 显示全部楼层
以下是引用york888在2005-8-10 16:25:54的发言:

做得非常好! 但我不知道用来查询什么的?

偶也奇怪。在 汇总表 (2) 的相关单元格弄了点数据,也是提示 MsgBox "请输入要查询的内容!", 64, "温馨提示"

是不是功能还未弄好吖。

您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-11-24 05:28 , Processed in 0.045748 second(s), 7 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表