[求助]如何在cad启动后自动运行vba工程(带窗体)
VBA工程可以利用LISP来调用执行,而LISP程序可以在启动时加载运行
另外一个办法:在acad.dvb中输入call yourmacro,然后拷贝到acad2000\surport下即可
如何写这个LISP程序呀
应该是这样
(defun c:你的函数名()(startapp "你的程序名 ")
)
有误,上面写的是VB的调用,下面的才是VBA的调用
将以下程序段写在acad2000doc.lsp中:(defun c:名称() ;要在命令行执行的命令名称
(setvar "cmdecho" 0)
(command "-VBARUN" "VBA工程名称.dvb!模块名.过程名")
(setvar "cmdecho" 1)
(princ)
)
如:
(defun c:chgarr()
(setvar "cmdecho" 0)
(command "-VBARUN" "chgarr.dvb!chgarr.chgarr")
(setvar "cmdecho" 1)
(princ)
)
这样调用的是过程,如果调用一个窗体怎么办
窗体要通过过程来调用,写一个过程吧
userForm1.show 如果不复制到支持目录下可以在ACAD2005.LSP加入:<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt">(command "-vbarun" "d:\\**\\**.dvb!模块名.过程名")
页:
[1]
2