写了一个程序，当选中标注时，可以将其转换为我想要的任一标注样式（标注样式事先已设置好）。然而当前标注样式不改变，lisp程序如下：
(setq m_temp (getvar "cmdecho"))
(setq m_temp2 (getvar "dimstyle"))
(setq cat(cadr (ssgetfirst)))
(setq ss (ssget "x" (list(cons 0 "DIMENSION"))))
(if cat
(
(command "dimstyle" "r" dog)
(command "dimstyle" "a" ss"")
(command "dimstyle" "r" m_temp2)
)
)

求指导，求指导，画图工真心伤不起。

忘记说了，dog代表更新后的标注样式。

挺费劲的，
—qselect
ctrl+1就搞定了。。你这个还要输函数的变量dog.超级麻烦。没有起到多大的作用。