新手请较，自动启动宏

iamfang 发表于 2006-11-30 10:52:00

我在ACAD2004.lsp中加入(defun s::startup() (command "_vbarun" "test"))，启动CAD时，总提示“宏名称(M): test 执行错误”。test.dvb放置于CAD根目录还是support目录中，均是如此。test.dvb 内容如下：
Sub a()   MsgBox "this is a test vba" End Sub Sub b()   MsgBox "this is b test vba" End Sub
Sub c()   MsgBox "this is c test vba" End Sub 不知要如何操作，才能正确实现

wyj7485 发表于 2006-11-30 14:06:00

缺少宏
test.dvb!宏

iamfang 发表于 2006-12-1 09:13:00

Thank you，经你一指点，该一问题已解决。
但接下来一个问题，按CAD说法，acad2004doc.lsp这一文件，每打开一个图形文件时，它都执行一次，但时，当我在该文件中加入以下代码时，仅在CAD初次启动时，才执行。但打开一个图形文件时，该代码并不势行。
(defun C:ab()      (setvar "cmdecho" 0)      (command "-vbarun" "test.dvb!模块1.a")      (setvar "cmdecho" 1) (princ) )
 我的想法是，启动CAD后，每次打开一个图形文件时，都自动执行我的程序。不知如何实现。敬请高手给予解答！！！！

wyj7485 发表于 2006-12-1 10:41:00

直接加入(command "-vbarun" "test.dvb!模块1.a") 就可以了,上面的代码只是加载一个命令,并不执行程序

iamfang 发表于 2006-12-1 14:25:00

原来如此，明经上的高手真多，非常感谢！！！

页: [1]

明经CAD社区's Archiver

新手请较，自动启动宏