(源码原创)修改块名及插入点 可单独修改单个块参照 也可修改动态块
<p> </p><p></p><p>鄙人混迹于明经通道也有一段时间了,常常开潜水艇,偶尔冒泡向各位大虾请教若干问题,学VBA也不过半年余,只因有感于CAD图形中修改块名及参照点较为常用,而CAD本身自带功能实在不够强劲,所以厚颜写了此段代码,与各位同好共勉</p><p>此段代码的主要功能如下:</p><p>1)修改块名(很普通,实际上用RENAME命令即可达到此功能)<br/>2)修改块插入基准点(实际上只是将块定义中所包含的所有对象移动了一下位置),当然为了防止因为块插入点变化导致图形中所有块参照全部移位,所以还要将图形中的所有同名块全部移动回来<br/>3)修改单个块参照的块名,使之与原本的块定义脱离关系(实际上就是重定义了一个块定义,并插入到同样的位置)<br/>4)又因CAD2006以上加入了动态块类型,所以针对动态块又分为两种改单个块参照的方法,一种是改为普通命名块,另一种是仍为动态块,因为后一种方法需新建图形,运行比较耗时,帮不推荐使用(实际上在2006以上版本中使用"块编辑器"另存一下也可以达到相同的功能</p><p>编程过程中得到了许多同好的帮助,在此表示感谢</p><p>因水平太低,编写中难免存在若干问题,请各位同好帮助测试,若有问题希即时反馈,不胜感谢</p><p>鄙人所用CAD版本为2007,可能在2004中运行会存在问题</p> 学习了。改块名只能改块定义的对象的名称。 如何使用？知道的大神回一下，感谢加载后是输入什么可调用呀 <p>感谢楼主分享！</p><p>可是加载之后怎么使用呢？通过指令还是菜单？</p> <p>顶一下！</p> 楼主太过谦了，代码不论简单或复杂，重要的是实用且能提高操作效率。 请问加载后，如何使用？ 这是怎么用呢？ xieixeixixiexiexie! <p>重在参与 LZ过谦了</p> 下载不了呀 加载后是输入什么可调用呀