怎么样切换标注样式

llp0420

新建了 几个标注样式  怎么切换？ acdbHostApplicationServices()->workingDatabase()->setDimstyle(dIdm);  用他设置成替代样式 希望大师指点啊

my258

(defun c:dd1 ()
(command "-DIMSTYLE" "R" "副本-1");副本-1 样式名自行修改
(princ "\n当前标注样式:副本-1")
(princ)
)