社区 › VB › [求助]如何在cad启动后自动运行vba工程(带窗体)

yujn_1 发表于 2002-9-29 15:32:00

[求助]如何在cad启动后自动运行vba工程(带窗体)

dbczhaoy 发表于 2002-10-16 08:33:00

（defun c:你的函数名（）
（startapp "你的程序名 "）
）

dbczhaoy 发表于 2002-10-20 10:21:00

将以下程序段写在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)
)

pckite 发表于 2004-6-14 10:30:00

userForm1.show

gzy 发表于 2004-6-14 11:20:00

如果不复制到支持目录下可以在ACAD2005.LSP加入：
(command "-vbarun" "d:\\**\\**.dvb!模块名.过程名")

查看完整版本: [求助]如何在cad启动后自动运行vba工程(带窗体)