另一种解决方案是，您可以通过其创建位置编辑块属性，并忽略所有一起更改的属性标记方法。我从VBA Attrib（x）中的这个方法开始，其中x是订单号，我现在有一个VL版本，很好的一点是，你可以用控件更改任何或全部。
- (vl-load-com)
- (setq y 1)
- (setq ss1 (car (entsel)))
- (setq bname (vla-get-name(vlax-ename->vla-object SS1)))
- (setq x (getint "\nEnter line no to pick")) ; change this line in block
- (SETQ newstrblank ".")
- (foreach att (vlax-invoke (vlax-ename->vla-object SS1) 'getattributes)
- (if (= y x)
- (vla-put-textstring att newstrblank)
- )
- )
- (setq y (+ Y 1))
- )
| 
置顶卡
