|
经典图书 看论坛上总有人问SolidWorks机械工程师论坛能不能画方程曲线,这里我给出一个例子,算是抛砖引玉吧.机械工程师论坛机械工程师论坛机械工程师论坛
PRO/E从UNIX下移植过来的,不是标准的WINDOWS程序,当然要单独的方程曲线功能.solidworks是典型的WINDOWS程序,内置VBA,还有强大的API接口,所以没有单独的方程曲线功能.其实只要捎加开发就能作出方程曲线,岂不比PRO/E强大方便.
Dim swApp As Object
Dim Part As Object
Dim x As Double
Dim y As Double
Sub main()
Set swApp = Application.SldWorks
Set Part = swApp.ActiveDoc
Part.InsertCurveFileBegin
For x = -10 To 10 '横坐标的取值范围
y = Sin(x) '这里输入方程式
Part.InsertCurveFilePoint x, y, 0 '横坐标 纵坐标 Z坐标 这里我取0
Next
Part.InsertCurveFileEnd
End Sub |
|