怎样将整张图上的所有mtext改成text？

alin

Remember to set QAFLAGS back to 0. It will affect something else.

my_autocad

QAFLAGS，是什么系统变量呢？管什么的？

Ken934

(command "explode" (ssget "x" \'((0 . "mtext"))) "")

我只能炸掉一个mtext呢？

对以上问题，试试这个
    ThisDrawing.SendCommand "x" & vbCr
    sLispCmd = "(ssget " + """x""" + " '((0 . " + """mtext""" + ")))"
    ThisDrawing.SendCommand sLispCmd & vbCr & vbCr

Ken934

zctao1966

谢谢分享！

xiaoliang200

Ken934

能否解释一下你的代码，不太看得懂，是lisp吗，我到学lisp

lyd2003001

我想知道QAFLAGS这个变量怎么来的？可以告诉我出处吗？不知道alin版主方便说吗？还有最好用中文说。谢谢。