明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 1589|回复: 4

如何在autocad将一组二维坐标点连接成线段

[复制链接]
发表于 2008-6-5 07:47:00 | 显示全部楼层 |阅读模式

如果有一个文档,里面是一些二维坐标,如何将这些点在AutoCAD里显示出,并且将它们依次连接成线段呢?大家能不能给点思路,或者例子

谢谢大家了

发表于 2008-6-5 08:14:00 | 显示全部楼层
看看创建多段线的的帮忙。
发表于 2008-6-5 08:18:00 | 显示全部楼层
如楼上所说,VBA有这方面的例子
 楼主| 发表于 2008-6-5 21:51:00 | 显示全部楼层
谢谢上面两位的回复,我看过帮助里的这段程序,但是不太懂。他的意思是连接点吗(4,7,0) (5,7,0) (6,7,0) (4,6,0) (5,6,0) (6,6,6),但是程序运行后在autocad里显示不是这样。

AddMLine 示例 [明经通道 ActiveX 和 VBA 参考: AAR]
Sub Example_AddMLine()
   ' 该示例在模型空间中添加多线。

    Dim mLineObj As AcadMLine
    Dim vertexList(0 To 17) As Double
   
    ' 定义新对象的数据
    vertexList(0) = 4: vertexList(1) = 7: vertexList(2) = 0
    vertexList(3) = 5: vertexList(4) = 7: vertexList(5) = 0
    vertexList(6) = 6: vertexList(7) = 7: vertexList(8) = 0
    vertexList(9) = 4: vertexList(10) = 6: vertexList(11) = 0
    vertexList(12) = 5: vertexList(13) = 6: vertexList(14) = 0
    vertexList(15) = 6: vertexList(16) = 6: vertexList(17) = 6

    ' 在模型空间中创建多线
    Set mLineObj = ThisDrawing.ModelSpace.AddMLine(vertexList)

    ThisDrawing.Application.ZoomAll
    
    MsgBox "已经在当前图形中添加了新的多线对象。"
End Sub

发表于 2008-6-9 22:59:00 | 显示全部楼层

LZ指的是二维坐标点哈,是不是要看看AddLWPolyline的帮助呢?

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-11-26 08:38 , Processed in 0.169288 second(s), 24 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表