冲裁力与压力中心计算机辅助设计

冲裁力与压力中心计算机辅助设计摘要：计算机辅助设计（CAD）技术起步于上世纪50年代后期，经过半个多世纪的发展，目前国内外已研发出许多通用的CAD软件。冲裁模的压力中心计算是否准确对于模具结构设计非常重要。随着计算机辅助设计技术（CAD）的进步，使用计算机自动计算冲裁件冲裁力和压力中心，已经日益成为冲压模具设计的必然趋势。在本文中，研究了基于VB环境下的压力中心CAD系统的开发，对其方法、过程及手段，进行系统的、全面的研究和阐述，对系统的正常运行提供了指导，不仅可以提高设计效率和设计质量，并能进一步开发CAM系统，满足市场的需求，适应时代的发展。本文完成的主要任务有：1.阐述了CAD技术的基本理论，包括其概念、原则等。2.介绍了压力中心CAD系统的设计理念、原理、过程和一些关键技术，并进行分析；3.利用AutoCAD辅助法，完成压力中心CAD系统设计。关键词：CAD，压力中心，设计，系统IBlankingForceandCenterOfPressureComputerAidedDesignAbstract：Computeraideddesign(CAD)technologystartedinthelate1950s,aftermorethanhalfacenturyofdevelopment,manygeneralCADsoftwarehavebeendevelopedathomeandabroad.whetherTheprecisionofcenterofpressurecalculationofblankingdieisveryimportanttothedesignofdiestructure.AsCADtechnologyprogresses,usingthecomputertoautomaticallycalculateblankingpartblankingforceandcenterofpressurehasincreasinglybecomeaninevitabletrendofstampingdiedesign.ThispaperwasfocusedontheresearchofthecenterofpressureofCADsystembasedonVBenvironment,withtheaimtoprovideguidanceforthenormaloperationofthesystem.Asystemicoverviewonthemethodandprocessandmethodwascarriedout.Itisnotonlyimprovingthedesignefficiencyandquality,butalsofurtherdevelopmentofCAMsystem,whichmeetthedemandofthemarketandconsistentwiththedevelopmentofmoderntechnology.Maintasksofthispaperare:1.ThispaperexpoundsthebasictheoryofCADtechnology,includingitsconcept,principle,etc;2.ThispaperintroducesthepressurecenterofCADsystemdesignidea,principle,processandsomekeytechnologies,andanalyzed;3.ThedesignofthepressurecenterCADsystemiscompletedbyAutoCADassistantmethod.Keywords:CAD,Centerofpressure,Design,SystemII目录1绪论.11.1计算机辅助设计技术概述.11.1.1计算机辅助设计技术概念.11.1.2计算机辅助设计技术的发展概况.11.1.3计算机辅助设计技术发展趋势.21.2论文概述.21.2.1选题目的及意义.31.2.2论文主要工作.32压力中心CAD系统的总体设计.42.1可行性分析.42.1.1技术可行性.42.1.2经济可行性.42.1.3操作可行性.42.1.4法律可行性.42.2需求规范.52.2.1概述.52.2.2功能需求.52.3系统的开发方法.52.4系统的开发模型.62.5支撑软件的选择.72.6系统的程序框图.73冲裁件图形输入.103.1冲裁件图形的几何模型.113.2冲裁件图形的编辑.113.3DXF文件.123.3.1DXF文件的生成与导入.123.3.2DXF文件的结构.123.4程序接口技术.13III3.5界面图形.174压力中心、冲裁力与压力机的选用.224.1压力中心计算原理.224.1.1多线段的压力中心.224.1.2多圆弧压力中心.234.1.3多圆的压力中心.234.2冲裁力与顶件力.254.3压力机的选用.274.3.1压力机数据库的建立.274.3.2压力机的选用.285系统实现.295.1命名规则.295.1.1基本数据类型.295.1.2常量命名.305.1.3其它部分命名规则.305.2界面设计.305.2.1界面的功能描述.305.2.2界面.306系统测试.326.1程序测试基础理论.326.1.1程序测试定义.326.1.2程序测试基本概念.326.2软件测试方法分类.336.2.1静态测试与动态测试.336.2.2黑盒白盒与白盒测试.336.3压力中心CAD系统测试.346.4调试.346.5测试报告.347结论.35参考文献.36IV致谢.38附录程序全文.3901绪论1.1计算机辅助设计技术概述1.1.1计算机辅助设计技术概念计算机辅助设计技术(CAD)，即利用计算机软、硬件系统辅助工程技术人员或工程进行设计、分析、修改以及以交互式显示或输出的一种方法(手段)，是一门多学科的综合应用技术1。CAD技术是一种综合性的，复杂的系统工程，该技术经历了由简单的二维、三维制图到几何建模、工程分析、仿真实验等众多产品的设计发展历程，应用于众多科学领域。1.1.2计算机辅助设计技术的发展概况1950年，第一台图形显示器在美国麻省理工学院诞生。到20世纪50年代末期，MIT的林肯实验室在旋风计算机上开发出了SAGE空中防御系统，第一次使用了具有指挥和控制功能的CRT显示器，操作者可以用笔在屏幕上指出被确定的目标，它预示着交互计算机图形学的产生2。到60年代，CAD技术开始迅速发展，实现了二维、三维图形的绘制，CAD系统逐渐被众多企业接受，逐渐形成CAD产业。70年代研制出了许多关于模具CAD/CAM方面的专门系统，适用于各种类型的模具设计与制造，并取得了显著效果。20世纪80年代，随着工程站及微型计算机的出现，利用计算机进行图形处理已开始被越来越多的人接受，推动了CAD技术产业的普及。80年代中期，美国的CV公司提出了一种比无约束自由造型更新颖、更好的算法一参数化实体造型方法，该方法主要有以下特点:基于特征、全尺寸约束、全数据相关、尺寸驱动设计修改3。但是，由于投资大、开发难度大，CV公司拒绝了参数化技术方案，基于策化参数化技术的人因此建立了一个参数技术（ParametricTechnologyCorp.PTC)，开始研制Pro/ENGINEER的参数化软件。20世纪90年代以后，国外的CAD/CAM技术向更高的方向发展，许多CAD/CAM系统实现了商品化，如UGII、SolidWorks等系统在模具行业得到应用。它们的成功应用为CAD的发展提供1了更大的空间与可能。我国CAD技术的开始于上世纪60年代，当时主要利用计算机进行几何设计和辅助绘图，主要研究单位是高校。“七五”期间，我国开始引进CAD/CAE/CAM系统，开始应用于各个制造业领域，推动中国产业的发展。与此同时，有多个单位相继完成率冲裁模CAD/CAM系统、多工位级进模CAD系统等。20世纪90年代以来，CAD技术不断进行完善，广泛应用了特征和约束的变量化和参数化方法，使得制图更加精确，另外，由过去的单机或局域网向互联网工作方式发展，概念设计成为了今后研究的热点。“十五”期间，我国在模具制造信息化方面取得了一些成就，例如，开发了模具制造系统与装备，并实现了与其他相关技术与装备的系统集成；开发了注塑成型过程计算机模拟仿真软件，实现了与CAD/CAM系统的无缝衔接及其他众多成就，并在多家模具企业和高校中得到推广。二次开发是增值开发商或最终用户在软件开发商所提供的开发环境与编程接口基础上，根据自身的技术需求，进行新功能开发或软件环境定制的过程，从本质上讲，二次开发也是一个软件创新过程4。由于经二次开发后的CAD应用软件具有良好的人机界面，并融进了大量专业设计人员的经验，使一般的设计人员能够使用计算机进行产品设计，从而提高了设计效率和质量5。用AutoCAD求冲裁力与压力中心的方法，用AutoCAD的查询功能，查出全部实体体积的同时，也顺带也顺带查出了他们的整体的质心位置，当取值足够小时，这些实体的质心位置的（x，y）坐标值可以认为等于模具的压力中心位置，并且不会有太大的误差6。SolidEdge软件计算压力中心法7,基于AutoCAD2000的冲模压力中心确定方法8,轮廓环重心求解法9等许多方法。1.1.3计算机辅助设计技术发展趋势随着CAD技术不断的研究、开发和应用，对CAD技术有了越来越高，越来越多的新要求，以满足市场的需求，适应时代的发展。随着经济与社会的快速发展，CAD技术发展的主要趋势是集成化、智能化、并行化、网络化和标准化，先进设计技术和制造方法得到不断应用的推广。我国的制造业也日益注重对CAD技术的应用，不断完善CAD技术，并不断提升其应用范围。21.2论文概述1.2.1选题目的及意义随着工业生产和科学技术的发展，市场需求的增加，产品更新换代的速度加快加快，产品的生产正朝着精密、复杂、高质量和生产周期缩短的方向发展。依靠传统的经验和手工计算已不能满足需求，因此，依靠计算机的模具辅助工具就应运而生。目前，许多产品中的零部件依靠冲裁模去完成，冲裁模与零件压力中心是否在重合，对模具的精度和寿命有着很大程度上的影响，对零件的质量也有不同程度的影响。现在提倡节约资源，使资源充分利用，响应时代的号召，在冲裁模压力机的选择上，根据零件的最小冲裁力选择最适和压力机显得非常重要。利用计算机求出冲裁件的压力中心及最小冲裁力，有利于降低模具设计者的计算量，缩短产品的研发周期，提高工作效率，降低生产成本，节约资源等。1.2.2论文主要工作（1）本文主要工作1确定开发方案根据冲裁件综合特性，确定软件的开发方法，选择软件开发所需的软、硬件环境。2确定软件的总结构对软件任务进行分析、分解，确定总体结构，进行合理的模块规划。3确定软件的功能所设计的压力中心CAD系统软件符合冲裁模的要求，其功能主要包括，二维图形的输入与显示、压力中心、冲裁力与顶件力的计算。(2)软件的关键技术1冲裁件图形数据的读取；2在VisualBasic环境下的程序设计；3界面图形的绘出，压力中心的计算。32压力中心CAD系统的总体设计2.1可行性分析可行性分析是对项目的主要内容和相关情况，从技术、经济、工程等方面进行研究和分析，并在项目建成后，对项目产生的经济和社会影响进行分析，提出建设性的意见，为项目建成提供基本的、全面的依据。CAD系统技术可行性研究，从系统发展规划出发，论述系统理论的可行性，同时论证在技术手段上的可实现性。由于CAD系统开发是一项投资大、涉及面广的工程复杂的系统工程，需要充分的进行可行性研究，以确保投资的准确性，而且CAD系统是一项辅助性质的工程，必须站在系统的角度论证它的可行性才有说服力，才有意义。可行性分析可从以下四个方面来考虑。2.1.1技术可行性该压力中心CAD系统，它采用了VisualBasic与AutoCAD相结合。而如今使用VisualBasic编写程序也没原来那么麻烦，界面的设计也不需要很复杂，我们可以从VisualBasic中找到符合自己要求的工具,来进行自己的设计。所以，该系统的开发在技术上是可行的。2.1.2经济可行性从我搜集的一些资料来看，压力中心CAD系统对计算机硬件要求不高，而这是我们自行开发的系统，成本可很低，还有后期维护的费用也相对比较低廉。2.1.3操作可行性该系统在操作上满足用户的基本要求，操作界面通俗易懂，即使非专业人士，也能成功使用该系统。2.1.4法律可行性本系统开发不会侵犯他人、集体或国家利益，不存在危害他人、集体或国家的4行为，不存在侵权等问题，不违反国家法律，因此具有法律可行性。综上所述，从技术、经济、操作、法律等层次方面都是可行的,而且对开发人员要求不高，所以这个系统的开发是可行的。2.2需求规范2.2.1概述为了保证冲压机各模具正常工作，必须使冲模的压力中心与冲压机滑块中心线相符合，否则在冲压时会使冲模与冲模机滑块歪斜，引起凹凸模间隙不均和导向零件加速磨损，造成刃口和其他零件的磨损10。压力中心CAD系统就是确保模具在设计时，其压力中心在一条直线上。压力中心CAD系统包括冲裁件图形的输入、冲裁边力偶的计算、压力中心的计算、最小冲裁力的计算等功能，能够完成单工序冲裁模、级进冲裁模和复合冲裁模等压力中心的计算机辅助设计。本章主要以所开发的基于VB环境下的压力中心CAD系统为例，详细介绍系统的功能和结构。2.2.2功能需求本系统的功能是帮助用户更加快捷的计算冲裁件的压力中心及冲裁力，达到简化计算的目的。2.3系统的开发方法现代CAD系统的开发严格按照“软件工程学”的方法进行研究和设计。工程化软件的具体要求是：(1)正确性：实现软件的全部功能，并保证正确;(2)可靠性：软件可多次反复使用且不失败，出错概率小于设定的指标；(3)简明性：表达简洁、可读性强，程序内部、外部层次分明，接口简单；(4)易维护：能方便地实现系统的校正维护、适应维护和完善维护；(5)结构化设计方法：用大众熟悉的顺序、判断、循环三种基本逻辑分支实现每5个模块的程序编写；(6)文档齐全、格式规范。根据软件工程学的方法，CAD系统的生命周期可分为系统分析、系统设计、程序设计、系统测试和系统维护五个阶段11。前4个阶段为开发期，最后1个阶段为维护期。(1)系统分析：在进行需求分析的基础上，确定系统开发的目标、功能、性能、接口和适用范围，建立系统的总体逻辑模型。(2)系统设计：结构化设计方法，明确软件系统构架，包括划分模块、模块之间的通信等。(3)程序设计：根据系统设计完善并完成系统设计规范、利用VisualBasic6.0语言实现系统的功能及优化。除此以外，程序的结构、算法及系统的安全性、可靠性、实用性等也都需要认真思考。(4)系统测试：分析系统，对系统和程序的设计做最后的审查，确保满足用户的需求和软件的质量。对系统进行测试时，应按照一下的原则进行:1为保证系统测试质量，测试人员与开发人员分开。2设计测试试样时，要给出测试试样的预期结果，做到有的放矢。3要设计非法输入测试试样，保证程序可以拒绝接受非法输入，并给出提示信息，指引用户进行正确的操作。4对程序进行修改之后，要进行回归测试，减免由于修改程序而引起新错误。5在进行深入测试时，要重点测试容易出错的部分。(5)系统维护：CAD系统生命周期的最后一个阶段。软件交给用户使用后，对软件进行纠错与完善。此外，在软件的开发的每个阶段，均要编写详细的开发文档。2.4系统的开发模型当前，模具CAD系统的开发常见的模型有：快速原型法和生命周期模型等。生命周期模型是将软件工程学和系统工程的理论和方法引入CAD系统的设计中来，是计算机系统开发中最常见、最有效的方法之一。在整个CAD系统的开发过程中，将其划分为若干个阶段，提前设定好每个阶段的任务，再按一定的标准去顺序6完成。但缺点是一个长的开发周期长，开发过程复杂，且随外部环境的变化影响系统的正常运行。快速原型法（Rapidprototyping)是近年来提出来的一种以计算机为基础的系统开发方法，它首先根据用户需求构造一个功能简单的系统，然后对原型系统逐步求精，不断扩充完善得到最终的软件系统12。快速成型的优点是，它是以用户为中心，所以，在系统的生命周期的设计阶段起一个积极的作用，有效地减少系统开发的风险，特别是在大型系统的开发，对项目分析不能一次完成，使用快速原型法效果更加显著。其缺点是，快速原型法的选择缺乏一定的评判标准，与系统开发人员的经验及水平有很大关联，若是选取不当，则会浪费时间和精力，并对用户造成影响。本压力中心CAD系统的开发模型是将二者结合起来，将已有的经验用作原型来知道生命周期各阶段工作的完成，从而节约人力、物力、时间，提高了开发效率，加快了开发进度。2.5支撑软件的选择AutoCAD软件是由美国欧特克有限公司（Autodesk）出品的一款自动计算机辅助设计软件，主要用于绘制二维制图和基本三维设计,使用者无需懂得编程，即可实现自动制图，因此AutoCAD在全球广泛使用，较常用于土木建筑，装饰装潢，工程制图，电子工业，服装加工等领域。因此选用AutoCAD软件。该软件用于压力中心CAD系统设计，具有以下的优点：(1)AutoCAD提供了丰富的作图功能，操作方便；(2)作图精度高；(3)具有强大的图形编辑功能，可对现有的图形进行编辑；(4)可方便的进行图形的输出，图形的保管，查看非常方便。2.6系统的程序框图首先，用户启动压力中心CAD系统，选择要打开的冲裁件的文件，系统会按照设定好的程序对文件进行读取，对文件中的各线段、圆、圆弧进行识别，并临时保7是是存，直到把需要的数据全部读取完毕，然后进行绘图命令，在界面上的图片框中央进行冲裁件图形绘制，并适应图片框大小。然后点击界面上的计算压力中心按钮，则会自动把冲裁件的压力中心坐标计算出来，并把压力中心点在图形上显示出来。在文本框中输入材料的厚度和抗剪切强度，点击计算，则会自动计算出所需冲裁力和顶件力，点击查询压力机参数，可以查看已存储的压力机参数，根据计算出冲裁力，进行压力机的初选。4444fhfg否否否提取圆的相关坐标提取直线相关坐标是否为直线？开始打开并读取冲裁件文件是否为圆？其余代码忽略是是否为圆弧？提取圆弧相关坐标8图2.1流程图绘制冲裁件图形启用压力中心计算程序，计算冲裁件压力中心，显示压力中心坐标输入材料厚度，抗剪强度计算最小冲裁力与顶件力，并显示查询压力机参数，选取压力机结束93冲裁件图形输入冲裁件的图形输入是根据零件的几何特征，按照一定的方法，把图形数据输入到计算机中。冲裁件的图形输入是开发压力中心CAD系统的基础。常见的冲裁件图形输入方式有下列几种：(1)节点输入法冲裁件图形是二维平面图形，其组成元素的交点或切点，称为节点。输入图形的各元素的节点信息，以及其间的拓补关系，则可以在计算机中建立零件二维图。冲裁件图形的拓补关系简单，只需将个元素之间按顺序首尾相连即可。因此，此种输入法需要先手工计算出各元素的参数及节点坐标，然后再按照一定的顺序进行输入计算机，则可以在计算机上得到所需冲裁件图形信息。这种方法简单易操作，但前期准备周期长，数据较多时，易出错，而且难以及时发现，还需要逐项检测个元素信息，降低了其精确度。(2)NC语言描述法NC是数字控制（NumericalControl)的缩写，是根据几何定义语句去描述零件的形状。其中APT(AutomaticallyProgrammedTool)语言接近英语语言，书写方式也与英语相似，容易被人掌握，因此数控语言中使用最多的是APT语言，其应用最广、影响最深远、最有代表性。冲裁件图形是简单的二维图形，只需用APT语言中的一小部分即可对图形几何形状的完成描述，所以一些CAD/CAM系统用的是经简化后的APT语言。这种方法操作直观方便，容易发现错误，但占用机上时间太多，需事先计算出全部节点的绝对坐标，适用于有一定APT语言功底或英语具有一定基础的人员。(3)数字化仪法数字化仪，是一种计算机输入装置，它可以将各种图形的坐标值，确切输入到计算机中，并显示在计算机屏幕上。其工作原理是：游标在电磁感应板上运动时，通过接口，将电磁感应板上的图形坐标信息数字化，同步传入计算机中，经过处理，在计算机屏幕上显示出图形信息。当然，作为一种非主流汉字输入方式，其输入速度不够快，准确率也低于键盘输入。(4)逐段输入图形元素的交互式输入法采用该方法输入图形时，整个过程始终由菜单驱动。图形输入系统包括三级子10菜单，其工作方式是：首先选择工作状态和背景颜色，然后通知系统所要进行处理的图形是已存在的，还是新建立的。然后对要处理的图形选择所需的命令进行编辑，得到所需要的图形信息。利用这种交互式输入法输入冲裁件图形时，首先建立坐标系，对图形的轮廓、元素和尺寸进行编号，并按编号把尺寸数据一次存放在数据文件中。该方法可对图形进行交互编辑、修改、插入和删除，具有输入直观、及时显示的优点13。(5)AutoCAD辅助法通过在一些比较成熟的绘图系统（如AutoCAD、I-DEASDRAFTING等等）基础上开发出功能齐全、方便使用的冲裁件二维绘图环境，将有利于缩短压力中心CAD系统的开发周期。以上几种冲裁件图形输入方法在都存在优点，对于压力中心CAD系统的推广应用有着不同程度的影响，因此选取一种有效的图形输入方法显得尤为重要。压力中心CAD系统使用AutoCAD辅助法，是以AutoCAD软件为图形编辑器，生成DXF文件，再读取文件，经过系统处理，得到所需的图形信息，从而实现图形的自动输入。选用AutoCAD作为冲裁件图形输入的支撑环境的优点有：1绘图功能好，可画点、线、圆、圆弧等，还拥有目标捕捉功能；2图形编辑功能好，可复制、旋转、镜像、块插入等；3具有标准图形文件交换的接口。3.1冲裁件图形的几何模型几何模型是根据冲裁件的几何信息及其拓补关系，即对线段、圆、圆弧之间的相互关系的定义，完成对冲裁件的形状描述。几何信息是指图形形状特征参数，包括线段端点，圆的中心和半径和圆弧的中心，半径，起始角度和终止角度。拓补关系是指个元素之间的联系，按照一定的方向进行首尾相接。3.2冲裁件图形的编辑冲裁件图形的编辑是依靠AutoCAD软件进行。在软件的绘图界面中选取所需的命令，按照一定的尺寸及约束，把冲裁件图形在屏幕上进行绘制及编辑。113.3DXF文件DXF-DrawingExchangeFile（图画交换文件），是美国欧特克公司开发的第一个进行AutoCAD图形交换的文件格式，主要适用于外部程序和不同图形系统之间的信息交换。由于AutoCAD广泛应用于世界二维领域及其世界影响力，因此，大多数CAD系统支持DXF文件格式，经常以DXF文件作为中介，完成与AutoCAD图形软件或其他系统的图形信息的交换。因此，DXF文件格式已成为事实上的工业标准。3.3.1DXF文件的生成与导入在AutoCAD图形编辑状态下，点击另存为或输入DXFOUT命令并按之后的提示进行操作，就可以把绘制好的图形生成一个DXF文件。同样，通过打开或DXFIN命令，可以将其他系统或外部程序生成DXF文件导入进系统。3.3.2DXF文件的结构一个DXF文件包含它相应图形的全部信息，其总结构由7个段和文件结尾组成，分别为：(1)标题段（HEADER)记录图形系统的一般信息，由标题变量及当前状态或当前值表示。(2)类段（CLASSES)记录应用程序定义的类，这些类的实例可能出现在BLOCKS、ENTITIES和OBJECTS中。(3)表段（TABLES)包含9个符号表的定义：应用程序标识表、块参照表、标注样式表、图层表、线型表、文字样式表、用户坐标系表、视图表、视口配置表14。这些表记录了图形编辑的支撑环境。(4)块段（BLOCKS)块段顺序的记录了每个块的定义，每个快均由块名、类型、基点和该块的全体成员定义，有关块的定义与实体段相同。12(5)实体段（ENTITIES)记录每一个实体的所有信息，包括每一个实体的类型、图层名，颜色，尺寸和等信息，是记录零件信息的主要部分。(6)对象段（OBJECTS）包括图形数据库的所有非图形实体的数据，所有既不是实体的，也不是符号表的记录或实例都在该段表述。(7)预览段（THUMBNAILIMAGE)以位图形式描述了生成该DXF文件时显示在屏幕上的画面，其大小是导入DXF文件时对话框上“预览”图像的大小。(8)文件结尾以“0”和“EOF”两行结尾，作为整个DXF文件结束的标志，其中，“”表示空格。组（Group）是构成DXF文件的最小单元，一个DXF文件有若干组，每组在该文件中占两行，首行称为组码，是一个非零的正整数；第二行称为组值。组码说明组值的数据类型，数据的具体值就是组值，两行组合起来才是完成的数据。冲裁件图形信息，包含在DXF文件中的实体段，因此，只需对DXF的实体段的数组信息进行采集。在DXF文件中，存储实体的命令与基本绘图命令相同，而且编辑命令TRIM、BREAK、CHAMFER、FILLET等生成的图形，也为LINE、CIRCLR和ARC等命令保存，这就为DXF文件的读取提供了很大便利，降低了程序语言的编写难度。3.4程序接口技术接口技术采用VB6.0（VisualBasic6.0）编写，其主要是从AutoCAD绘制并生成的冲裁件图形的DXF文件中提取压力中心CAD系统所需要的信息。该程序主要是利用VB6.0语言中的LineInput语句逐组读取DXF中的组码和组值，然后利用If语句找到实体段中图形编辑命令字符串（如LINE、CIRCLE、ARC等），再利用Case语句分类读取实体段的具体数据，并分别进行存储，方便工程后续的调用。以下为读取DXF文件源码：13DimLinep(1To100)Aslinetype线段存储编号，最大值为100DimArcp(1To100)Asarctype圆弧段存储编号，最大值为100DimCirclep(1To100)Ascircletype圆类存储编号，最大值为100ConstPI=3.141592653Publici,m,nAsIntegeriforline,mforcircle,nforarc两行为一组对文件进行读取Functionreadcodes()AsVariantDimcodestr,valstrAsStringLineInput#1,codestrLineInput#1,valstrreadcodes=Array(Trim(codestr),valstr)EndFunctionFunctionreaddxf(ByValdxffileAsString)DimcodesOpendxffileForInputAs#1codes=readcodes()Xmin=99999Xmax=-99999ymin=99999Ymax=-99999i=0:m=0:n=0Whilecodes(1)EOFcodes=readcodes()Ifcodes(1)=AcDbLineOrcodes(1)=LINEThen判别是否为线段Whilecodes(0)31codes=readcodes()SelectCasecodes(0)Case10读取线段起点X值i=i+1:14Linep(i).XStart=Val(codes(1)CallsetLimit(Linep(i).XStart,Linep(i).XStart,ymin,Ymax)Case20读取线段起点Y值Linep(i).YStart=Val(codes(1)CallsetLimit(Xmin,Xmax,Linep(i).YStart,Linep(i).YStart)Case11读取线段终点X值Linep(i).XEnd=Val(codes(1)CallsetLimit(Linep(i).XEnd,Linep(i).XEnd,ymin,Ymax)Case21读取线段终点Y值Linep(i).YEnd=Val(codes(1)CallsetLimit(Xmin,Xmax,Linep(i).YEnd,Linep(i).YEnd)EndSelectWendElseIfcodes(1)=AcDbCircleOrcodes(1)=CIRCLEThen判别是否为圆Whilecodes(0)40codes=readcodes()SelectCasecodes(0)Case10读取圆心X坐标m=m+1:Circlep(m).Xcenter=Val(codes(1)CallsetLimit(Circlep(m).Xcenter,Arcp(m).Xcenter,ymin,Ymax)Case20读取圆心Y坐标Circlep(m).Ycenter=Val(codes(1)CallsetLimit(Xmin,Xmax,Circlep(m).Ycenter,15Circlep(m).Ycenter)Case40读取圆半径Circlep(m).Radius=Val(codes(1)CallsetLimit(Circlep(m).Xcenter-Circlep(m).Radius,Circlep(m).Xcenter+Circlep(m).Radius,Circlep(m).Ycenter-Circlep(m).Radius,Circlep(m).Ycenter+Circlep(m).Radius)EndSelectWendElseIfcodes(1)=AcDbArcOrcodes(1)=ARCThen判别是否为圆弧DimcountflagAsIntegerDimtmpxcenter,tmpycenter,tmpradius,tmparcstart,tmparcendAsDoublecountflag=0Whilecountflagm_fWorldToScreenYThenIfm_fWorldToScreenXArcp(f).EndangleThenArcp(f).Endangle=360+Arcp(f).EndangleEndIfhd1=(Arcp(f).Endangle-Arcp(f).Startangle)/2*PI/180hd2=(Arcp(f).Startangle+Arcp(f).Endangle)/2*PI/180z=Arcp(f).Rcenter*Sin(hd1)/hd1Arcp(f).count=Arcp(f).Rcenter*2*hd1Arcp(f).xcount=z*Cos(hd2)+Arcp(f).XcenterArcp(f).ycount=z*Sin(hd2)+Arcp(f).Ycentersumarcx=sumarcx+Arcp(f).xcount*Arcp(f).countsumarcy=sumarcy+Arcp(f).ycount*Arcp(f).countc=c+Arcp(f).countNextfd=a+b+cx1=Format(sumlx+sumcx+sumarcx)/d,#,#.#)y1=Format(sumly+sumcy+sumarcy)/d,#,#.#)Label1.Caption=压力中心坐标：&x1&，&y1Picture1.DrawWidth=4Calllinew(x1,y1,x1,y1)EndSub4.2冲裁力与顶件力冲裁力即冲裁时所需的压力，在冲裁过程中，冲裁力是随凸模进入材料的深度而发生的，通常说的冲裁力是指冲裁力的最大值，是选择压力机的主要依据，也是冲模设计师必须计算的数据15。25对于普通的平刃口模具的冲裁力计算公式：，即KLtFLLKFcarcrll212121顶件力是从模具内向上顶出工件或废料所需的力，F顶顶式中F为冲裁力；为顶件力系数，查询表4.1。顶表4.1钢材顶件力系数料厚/mm顶K0.10.140.10.50.080.52.50.062.56.50.056.50.03冲裁力计算源码：PrivateSub冲裁力_Click()DimcclAsSingle,eAsDouble,fAsDouble,gAsSingle,djlAsSinglee=Val(Text1)f=Val(Text2)ccl=Format(e*f*d*1.3*0.001,#,#)Label4.Caption=冲裁力：&ccl&KNIfVal(Text1)0.1Theng=0.08ElseIfVal(Text1)0.5Theng=0.06ElseIfVal(Text1)2.5Theng=0.05ElseIfVal(Text1)6.5Theng=0.03EndIf26djl=Format(ccl*g,#,#)Label8.Caption=顶件力：&djl&KNEndSub4.3压力机的选用4.3.1压力机数据库的建立Access2007作为MicrosoftOffice组件之一，是在Windows7环境下非常流畅的数据库管理系统。使用Access2007时，只需通过直观的界面操作系统就可以完成大部分的数据库建立与管理任务。在Access数据库中，表是存储数据的地方。Access表由表结构和表数据组成，一般先建立表结构，再进行数据的输入。在Access表中，表格具有数据确认功能，减免不精确的数据的输入。在每一个字段中，都有自己的数据格式及缺省的定义类型。本压力中心CAD系统用Access2007数据库建立了压力机的标准数据库，方便压力机的查询。当数据库文件建好之后，可以利用VisualBasic6.0中ActiveX控件中的DataGrid控件对数据库进行访问。具体过程为：打开VisualBasic6.0，单击工程，选择部件选项，选择MicrosoftDataGridControl6.0（OLEDB)部件，单击添加按钮。接下来，将DataGrid控件添加进界面中，编制程序，把数据库与DataGrid控件相连，进行加载，显示压力机数据库数据。源码如下：PrivateSubForm_Load()DimcnAsNewADODB.ConnectionDimrstAsNewADODB.RecordsetDimSqlStrAsStringcn.OpenProvider=Microsoft.Jet.OLEDB.4.0;DataSource=&App.PathMode=ReadWriteSqlStr=Select*From表127rst.CursorLocation=adUseClientrst.OpenSqlStr,cn,adOpenDynamic,adLockOptimistic,adCmdText打开记录集SetDataGrid1.DataSource=rst给DataGrid修改数据源EndSub4.3.2压力机的选用冲裁时压力机的选用要点：(1)压力机的标称压力总压力；(2)在开式压力机上进行精密冲裁时，应在压力机标称压力的50以下的范围进行，一般冲裁时压力也不应超过压力机标称压力的80；(3)要根据冲裁工艺特点、生产率、送取毛坯和工件是否方便以及操作安全等选用设备。285系统实现5.1命名规则为了在程序中更容易识别和使用变量，我们需要给在VB中每个变量命名，变量命名要遵循以下规则：（1）变量名只能由英文字母、汉字、数字以及下划线组成；（2）变量名必须开头必须是英文字母或汉字，最后一个符号可以用数据类型声明符，如Dima；（3）变量名长度最多可至255个字符，有效字符为40个；（4）VB中的关键字不能作为变量名，如Print、Dim和For等都是非法变量名；（5）不能在变量名中出现标点符号、空格或嵌入！、#、￥、%、&等字符；（6）变量名中不区分大小写。在实际编程过程中，建议变量名能对变量含义有一定的提示作用，且能反映变量类型及作用域。5.1.1基本数据类型字符型即String，字符中的字符可以计算机系统允许使