Imports Autodesk.AutoCAD.Runtime

Imports Autodesk.AutoCAD.ApplicationServices

Imports Autodesk.AutoCAD.DatabaseServices

Imports Autodesk.AutoCAD.Geometry

<CommandMethod("AddLightweightPolyline")> _

Public Sub AddLightweightPolyline()

  '' 获得当前文档和数据库   Get the current document and database

  Dim acDoc As Document = Application.DocumentManager.MdiActiveDocument

  Dim acCurDb As Database = acDoc.Database

  ''启动一个事务   Start a transaction

  Using acTrans As Transaction = acCurDb.TransactionManager.StartTransaction()

      '' 以只读方式打开块表   Open the Block table for read

      Dim acBlkTbl As BlockTable

      acBlkTbl = acTrans.GetObject(acCurDb.BlockTableId, OpenMode.ForRead)

      '' 以写方式打开模型空间块表记录   Open the Block table record Model space for write

      Dim acBlkTblRec As BlockTableRecord

      acBlkTblRec = acTrans.GetObject(acBlkTbl(BlockTableRecord.ModelSpace), _

                                      OpenMode.ForWrite)

      '' 创建一条有两段的多段线   Create a polyline with two segments (3 points)

      Dim acPoly As Polyline = New Polyline()

      acPoly.SetDatabaseDefaults()

      acPoly.AddVertexAt(0, New Point2d(2, 4), 0, 0, 0)

      acPoly.AddVertexAt(1, New Point2d(4, 2), 0, 0, 0)

      acPoly.AddVertexAt(2, New Point2d(6, 4), 0, 0, 0)

      '' 添加新对象到块表记录和事务中   Add the new object to the block table record and the transaction

      acBlkTblRec.AppendEntity(acPoly)

      acTrans.AddNewlyCreatedDBObject(acPoly, True)

      '' 保存新对象到数据库中   Save the new object to the database

      acTrans.Commit()

  End Using

End Sub

using Autodesk.AutoCAD.Runtime;

using Autodesk.AutoCAD.ApplicationServices;

using Autodesk.AutoCAD.DatabaseServices;

using Autodesk.AutoCAD.Geometry;

[CommandMethod("AddLightweightPolyline")]

public static void AddLightweightPolyline()

{

  // 获得当前文档和数据库   Get the current document and database

  Document acDoc = Application.DocumentManager.MdiActiveDocument;

  Database acCurDb = acDoc.Database;

  // 启动一个事务  Start a transaction

  using (Transaction acTrans = acCurDb.TransactionManager.StartTransaction())

  {

      // 以只读方式打开块表   Open the Block table for read

      BlockTable acBlkTbl;

      acBlkTbl = acTrans.GetObject(acCurDb.BlockTableId,

                                   OpenMode.ForRead) as BlockTable;

      // 以写方式打开模型空间块表记录   Open the Block table record Model space for write

      BlockTableRecord acBlkTblRec;

      acBlkTblRec = acTrans.GetObject(acBlkTbl[BlockTableRecord.ModelSpace],

                                      OpenMode.ForWrite) as BlockTableRecord;

      // 创建一条有两段的多段线   Create a polyline with two segments (3 points)

      Polyline acPoly = new Polyline();

      acPoly.SetDatabaseDefaults();

      acPoly.AddVertexAt(0, new Point2d(2, 4), 0, 0, 0);

      acPoly.AddVertexAt(1, new Point2d(4, 2), 0, 0, 0);

      acPoly.AddVertexAt(2, new Point2d(6, 4), 0, 0, 0);

      // 添加新对象到块表记录和事务中   Add the new object to the block table record and the transaction

      acBlkTblRec.AppendEntity(acPoly);

      acTrans.AddNewlyCreatedDBObject(acPoly, true);

      // 保存新对象到数据库中   Save the new object to the database

      acTrans.Commit();

  }

}