更多频道内容在这里查看
爱奇艺用户将能永久保存播放记录
过滤短视频
暂无长视频（电视剧、纪录片、动漫、综艺、电影）播放记录，
使用您的微博帐号登录，即刻尊享微博用户专属服务。
使用您的QQ帐号登录，即刻尊享QQ用户专属服务。
使用您的人人帐号登录，即刻尊享人人用户专属服务。
热血街舞团之鹿晗王嘉尔选手PK现分歧 陈伟霆宋茜队员内战升级
偶像练习生之9人团出道 导师练习生集体回归泪洒舞台
最强大脑燃烧季之国际赛最终战中日对决 栾雨回归致敬水哥
非诚勿扰之三国迷男嘉宾自称百科全书 女嘉宾游戏技能满点
妈妈是超人3之黄圣依安迪关系渐融洽 嗯哼为霍思燕洗脚超暖心
二十四小时3之推理大师白敬亭上线 熊梓淇魏大勋PK灵魂化妆术查看: 21950|回复: 62
[原创]VBA&for&EXCEL&也玩怪异窗口
阅读权限95
在线时间 小时
VBA for EXCEL 也玩怪异窗口
大家编程是不是编累了?用程序做点惊喜轻松一下吧[em11]
VBA也来玩玩怪异窗体，实现实现给窗体换肤的乐趣......
微软方方正正的窗口确实看腻了,到了xp里也只是圆滑了点,早就听说微软在WINDOWS API里给窗口的外型包装留了条后路,如建立圆形、椭圆形、多边形、三角形、菱形等特有形状，可是这些形状乃至形状组合其实仍然脱不了规则图形的圈子，因为它的效果完全达不到我们想随心所欲的外型。如我们想看到的自已设计的个性化播放器界面、卡通人物、美丽风景.....等等
曾在网上看到一篇相关文章，让眼前一亮，就有了试一试的勇气了，呵呵。
这种怪异窗体的实现原理仍然是前述利用API给窗口显示模式重新设置句柄的方法，关键是符合需要的、不规则的怪异窗口的显示句柄如何获得。文中一句话，道破天机，即：屏幕上任一象素点均可以看作是一小矩形，一幅图就是由象素矩形构成，只要把这个象素矩形的显示句柄一一融合成新显示句柄最后指定给准备变异的窗体就大功告成！
沿着上述思路，我的具体做法是：
1、自己绘制或从网上找幅图片；
2、对该图片通过图形处理软件，如photoshop进行轮廓处理，主体部分用某一纯色填充，并保证非主体部分（即窗体显示挖空部分）的色彩值不能与主体填充色相同。最好做成单色图。
3、把第2步取得的轮廓图用VBA调入窗体背景中，然后用逐行逐象素判断的方法，取得轮廓数据并保存，数据格式为矩形坐标：x1,y1,x2,y2......
4、窗体加载真正原图（非轮廓图），调用第3步预先存储的数据，对窗体实施变形，如此一来，窗体的不规则显示区域与背景一组合，怪异窗口跃然屏幕啦！
有了这个极具个性化的窗体外型，然后在上面放置些控件，加入些代码，来完成些自动化的工作，感觉挺爽，呵呵
放个例子上来，里面有五种界面，都是我从网上随便找的：）
[此贴子已经被作者于 11:27:51编辑过]
阅读权限50
在线时间 小时
阅读权限95
在线时间 小时
同意，酷！
阅读权限10
在线时间 小时
阅读权限30
在线时间 小时
& & & & & & & &
阅读权限20
在线时间 小时
以象素点为矩形，CreatRectRgn 的x1,y1.x2,y2可以为同一值吗？
用CreatRectRgn 和 combinRgn 时 Rect 能否重合？
为何我取了这样一些点后运行发生资源不足的现象，EXCEL 逼迫终止？
阅读权限95
在线时间 小时
TO flli883：
CreatRectRgn 的x1,y1.x2,y2取值可以为x1=x2或y1=y2但二者不能同时相等,CreatRectRgn 必须建立有至少一象素的区域(否则程序尚可执行但显示区域为空,不过此举达到了使窗体隐藏的效果)即当x1=x2时，ABS(y1-y2)>=1；当y1=y2时，ABS(X1-X2)>=1。我专门做了个程序来分析轮廓图片，其中就是按行来取值，如x1,y1,x2,y2===>1,10,1,11这样就取得了一个象素点的显示区域。另外在使用完句柄后一定要及时释放资源，否则运行几次就会发生你所说的EXCEL被迫终止的情况。
[此贴子已经被作者于 7:30:47编辑过]
阅读权限20
在线时间 小时
真的是很棒
阅读权限20
在线时间 小时
& & & & & & & &
谢谢 ldhyob 。
阅读权限10
在线时间 小时
酷。 研究一下再提问题。
最新热点 /1
ExcelHome每周都有线上直播公开课，
国内一流讲师真身分享，高手贴身答疑，
赶不上直播还能看录像，
关键居然是免费的！
厚木哥们都已经这么努力了，
你还好意思说学不好Office。
玩命加载中，请稍候
玩命加载中，请稍候
Powered by
本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！ & & 本站特聘法律顾问：徐怀玉律师 李志群律师您好，欢迎回来
您好，欢迎来到中国供应商！
抱歉，您所查看的页面不存在！
有可能内容已被删除或您输入的网址不正确
您可以或者去
您可能感兴趣的产品
已刷新完所有产品！
想看更多？ 请搜索如何挑选棒球棍_百度知道
如何挑选棒球棍
打架用&&&&&&&&& 铝合金 的好还是 实木的 还是钢的 好， 打家给点建议。我身高167CM&&&& 如果用，& 多少长度的比较合适我
我有更好的答案
　　如何选购　　1.若材质强度高 - 硬度/韧性高，传到球的力道较直接，能量损耗较少，此谓棒子的弹性系数高;　　2.择材质弹性低 - 较硬的东西，就比较不那么flexible，而且回到手掌的震动较大，这可以理解;　　3.在此同时 - 棒子比较耐用不易断。　　球棍的保养　　球 棒木质不比手套皮革娇嫩，倒是木、竹材质都怕湿，保持干爽的细节要注意。新棒会上漆，不只是印logo、讨个亮丽外观，主要能防湿气，如同所有木制品一般。球棒打久会磨擦掉漆，此时更应该注意保存时的防湿。
采纳率：78%
来自团队：
又是一个打架的……我只说我打棒球时对球棍操控性的选择经验，如果能的话就借鉴一下吧。你身高一米六七，看来不会是成年人吧（就算是成年人，也不能用太长的球棍）。另外球棒的选择不仅要考虑身高还要考虑体重。像球队里公用球棍大概在85厘米左右（我这么说你别介意，一米六七打棒球里算矮的了）。体重重的人，球棒不要超过两斤重，普适重量在一斤七两左右。问题是你要打架，对操控性的要求相比更高。按你的身高，球棒长度80厘米妥妥的了……如果要操控性好，合金球棒无疑是首选：重量轻、梆梆地响有气势。名牌球棒的重心会很靠近手柄部分，重心越靠近手部越好（越容易操控）。
本回答被提问者采纳
为您推荐：
其他类似问题
您可能关注的内容
棒球棍的相关知识
换一换
回答问题，赢新手礼包
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。更多频道内容在这里查看
爱奇艺用户将能永久保存播放记录
过滤短视频
暂无长视频（电视剧、纪录片、动漫、综艺、电影）播放记录，
使用您的微博帐号登录，即刻尊享微博用户专属服务。
使用您的QQ帐号登录，即刻尊享QQ用户专属服务。
使用您的人人帐号登录，即刻尊享人人用户专属服务。
热血街舞团之鹿晗王嘉尔选手PK现分歧 陈伟霆宋茜队员内战升级
偶像练习生之9人团出道 导师练习生集体回归泪洒舞台
最强大脑燃烧季之国际赛最终战中日对决 栾雨回归致敬水哥
非诚勿扰之三国迷男嘉宾自称百科全书 女嘉宾游戏技能满点
妈妈是超人3之黄圣依安迪关系渐融洽 嗯哼为霍思燕洗脚超暖心
二十四小时3之推理大师白敬亭上线 熊梓淇魏大勋PK灵魂化妆术}