yuangw1234 发表于 2006-9-26 11:34:00

用Vba發(load "acad.lsp")失敗

<P>本人想用vba在命令行发命令(load "acad.lsp"),做了以下vba程式，可是红色部分老提示必须是陈述句结尾，请高手指点，帮忙修改一下，可能是load本身就是一个函数的原因</P>
<P>Sub ld()<BR>Dim cmd As String<BR><FONT color=#ff3300>cmd = "(Load&nbsp; "acad.lsp")" &amp; vbcr<BR></FONT>ThisDrawing.SendCommand cmd<BR>End Sub<BR></P>

yuangw1234 发表于 2006-9-27 20:15:00

这地主另我开始有点失望，好多次了，简单的问题都没人愿意回答，版主呢？

mccad 发表于 2006-9-28 08:19:00

<P>1.希望你多看一下VBA基础的书，因为在出错的那句中，字符串中的引号必须用两个引号来代替，如cmd = "(Load&nbsp; ""acad.lsp"")" &amp; vbCr</P>
<P>2.acad.lsp文件并不需要手动加载，只要它在ACAD的支持目录下，则会自动加载。</P>
页: [1]
查看完整版本: 用Vba發(load "acad.lsp")失敗