高手帮我看下程序，关于dwg文件激活的问题

如题：程序如下

(vl-load-com)
(setq filestr "d:/hisin.dwg")
(setq newdoc (vla-open (vla-get-documents (vlax-get-acad-object)) filestr))
(vla-activate newdoc)
(setvar "cmdecho" 0) 等代码
.......

为甚麽激活文件 "d:/hisin.dwg"后即执行语句(vla-activate newdoc)后面得代码无法执行，只能人工操作新打开的文件