基于SolidWorks型钢库的建立

2008NO.06

SCIENCE&TECHNOLOGYINFORMATION科技资讯

基于

SolidWorks

型钢库的建立

辽宁沈阳

110000）

王智永

（三一重型装备有限公司研究院

摘要：本文阐述了利用VB6.0作为开发工具，进行SolidWorks的二次开发。使用参数化设计方法，对同一系列的型钢进行归纳，借助SolidWorks强大的三维绘图功能，开发出实用的型钢库。通过对话框实现人机交互，省去了频繁重复的建模工作，提高了三维图的绘制效率。关键词:SolidWorks三维绘图型钢库机械设计领域中图分类号：TU1文献标识码：A文章编号：1672-3791(2008)02(c)-0067-01

1引言

在当今的机械设计领域，SolidWorks等三维绘图软件得到了广泛的应用。利用其强大的绘图功能和开放的体系结构，使用高级语言设计程序来实现三维模型的参数化设计，提高了三维设计的自动化水平，减少了零件的设计时间。型钢是目前工业上大量使用的材料，一般同一系列的型钢都具有相似的形状，在高级语言中设置适当的变量和合理的计算方法就可以运用SolidWorks软件平台自动绘制符合标准的三维模型。通过友好的对话界面，设计人员只需要输入必要的数据就可以完成型钢的建模。

常用的型钢包括：角钢、槽钢、T型钢、H型钢和工字钢等。

2角钢库的建模

角钢库的人机对话窗口如图所示：

在编写程序之前先分析具体的实施步骤：在草图中绘制角钢截面，拉伸草图实现三维建模。显然本例的主要工作是绘制草图，而该图形由直线段和圆角组成，所以草图的绘制分为两个阶段，即绘制线段和绘制圆角。先绘制如图所示的线段图形。

然后按标准要求圆角，完成的草图如

(\"Line4\",\"SKETCHSEGMENT\d/下:

1000,(a+d)/2000,0,False,1,Nothing)

boolstatus=Part.Extension.SelectByID(\"Line3\\"SKETCHSEGMENT\(d+b)/2000,d/1000,0,True,1,Nothing)

Part.SketchFillet2r/1000,1…...

这样草图的绘制程序就编写完成了。运用拉伸函数“Part.FeatureManager.FeatureExtrusion”来完成最后的实体建模。运行的结果如图所示：

3其他型钢库的建模

其他型钢的建模方式与本例相似，根据相关标准找出同一系列型材的相似之处，适当地设置变量和通过简捷、高效的算法在草图部分绘制直线和圆角，然后调用拉伸函数相应的程序设计如下。完成三维实体建模。在草图绘制的程序当中定义变量：

最应该注意的是：当图形的点过于集中时就DimaAsSingle'长边宽度变量会出现运行错误，应该尽量地避免之。

DimbAsSingle'短边宽度变量DimdAsSingle'边厚度变量

4结语

DimrAsSingle'内圆弧半径变量SolidWorks具有开放的体系结构，支持DimlAsSingle'拉伸长度变量多种高级语言，为参数化设计提供了很好的定义对象：

开发平台，是目前最优秀的三维工程设计软SetswApp=Application.SldWorks件之一。通过参数化设计不但省去了繁琐的SetPart=swApp.ActiveDoc草图绘制、建模等工作，节省了大量的人力和开始绘图：

工作时间。也使得三维模型更加准确，精度更Part.InsertSketch2True

高。

boolstatus=Part.Extension.SelectByID(\"前视基准面\\"PLANE\0,0,0,False,参考文献

0,Nothing)

[1]东箭工作室,VisualBasic中文版程序设

线段的绘制：

计.北京:清华大学出版社,2002.

Part.CreateLine20,0,0,b/1000,[2]江洪,魏峥,王涛威等.SolidWorks二次

0,0

开发实例解析.北京:机械工业出版社,Part.ViewZoomtofit2'屏幕显示调整2004.

Part.CreateLine2b/1000,0,0,b[3]成大先等.机械设计手册.北京:化学工

/1000,d/1000,0

业出版社,2002.

Part.CreateLine2d/1000,d/1000,0,b/1000,d/1000,0

Part.CreateLine2d/1000,d/1000,0,d/1000,a/1000,0

Part.CreateLine20,a/1000,0,d/1000,a/1000,0

Part.CreateLine20,0,0,0,a/1000,0

在完成以上直线绘制程序之后，需要进一步编写圆角部分，

boolstatus=Part.Extension.SelectByID

科技资讯SCIENCE&TECHNOLOGYINFORMATION67