cad
畫漸開線
1.進入選單工具巨集
>visual basic
編輯器2.
在編輯器中選選單
插入模組
3.把這部分程式拷貝到(**)視窗中
4.選擇選單:執行
執行子過程使用者窗體5.在
autoacad
繪圖介面中可以看到結果
sub jkx()
rem繪製漸開線
,by sdh,2006-6-8
dim d as double '
節圓直徑
dim r as double '
節圓半徑
dim a as double '
總展開角度
dim ai as double '
展開角度
dim li as double '
展開弧長
d = 100
a = 360
r = d / 2
dim pnt1(2) as double
dim pnt2(2) as double
dim pntlst() as double, n as integer
thisdrawing.modelspace.addcircle pnt1, r
for ai = 0 to a * atn(1) / 45# step atn(1) / 45#
li = r * ai
pnt1(0) = r * sin(ai)
pnt1(1) = r * cos(ai)
pnt2(0) = pnt1(0) - li * cos(-ai)
pnt2(1) = pnt1(1) - li * sin(-ai)
thisdrawing.modelspace.addline pnt1, pnt2
n = n + 1
redim preserve pntlst(n * 2 - 1)
pntlst(n * 2 - 2) = pnt2(0)
pntlst(n * 2 - 1) = pnt2(1)
next
if n > 1 then
thisdrawing.modelspace.addlightweightpolyline pntlst
end if
end sub
cad漸開線齒輪輪廓繪製 CAD繪製齒輪實體二
一 嘉灝一起學今天分享給親們第二十八課零基礎學cad繪製齒輪實體二,選擇 檢視 新建ucs 原點 命令,將位於齒輪左端麵的圓心作為新ucs的原點,選擇 檢視 三維檢視 平面檢視 當前ucs 命令,在已有齒輪的側繪製圖中所示的輪廓圖 具體繪製過程請參考前而的繪製方法,這裡不再贅述 選擇 修改 物件 多...
漸開線齒輪
知識如果一段時間不用的話難免忘記,寫下這一段文字可以快速回憶渦輪蝸桿的知識。蝸輪和蝸桿的分度圓所在的面相互垂直並且蝸輪分度圓和蝸桿分度圓有且僅有乙個交點,分度圓直徑相互呈90 該知識點直接點明了蝸輪蝸桿的垂直定位關係,在creo裝配中是非常有用的 蝸桿是用螺旋掃瞄來生成的,生成的步驟簡單,但是涉及幾...
如何繪製方形漸開線
方形漸開線 方形漸開線是指 由一點向外擴散的方形線 具體思路 先確定乙個點座標,之後自行決定點的起始方向。之後,我們假設這個點的運動規則是 上 右 下 左 那麼,一次輪迴就是四次,一次輪迴就是一圈。我們即可找到規律 當方向向上的時候,移動一格 當方向向右的時候,移動一格 當方向向下的時候,移動兩格 ...