我只能炸掉一个mtext呢?
对以上问题,试试这个
ThisDrawing.SendCommand "x" & vbCr
sLispCmd = "(ssget " + """x""" + " '((0 . " + """mtext""" + ")))"
ThisDrawing.SendCommand sLispCmd & vbCr & vbCr
Ken934 谢谢分享!
Ken934
<p><strong><font face="Verdana" color="#61b713">Ken934</font></strong></p><p><strong><font face="Verdana" color="#61b713">能否解释一下你的代码,不太看得懂,是lisp吗,我到学lisp</font></strong></p> 我想知道QAFLAGS这个变量怎么来的?可以告诉我出处吗?不知道alin版主方便说吗?还有最好用中文说。谢谢。
页:
1
[2]