感谢大家的回复 就是因为只用了一个setvar就觉得程序有点滞后,才上来问问的 我按nonsmoll的方法试了一下,但运行时间似乎比setvar还要长一点 (defun c:t3(/ tim cadobj doc) (setq tim (* 1000000000 (getvar "cdate"))) (setq cadobj (vlax-get-acad-object)) (setq doc (vla-get-activedocument cadobj)) (repeat 500 (vla-setvariable doc "osmode" 0) ) |