把一个d:\123.dvd和一个LISP编成一个123.vlx 加载123.vlx运行不了123.dvd ,我再加载123.dvd就可以运行tt 然后执行123.dvd,不知为什么
LSP为:
(defun c:tt()
(command "vbarun" "123" "123")
(princ))
public sub 123()
dim a as acadcircle
dim b(1) as double
b(0)=10
b(1)=10
thisdrawing.modelspace.addcircle b,10
end sub |