没有这样的事吧,可以用VB开发CAD,也是要建立在CAD平台上!

只是用vb编制了一个小程序，生成了图像，之后想把图像在autocad打开，仅此而已~~~
谢谢您的回复~~~~~~~~~~~

是啊 看看vba开发帮助就好了
Sub Example_AppendVertex()
’ This example creates a polyline in model space.
’ It then appends a vertex to the polyline.

Dim plineObj As AcadPolyline
Dim points(0 To 14) As Double


’ Define the 2D polyline points
points(0) = 1: points(1) = 1: points(2) = 0
points(3) = 1: points(4) = 2: points(5) = 0
points(6) = 2: points(7) = 2: points(8) = 0
points(9) = 3: points(10) = 2: points(11) = 0
points(12) = 4: points(13) = 4: points(14) = 0

’ Create a lightweight Polyline object in model space
Set plineObj = ThisDrawing.ModelSpace.AddPolyline(points)
ZoomAll
MsgBox "Append the vertex 4, 1, 0.", , "AppendVertex Example"

Dim newVertex(0 To 2) As Double
newVertex(0) = 4: newVertex(1) = 1: newVertex(2) = 0
plineObj.AppendVertex newVertex
ZoomAll
MsgBox "The vertex 4, 1, 0 as been appended.", , "AppendVertex Example"

End Sub

可以自动拾取插入点 和cad菜单命令一样的效果 只是没有橡皮条而已

谢谢。:lol :lol :lol

可以在excel中输入x，y坐标，生成坐标点对，在cad中用多段线或样条曲线绘出。
也可以用cad vba调用excel中的x，y坐标，在cad中画线。

真是好东西，我们希望能够提供较好的东东供大家参考，并作出不懈的努力！