我想炸开插入后的参照，提示未知名称：explode，请帮我看看哪里错误

bloodtempt

• (vlax-for x #blocks
•   (if (= :vlax-true (vla-get-isxref x))
•     (progn
•       (setq blockname (vlax-get x 'Name))
•       (vla-Bind x :vlax-true)
•         (vla-explode (vla-item #blocks blockname))
•     )
•   )
• )
  

烟盒迷唇

缺少vl-load-com吧

masterlong

你想炸块定义当然炸不了撒