《选择多段线内部对象·Vba pro》注解 2013-08-15

'从网上找来的 《选择多段线内部对象》写得非常好，我补充些注解，并增加了如果不闭合的轻量多段线用包围盒选择 '拾取对象 Sub gHH()   Dim selobj As ...

(334)次阅读|(0)个评论

改改"-array" 2013-07-02

;;-array的稍改 (defun c:ay()   (setq  s  (ssget)          p1 (getpoint"单元格")  &nbs ...

(274)次阅读|(0)个评论

显示角度距离 2013-06-11

;; (defun c:tt()    ( setq  a  t              bl (getreal"输入比例尺:  ")    ...

(224)次阅读|(0)个评论

文字和标注线分离时 2013-05-21

;有的软件作用的尺寸经常是文字和标注线分离的, 文字合入标注 (vlax-put-property (vlax-ename->vla-object (car(entsel"尺寸"))) 'TextOverride (vlax-get-pr ...

(275)次阅读|(0)个评论

有关炸开线的问题 2013-05-21

有些软件作的线有厚度，查看后发现是扩展过的线，不支持修剪，炸开线后有三根，中间一根在作图平面上，可修剪了但常选择了上下两根， 作图平面因没有边界不能修 ...

(254)次阅读|(0)个评论

等间距均布两选择集 _修改 2013-05-21

;;等间距均布两选择集 1用户给一个 间距 ，2选择两个选择集，移动第二个选择集块插入点到根据第一个插入点计算的位置  ;;有空思考下为什么做块时出 ...

(311)次阅读|(0)个评论

查看更多