基于VB的高温球阀计算机辅助工艺系统模板.doc

基于VB高温球阀计算机辅助工艺系统(MGQF-CAPP)开发
引言
    计算机辅助工艺设计也称CAPP，是企业逐步推行信息集成和CIMS应用工程关键基础之一。在科学技术飞速发展，产品更新换代频繁今天，传统工艺设计方法已不能适应机械制造业发展需要。
    因为零件形状、结构千变万化，各企业中机床、夹具、刀具和量具参数也各不相同，所以现在CAPP系统无法依据用户需要自动生成工艺步骤及工艺过程卡片，现有CAPP系统只能停留在依据人工所排工艺录入统一格式工艺过程卡片。
    本课题受天津职业大学科研基金资助，对天津某阀门企业生产各类阀门进行了尺寸系列化、图纸计算机化、工艺设计标准化改造，取得了很好效果。MGQF-CAPP系统开发关键目标是让有经验工艺人员从反复烦琐劳动中解放出来，去从事改善工艺提升生产效率工作，使不大熟悉工艺人员能应用本系统生成优化高质量工艺规程。
    一、高温球阀加工过程分析
    本系统针对天津某企业高温球阀生产需要，对其生产关键零件阀体、阀芯、阀杆、锁紧套、压盖八大尺寸系列所选择机床、夹具、刀具和量具和加工方法和工艺过程进行标准化。这些零件结构相同或相同，所以可依据零件结构及尺寸不一样自动生成工艺步骤及工艺过程卡片，同时在每一个零件各个加工工序步骤中能够依据表面粗糙度要求不一样自动选择机床、刀具、夹具和量具。
    球阀零件共同特点是：每种同名零件结构相同，材料相同，只是伴随DN值和长度值改变，其材料和结构部分改变，因为尺寸改变加工方法略有改变。所以我们依据相同性原理，提取关键特征，进行经典工艺设计，在计算机辅助下实现工艺自动化。避免了加工随意性、工艺管理频繁改变带来工艺规程紊乱等现象。
    确定生产系列：根据市场需求，高温球阀关键有：DN25、DN32、DN40、DN50、DN60、DN80、DN100、DN125等八个系列。DN表示阀门最大直径，称为公称直径。通常根据由小到大系列，产品数量逐步降低。另外生产呈周期性，500-200件/批不等。确定生产某种系列产品实际就是确定阀体公称直径DN，从而对应本系列其它零件关键尺寸随之确定。
    工艺规程不仅是数控编程依据，也是操作人员调整机床和观察零件加工过程关键参考文件。高温球阀加工是中小批量生产，常常应用一般机床加工。近些年，数控车削等设备普及，阀门制造业也越来越多采取数控设备。另外，在高温球阀设计过程中，我们使用了CAXA电子图版进行全方面CAD设计，采取自动生成工艺技术-CAPP成为肯定。为实现多种加工方法兼用性，采取工艺过程卡(工艺路线)和工序卡。不采取NC工艺卡。
    二、系统设计步骤及思绪
    首先，制订系列标准：
    1、制订经典工艺过程；
    2、工艺术语标准化：
    3、工艺符号、代号标准化；
    4、工艺文件标准；
    5、工艺余量标准；
    6、切削参数标准；
    7、工艺定额管理标推；
    8、工艺装备标准。
    然后，将各零件关键尺寸(包含DN值)、用户使用加工设备(包含机床、刀具、夹具、量具)、由经验丰富工艺人员编制好各零件加工工艺步骤、加工工艺过程(包含序号、工序名称、工序内容、机床、夹具、量具)、针对不一样粗糙度采取不一样加工方法和不一样要求时切削速度及切削用量分别建立数据库。
    最终，用Visual Basic设计其操作系统界面并建立起和Access数据库链接，从而实现对不一样尺寸不一样零件所属系列判定，并可自动生成该零件工艺步骤及工艺过程卡片，还能够自动选择各个加工工序步骤中所使用机床，刀具，夹具，量具。
    三、系统开发过程
    基于VB高温球阀计算机辅助工艺系统MGQFCAPP设计和开发按以下步骤实现；
    1、确定系统功效要求：
    1)能完成阀门关键零件加工路线、机床选择；切削参数确定：刀具、量具、工时等选择；
    2)能和数据库、零件库链接；
    3)含有标准工艺模块，能进行增删、修改操作。
    4)含有打印等输出功效。
    2、确定系统性能要求：
    1)对使用者不需进行计算机等专业培训，汉字提醒下进行鼠标点击即可得到所需工艺：
    2)不需得到标准工艺文件，在屏幕显示状态下就能知道零件加工路线、机床选择；切削参数确定；刀具、夹具、量具、工时等选择；
    3)统计使用者及其操作；
    4)需要打印等要求时，可打印；
    5)软件安装轻易，安装后运行所占空间小。
    3、确定系统结构步骤(见图1)

    4、选择适宜软件
    1)数据库软件选择
    自从Microsoft企业推出Access以后，因为其含有操作简便、功效强大，许可以一个高效、一致方法对信息进行集中访问而且易于建立和维护，所以这种数据库软件受到越来越多大家喜爱，而且很快替换了d-Base、Fox-Pro等数据库。
    2)编程软件选择
    Visual Basic 6.0是Microsoft企业推出Visual Studio 6.0对可视化应用程序开发工具组件中一员，也是当今世界上最流行可视化编程工具。它不仅简化了可视化编程方法，而且使得应用程序开发步骤愈加流畅，功效也愈加强大。尤其是Visual Basic 6.0在数据库方面如数据视图窗口和数据环境设计器改善，使用户能够在目前环境中轻松自如地开发出多种功效数据库应用程序。本课题应用此软件实现前述功效要求。
    5、编程实现系统结构
    1)在ACCESS中建立以下数据库：
    ① 表面粗糙度加工方法库
    ② 切削用量方法库
    ③ 刀具、量具库
    ④ 工艺过程库
    ⑤ 机床型号库
    ⑥ 夹具库
    ⑦ 零件系列库
    2)用VB编程设计各页面并建立各部分相关内容和数据库链接
    下面以阀体为例说明VB编程方法。

    在该窗体中双击各Text Box窗口中Text1，进行下列程序编写，即可实现和阀体加工工艺过程库链接：
    Private Sub Form_Load()
    Dim dbs As Database
    Dim rst As Recordset
    Dim qdf As QueryDef
    Set dbs＝OpenDatabase(”db\工艺.mdb”)
    Set rst＝dbs.OpenRecordset(”阀体加工工艺过程”)
    Text1(0).Text=rst.Fields(”工序名称”)
    rst.MoveNext
    Text1(1).Text=rst.Fields(”工序名称”)
    rst.MoveNext
    Tex1(2).Text＝rst.Fields(”工序名称”)
    rst.MoveNext
    Tex1(3).Text＝rst.Fields(”工序名称”)
    rst.MoveNext
    Tex1(4).Text＝rst.Fields(”工序名称”)
    rst.MoveNext
    Tex1(5).Text＝rst.Fields(”工序名称”)
    rst.MoveNext
    Tex1(6).Text＝rst.Fields(”工序名称”)
    rst.MoveNext
    Tex1(7).Text＝rst.Fields(”工序名称”)
    End Sub
    Pivate Sub Label6_Click()
    End Sub
    Pivate Sub Label8_Click()
    End Sub
    Private Sub Text1_Change(Index As Integer)
    End Sub
    Pivate Sub Text2_Change()
    End Sub

    在上述窗体中双击各Conmmand/Button，即可实现和该命令按钮所对应下一级窗体及和其相关数据库链接：
    Private Sub Combo1_Change()
    End Sub
    Private Sub Combo1_Click(Index As Integer)
    粗镗粗糙度.Show vbModal
    End Sub
    Private Sub Command2_Click()
    扩孔粗糙度.Show vbModal
    End Sub
    Private Sub Command3_Click()
    扩孔粗糙度.Show vbModal
    End Sub
    Private Sub Command4_Click()
    粗车.Show vbModal
    End Sub
    Private Sub Command5_ Click()
    车螺纹.Show vbModal
    End Sub
    Pivate Sub Command6_Click()
    扩孔粗糙度.Show vbModal
    End Sub
    Pivate Sub Command7_Click()
    阀体工序文件.Show vbModal
    End Sub
    Pivate Sub Command8_Click()
    阀体工艺步骤.Show vbModal
    End Sub
    Pivate Sub Command9_MClick()
    阀体加工决议表.Show vbModal
    End Sub
    Pivate Sub Form_Load()
     Dim dbs As Database
     Dim rst As Recordset
     Dim qdf As QueryDef   
    Set dbs＝OpenDatabase(”db\工艺.mdb”)
    Set rst＝dbs.OenRecordset(”阀体加工工艺过程”)
    Private Sub Label6_Click()
    End Sub
    Private Sub Label8_Click)
    End Sub
    Private Sub Textl_Change(Index As Integer)
    End Sub
    四、结论
    将经过标准化优化工艺或编制工艺逻辑思想(长久以来工艺师们积累知识和经验)，经过CAPP系统存入计算机，在计算机生成工艺时，CAPP软件首先读取相关零件信息，然后识别并检索一个零件族标准工艺和相关工序，经过编辑修改(派生式)，或按工艺决议逻辑进行推理(创成式)自动生成具体零件工艺过程卡片。这就是本系统工作原理。
    计算机只能按CAPP软件要求方法生成工艺过程，而不能发明新工艺方法、新工艺参数。一旦新工艺方法、新工艺参数出现，就必需修改CAPP系统中ACCESS数据库中内容、VB中窗体及其相关程序，使之适应新加工对象和加工制造环境，提升本系统可扩展性。