[日积月累]：工作中随手编的小程序，不断更新中。2006.7.7共28个。最新程序:文字增减

柔柔

那个textcut不错，过去我曾编过相反的，看了这个受到启发，准备合二为一。

狂刀

textcut需要的编程技巧要高一些

841594

第8个：
定层offset，
在晓东空间里看到过类似的程序，想用的时候一时找不到，就自己写一个。
启动命令：offsetlayer
使用步骤与offset很相似，只是前面多一个选层的选项，拾取一个目标层上的物体就可以了。
用它画过屋顶平面的女儿墙，省了不少事。

20051026：改进了距离指定方式。

841594

实例：

841594

9: 图块的随机放缩、旋转
某些阵列物体如树木之类，随机处理一下会不那么呆板。

841594

示意：

841594

最初由 tiansong 发布
[B]不知道有没有VBA版本的 [/B]

没有，我不会用vba编程:-)
第10个：均列文字
把不整齐的text实体按中心点上下整齐排列。

841594

示意：

841594

第11个：物体边对齐
以前编写过让文字在表格中居中的命令，这样形成的结果是所有文字中间对齐，而有时候需要向左边对齐的结果。
于是作此程序，解决了向左对齐的问题，也捎带实现了向上、下、右对齐，而且适用于文字以外的其他对象类型。
程序的使用步骤很简单，应该算得上动态和傻瓜吧。

841594

动画：

841594

第12个：直线切断。
给定2个点，切断经过的各种线条物体。

841594

演示：

狂刀

一般测试打断程序，以下两个是必备的测试实体：
1 多义线折线
2 spline
打断程序的打断路径多次穿越同一个多义线，或spline，能打断成多个才合格

841594

最初由 狂刀 发布
[B]一般测试打断程序，以下两个是必备的测试实体：
1 多义线折线
2 spline
打断程序的打断路径多次穿越同一个多义线，或spline，能打断成多个才合格 [/B]

此话不错！正式的通用程序应该满足这个标准。
不过这类随手程序不一定要求太高，虽然未能解决全部问题，还是有一定使用价值的。这也是创建这一贴的目的。
具体到这一条程序，需要改的地方还不少，慢慢来吧。

841594

zydno46:
编程方面的一些粗浅体会：
1。循序渐进，从简单的东西做起。
2。针对自己的实际需要，不一定要钻的很深。
3。书是必须要看的，努力对各种函数理解深入一些。
4。技巧需要积累，多看别人的程序。
5。加深对cad的理解，掌握cad的技巧也很重要。
希望能有所帮助。
学会编程不难，但是要达到较高的水平，需要下不少功夫。
我学编程的年头很长了，不过一直断断续续的，我想如果你很下功夫去学的话，大概半年到一年就能超过我的水平吧。