vla-getBlockAttributeValue是什么东西？
本帖最后由 作者 于 2008-12-23 11:49:09 编辑以下代码是在国外一个论坛里找的，运行无误。(DEFUN C:ww ()
(setq ent_blk (ssget '((0 . "MULTILEADER"))));CAD2008以上版本的多重引线
(setq N 0)
(repeat (sslength ENT_blk)
(setq ent (ssname ENT_blk N))
(setq ed (entget ENT))
(foreach item ed
(if (= (car item) 330)
(setq attnamelst (cons (vlax-ename->vla-object (cdr item)) attnamelst))
)
)
(setq vname (vla-getBlockAttributeValue (vlax-ename->vla-object ent)(vla-get-objectid (nth 2 attnamelst))))
(alert VNAME)
(setq N (1+ N))
)
)
里面有个vla-getBlockAttributeValue，但在网上找不到它的资料
它能取得多重引线里面的属性块的一个属性值
是个什么东西？
参考VBA函数
页:
[1]