cad畫矩形指定的尺寸畫出來不對3篇(autocad怎么畫指定尺寸的矩形)

時間：2022-12-18 21:03:00 綜合范文

　　下面是范文網小編收集的cad畫矩形指定的尺寸畫出來不對3篇(autocad怎么畫指定尺寸的矩形)，供大家品鑒。

cad畫矩形指定的尺寸畫出來不對1

　　VBA 操作多段線畫矩形在 CAD 中使用 VBA 畫多段線閉合的矩形。其實這個多段線圍起來，圍成一個矩形即可。

　　VBA 中多段線是一串點，每個點使用兩個雙精度數(shù)值描述，這些數(shù)值連續(xù)放在數(shù)組中，就用 ThisDrawing.ModelSpace.AddLightWeightPolyline(數(shù)組名)命令畫出一段多段線。畫出矩形，關鍵就是要控制好四個頂點。

　　本次測試中使用一條直線（用于定矩形的方向的基準線）為參數(shù)畫出一個矩形。如果希望控制矩形的寬度，也可以再加其他控制條件。

　　提示用戶畫矩形，選取第一個點（sp，這里的點其實是一個只有兩個元素的數(shù)組）提示用戶畫矩形，選取第二個點（ep）由兩點算這條基準線的長度 l、角度正弦 sina 和角度余弦 cosa l=sqr((sp(1)-ep(1))^2+ (sp(0)-ep(0)^2)) sina=(ep(1)-sp(1))/l cosa=(ep(0)-sp(0))/l 由此可知，第三點坐標 p3（ep（0）+w*(-sina),ep(1)+w*cosa）進而推得第四點 p4（p3(0)+(-cosa)*l,p3(1)+(-sina)*l）最后還要連回第一點，古增加一個 p5，和 sp 同一點。

　　于是這個數(shù)組組建完畢，總共是個數(shù)值，每兩個數(shù)值對應一個點，總共五個點。代碼實現(xiàn)如下：Sub Rectang() On Error GoTo ESC sp = ThisDrawing.Utility.GetPoint(, "起點:") ep = ThisDrawing.Utility.GetPoint(sp, "終點：")l = Sqr((sp(1) - ep(1)) ^ 2 + (sp(0) - ep(0)) ^ 2) sina = -(sp(1) - ep(1)) / d cosa = -(sp(0) - ep(0)) / dDim p(1 To 10) As Double p(1) = sp(0) p(2) = sp(1) ‘第一點 p(3) = p(1) + sl * cosa p(4) = p(2) + sl * sina‘第二點 p(5) = p(3) + sw * -sina’用來放多段線點數(shù)組p(6) = p(4) + sw * (cosa) ‘第三點 p(7) = p(5) + sl * (-cosa) p(8) = p(6) + sl * (-sina) ‘第四點 p(9) = p(1) p(10) = p(2)‘第五點Dim rect(0 To 0) As AcadEntity Set rect(0) = ThisDrawing.ModelSpace.AddLightWeightPolyline(p)ESC: If Err Then MsgBoxErr.Description, vbOKOnly, "錯誤" End Sub

cad畫矩形指定的尺寸畫出來不對2

　　迅捷 CAD 編輯器如何在 CAD 中繪制平面矩形圖形CAD 中，最基本的就是繪制平面圖形，只有經過不斷是訓練才能學好 CAD，那么如何在 CAD 中繪制平面矩形圖形呢？具體要怎么來進行操作？要怎么來進行繪制呢？下面小編就來教教大家在 CAD 中繪制平面矩形的繪制方法，以下就是繪制步驟，想要了解的朋友可以來看看。步驟一：首先，如果小伙伴們電腦中沒有安裝 CAD 編輯器的,在電腦中打開一個瀏覽器，然后在瀏覽器的搜索框中搜索迅捷 CAD 編輯器，在搜索的結果中點擊進入官網，接著點擊下載安裝 CAD 編輯器即可。步驟二：接下來，將 CAD 編輯器進行安裝完成之后，鼠標在點擊該軟件將 CAD 編輯器進行啟動進入到使用界面中。

　　之后在點擊編輯器上方菜單欄中的“繪圖”選項，在繪圖選項的下拉欄中在點擊“平面” 。迅捷 CAD 編輯器步驟三：然后，在編輯器的操作窗口中會彈出一個對話框，在彈出的對話框中我們在點擊選擇“矩形”選項進行繪制。迅捷 CAD 編輯器步驟四:最后，我們就可以使用鼠標進行延展，直到繪制到矩形大小就可以了，繪制完成后在點擊回車鍵。

　　這樣平面矩形圖形就繪制完成。以上就是小編今天給小伙伴們分享的如何在 CAD 中繪制平面矩形的具體操作方法，不會的小伙伴們看過小編操作都學會了嗎？如果還想要了解更多有關擦掉的使用技巧，那就可以在迅捷 CAD“軟件幫助” 中進行查找，能夠幫助到正在學習 CAD 的小伙伴們。