Question

CAD中VBA二次开发

在CAD中如何用VBA做一个像Offset命令那样，用鼠标点来确定偏移方向？

Answer 1

这个要求你得说清楚，因为在CAD中,当你偏移某条曲线时,曲线并不是简单的在另一个地方复制,而是所有的点都位于原线对应点的法线上.所以,对于某些曲线,可能偏移后于某点处无法线,即线于该处将断开.所以,你说的与OFFSET相似的命令的含义不清楚,是不是可以要求对任意图形包括实体在内,如果是这样,我感到可以用复制命令.如果你只是想再现OFFSET,则有点难,因为:首先在根据线型调用不同的函数,不同的线型有不同的构成方法,然后得到各个节点的法线方向后才能实现.一条270度包含角的曲线,其一侧的法线方向是朝多个方向变化的,太麻烦了,我估计没有十页纸做不下来.

Answer 2

您好，这样的：
VB,VBA或其它工具如c#，C++等都是利用AutoCAD提供的ARX接口进行开发
VB开发的程序相对独立，不能查看源码；运行速度一般；可能会因为CAD正在运行的命令或其它冲突！
VBA必需集成于CAD之下，源代码可以被看到，运行速度快；运行错误率更低！
AutoCAD 64版本，在安装使用VBA后（CAD2010及以后版本需单独安装）；保存低版本会很慢；需要等上约30秒左右！
如果你是初学开发，个人建议学习VBA（就是学习CAD的ARX接口用法），不用引用，调试很快；在CAD开发人员帮助文件中有很详细的帮助说明!学会VBA后，可以很轻松的转到VB，c#等其它工具进行开发！

Answer 3

同意楼上，想要自己做offset的效果是很复杂的，你可以试下这个(用VBA调用lisp语句),其中pause表示等待用户输入，在这个例子里表示由用户鼠标点取便宜方向。
ThisDrawing.SendCommand "(command ""_.offset"" 5 (entlast) pause)" & vbCr