请教怎么用VBA加载LISP

zoubo604 · 发表于 2011-9-29 11:48:00

我做的VBA,里面要用到LISP,请问怎么用VBA加载LISP.我按照CAD帮助写了下面这句.但是总是弹出一个对话框来,让我手动选择.
我希望它能自动在后台加载.程序前面已添加了支持路径.TC为我的LISP文件名.

ThisDrawing.SendCommand ("_appload " & "tc")

请各位帮我.谢谢!

英雄无敌 · 发表于 2011-10-8 15:51:31

ThisDrawing.SendCommand ("(load " & """" & "tc.lsp" & """" & ") "

zoubo604 · 发表于 2011-10-8 19:27:46

谢谢.我试了一下,好象后面还少括号,或者是少空格.这个命令在提示行输入框里没有发送出去,我在你的指导下,后面加了个括号和""空格,就成功了.再次感谢.
ThisDrawing.SendCommand ("(load " & """" & "tc.lsp" & """" & ")" & " ")

清风明月名字 · 发表于 2012-3-22 10:17:58

谢谢一楼和二楼，确实有效

mycad · 发表于 2013-7-15 16:33:57

顶！！！！！！！！！！

账号		自动登录	找回密码
密码			注册

请教 怎么用VBA加载LISP

请教怎么用VBA加载LISP