請問 用cad 怎樣畫正弦曲線？

qucong

謝謝大家了，如果可以的話 還有其一些變形的圖形

sxyxs13754

excel生成點(diǎn)數(shù)據(jù)，cad中使用樣條曲線命令就ok了！

qucong

如果單純使用cad呢？不用excell。

寂靜天花板

那就做螺旋線,然后投影

qucong

可不可以說的具體點(diǎn)？先謝謝了~~~

cm272

寂靜天花板 發(fā)表于 2012-3-2 17:11
那就做螺旋線,然后投影

) l. d7 i4 E! R: y( O, d我也請教一下，不知怎樣進(jìn)行投影操作

萬戶門徒

小學(xué)講正玄曲線曲線的過程，看懂這個(gè)圖你就明白了
( S5 H- [1 O. @9 {6 [2 `  Y; o3 W

zzp6444

Sub sinl()
  I4 c/ }1 Q# P- TDim p(0 To 719) As Double '定義點(diǎn)坐標(biāo)
- H  F- W6 _: k6 @. f; {For i = 0 To 718 Step 2 '開始畫多段線
    p(i) = i * 2 * 3.1415926535897 / 360 '橫坐標(biāo)
% z4 S/ [! i3 t1 T2 |- \    p(i + 1) = 2 * Sin(p(i)) '縱坐標(biāo)
Next i
ThisDrawing.ModelSpace.AddLightWeightPolyline (p) '畫多段線
ZoomExtents '顯示整個(gè)圖形
End Sub

金牌小色狼

zzp6444 發(fā)表于 2012-3-13 17:02
: p' a) h6 M1 R) J! I% q+ uSub sinl()
Dim p(0 To 719) As Double '定義點(diǎn)坐標(biāo)
) [& N7 R% a/ T7 g" C& B6 q- V) `For i = 0 To 718 Step 2 '開始畫多段線

& k2 u9 {& a' P: j4 b高手{:soso_e179:}
/ m6 \. o+ S& `! n7 g3 U