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

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

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

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

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

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

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