求助vba加载lsp的代码

新鲜8

求助vba加载lsp的代码


想在运行vba代码   加载调用出lsp程序
高手解析

vbcad

可以使用 SENDCOMMAND lsp文件名 +回车
这个方法需要文件放在CAD安装的指定目录
如果需要加载任意目录地lsp文件要把文件名加上引号

新鲜8

vbcad 发表于 2017-9-14 17:42
可以使用 SENDCOMMAND lsp文件名 +回车
这个方法需要文件放在CAD安装的指定目录
如果需要加载任意目录地l ...

本人太笨了有例子吗给发一个，谢谢！

vbcad

以CAD 2006举例 ，操作系统为XP，Lsp文件名为“test.lsp”
假如CAD默认安装 ，把test.lsp文件放到“C:\Program Files \AutoCAD 2006\Support“目录下
先测试一下lsp是否正常，打开CAD 2006 。输入test命令，就可以了。
如果操作系统是win7x64位，在C:\Program Files (x86)\AutoCAD 2006\Support

Sendcommand语句就是发送操作命令的语句，如果你是在CAD中的VBA编程环境中，输入下面的语句：
ThisDrawing.Sendcommand "test" &chr(13)
这个就象你在CAD的命令行中输入一样，输入了“TEST“，chr（13）是回车键的代码，当然，CAD支持空格代表回车键，所以，你输入ThisDrawing.Sendcommand "test "，也是一样的效果，注意：test后面有一个空格。

这是个很简单、很基本的语句，估计没有人愿意讲解这么简单的东西。
在顶楼的帖中有编程参考“明经翻译的《ActiveX 和 VBA 参考》(对象模型)免费下载〉“，非常好，一定要下载看看，有详细的例子（包括刚刚说的这个语句的例子），绝大部分的问题都能自己解决。
如果想学好VBA，建议少问，多看看教程，不懂得时候再看一遍教程，如果还不懂，可以把所有帖子都看一遍，实在没有办法的时候再问。
如果实在要提问，也不要一上来就说有没有高手（大神）会写某某代码。