iCAx开思网

标题: solidworks画方程曲线 [打印本页]

作者: bosser 时间: 2005-6-14 12:13
标题: solidworks画方程曲线
看论坛上总有人问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

作者: yf_hmily 时间: 2005-6-14 13:02
顶顶顶顶顶顶顶顶顶顶！
多谢搂主的教导，正在研究VBA！
有行语句不懂！
Set Part = swApp.ActiveDoc （请教，解释一下^_^！）

另外，楼主能不能做几个例子来！
比如机坐标，柱坐标，球坐标！
各样只举实例就好了！

作者: yf_hmily 时间: 2005-6-14 13:05
好像楼主是回答过我的椭圆问题哦！
在谢谢你一次！

作者: smltiger 时间: 2005-6-14 13:08
謝謝分享...................

作者: xiongdiwei 时间: 2005-6-14 13:40
看来又是一个高人在这里

作者: bosser 时间: 2005-6-14 17:23

yf_hmily wrote:
顶顶顶顶顶顶顶顶顶顶！
  多谢搂主的教导，正在研究VBA！
  有行语句不懂！
  Set Part = swApp.ActiveDoc （请教，解释一下^_^！）
  
  另外，楼主能不能做几个例子来！
  比如机坐标，柱坐标，球坐标！
  各样只举实例就好了！

solidworks不支持极坐标的,可以转化为直角坐标系嘛. Set Part = swApp.ActiveDoc 建立一个PART对象,不必管吧,每个VBA都有这一句的.

作者: 赵洵 时间: 2005-6-16 11:17
楼主太高人了

作者: insz 时间: 2005-6-16 16:54
谢谢！

作者: river-rock 时间: 2008-10-22 08:46
SW09版里可以自定义方程来画曲线

作者: sijun 时间: 2008-10-22 08:57
好高深啊,听不懂,看不懂,

作者: 龙行天下 时间: 2008-10-22 15:13
谢谢这个红。

作者: sunriseme 时间: 2008-10-22 21:56
很有用的教程啦·
顶一个啊

作者: crtr 时间: 2008-10-23 09:26
楼主好高呀,有三四楼那么高.

作者: xingji 时间: 2012-10-5 17:06
太高深了，看不懂

作者: kendrv 时间: 2012-10-12 13:56
支持~學習sw二次開發支方程曲線

作者: 一紧张锦章就到 时间: 2013-5-14 21:03
方程组不知道如何篇，请指教。

欢迎光临 iCAx开思网 (https://www.icax.org/)