首先你要會基本的cad程式設計啊 畫線的程式碼 幫助裡面都有了！隨便給你找一個直線是 AutoCAD 中最基本的物件。使用者可以建立各種直線—單一直線、帶圓弧和不帶圓弧的多線段。通常，可以透過指定座標點來繪製直線。預設線型是 CONTINUOUS（即連續的線），但還有許多線型使用點和短劃。要建立直線，請使用以下方法之一：AddLine透過兩點建立直線。AddLightweightPolyline從頂點列表建立二維最佳化多段線。AddMLine建立多線。AddPolyline建立二維或三維多段線。標準直線和多線都是在世界座標系的 XY 平面上建立的，而多段線與最佳化多段線則是在物件座標系 (OCS) 中建立的。關於轉換 OCS 座標的資訊，請參見轉換座標。本例使用 AddLightweightPolyline 方法建立一條分為兩段的簡單多段線，其端點座標值分別是 (2,4)、(4,2) 和 (6,4)。Sub Ch4_AddLightWeightPolyline() Dim plineObj As AcadLWPolyline Dim points(0 To 5) As Double " 定義二維多段線的點 points(0) = 2: points(1) = 4 points(2) = 4: points(3) = 2 points(4) = 6: points(5) = 4 " 在模型空間中建立一個最佳化多段線物件 Set plineObj = ThisDrawing.ModelSpace. _ AddLightWeightPolyline(points) ThisDrawing.Application.ZoomAllEnd Sub
首先你要會基本的cad程式設計啊 畫線的程式碼 幫助裡面都有了！隨便給你找一個直線是 AutoCAD 中最基本的物件。使用者可以建立各種直線—單一直線、帶圓弧和不帶圓弧的多線段。通常，可以透過指定座標點來繪製直線。預設線型是 CONTINUOUS（即連續的線），但還有許多線型使用點和短劃。要建立直線，請使用以下方法之一：AddLine透過兩點建立直線。AddLightweightPolyline從頂點列表建立二維最佳化多段線。AddMLine建立多線。AddPolyline建立二維或三維多段線。標準直線和多線都是在世界座標系的 XY 平面上建立的，而多段線與最佳化多段線則是在物件座標系 (OCS) 中建立的。關於轉換 OCS 座標的資訊，請參見轉換座標。本例使用 AddLightweightPolyline 方法建立一條分為兩段的簡單多段線，其端點座標值分別是 (2,4)、(4,2) 和 (6,4)。Sub Ch4_AddLightWeightPolyline() Dim plineObj As AcadLWPolyline Dim points(0 To 5) As Double " 定義二維多段線的點 points(0) = 2: points(1) = 4 points(2) = 4: points(3) = 2 points(4) = 6: points(5) = 4 " 在模型空間中建立一個最佳化多段線物件 Set plineObj = ThisDrawing.ModelSpace. _ AddLightWeightPolyline(points) ThisDrawing.Application.ZoomAllEnd Sub