包装074纸箱CAD系统计算说明书样本.doc

包装CAD课程设计阐明书题 目 包装CAD课程设计 学 院 轻工学院 专 业 包装工程 班 级 074 班 学 号 学生姓名 陈 跃 同组同窗 白贵福 王国钢 谭波 指引教师 金国斌 胡桂林 完毕日期 9月 17 日 瓦楞纸箱包装CAD软件研制学生姓名：陈跃 指引教师：金国斌 胡桂林（浙江科技学院轻工学院）1 绪 论商品是人们生活中必不可少东西，随着人们生活水平不断提高，以及对各种事物规定也越来越高，随之对商品包装也就有了越来越高追求.在各种商品包装容器中，瓦楞纸箱应用占首位，设计精良纸箱能协助产品运送、流通发挥优势作用.随着科学技术迅猛发展，产品造型日趋发杂，产品包装设计也日益受到人们注重，然而运用老式设计办法，设计周期长、人力消耗多、质量无法满足市场规定.因而，为了适应当代工业发展，缩短产品包装周期，提高产品在市场上竞争力、满足自动化包装等规定，人们便将高速发展计算机技术应用到了包装行业纸箱设计中来，各类包装纸箱CAD软件应运而生.瓦楞纸箱作为使用最为广泛包装容器之一，有着许许多多长处.一方面它价格较低；具备一定刚度和强度，又有良好弹性和韧性，对内装物有良好保护作用.另一方面，相对于其他包装容器质量较轻，运送费用相对较少；最后，瓦楞纸箱可回收再运用，作为废弃物，其解决办法也非常容易，不产生污染.因而，咱们设计了瓦楞纸箱CAD系统，以便于瓦楞纸箱自动化包装.由于水平所限，咱们设计系统尚有某些缺陷.由于是初次使用VB，但愿各位能指出更多缺陷或错误，或提出好建议. 1.1瓦楞纸包装在包装工业中地位及现状在当今纸包装制品中，瓦楞纸包装应用最为广泛，它可以制成瓦楞纸箱、瓦楞纸盒、瓦楞纸板缓冲构造、瓦楞纸板托盘、瓦楞纸板展示台架等等.瓦楞纸具备一下特点：(l)重量轻，构造性能好(2)对商品保护性能好(3)运送费用低(4)易于变更箱型尺寸，包装适应性强(5)包装作业易实现自动化(6)原料成本低，废箱易于回收 1.2 瓦楞纸箱产品设计现状CAD(Computer Aided Design)即计算机辅助设计被广泛应用与制造业以及工程设计等各个领域.将CAD技术运用到纸箱包装行业会大大缩短瓦楞纸箱产品设计周期，提高设计质量.国内计算机技术在包装行业中起步较晚，和发达国家差距较大，国内某些纸盒制造厂商人采用老式手工设计和加工工艺，很难满足当代工业对纸盒包装规定.随着生产水平提高及对外贸易发展，人们对纸盒质量也提出了更高规定.因而，在国内包装业，引入CAD/CAM技术，以实现纸盒包装设计/制造当代化尤为重要. 1.3 CAD系统软件发展趋势近些年来，国内许多公司在进行“甩图板”工程中尝到了甜头，但愿CAD技术能在生产中发挥更大作用，而进一步需求又增进了CAD技术发展.此后CAD技术发展将更加迅速，它将向如下几种方向发展:（1）规范化和原则化（2）集成化.（3）智能化.（4）可视化.（5）更广泛地使用多媒体技术.（6）网络化.（7）Windows化 1.4 课题研究内容和意义通过实践调查和理论分析本课题研究瓦楞纸箱CAD软件系统具备实用和推广应用价值，特别是针对中小型生产型公司.本课题研究，重要就是针对中小型瓦楞纸箱包装系统（单箱重量不超过20KG）而言.通过对涉及箱体基本要素及尺寸、盒型、形状、箱体强度， 材料成本及优化设计等问题研究，盼望可以把每个问题进行程序化实现来开发一套瓦楞纸箱CAD系统，代替纯手工设计环节，实现从箱型构造选取设计、纸箱材料选取、纸箱尺寸设计、纸箱强度计算等计算机辅助技术，以提高公司经济效益，推动国内包装工业当代化、原则化、国际化.2 瓦楞纸箱设计我在这个小组里重要负责是抗压强度Pd公式编程 以及最后成果输出编程 以及音乐播放和停止 以及查看协助链接设计 2.1 制作系统界面5添加窗体，名称改为第五页.添加一种“预设计纸箱尺寸”标签，再在这个标签里面竖直方向添加“长度（mm）”“宽度（mm）”“高度（mm）”三个标签，在水平方向上添加“单瓦楞”、双瓦楞”标签.在添加6个空白文本框，使其构成表哥形式.再添加一种“计算”命令按钮.在下面添加一种“预设计纸箱堆码强度”标签，再在里面添加“Ps（N）”标签和2个空白文本框，再添加一种“计算”命令按钮.再添加一种“计算”命令按钮.在下面添加一种“预设计纸箱抗压强度”标签，再在里面添加“Pd（N）”标签和2个空白文本框，再添加一种“计算”命令按钮.最后在添加“输出结果”“上一步”“退出”三个命令按钮. Ps=9.81 * K * M *(Nmax -1) Ps载荷 ，N K 载荷系数，于选取安全系数中给出 M 单件包装总重量 为 单件数 * 单件重 Nmax 最大堆码层数.为int(堆码高度/瓦楞箱高) 堆码高度 为手动选取条件中给出 计算预测纸箱抗压强度Pd Makee简易公式(详见包装构造设计（中华人民共和国轻工出版社)P126) Pd =1.858 10-2 Pm ( t Z )0.5 Pd 为纸箱设计抗压强度，N t 为瓦楞纸板厚度，mm Z 为纸箱周边长，cm 等于(2*(纸箱长+纸箱宽) Pm 为瓦楞纸板边压强度，N/m.由于咱们纸箱重要用于内销运送，内装物最大重量不大于20Kg,因而选取第二类纸板 单瓦楞S-2.3，Pm=980N/m;双瓦楞D-2.2,Pm=980N/m.(详见包装构造设计（中华人民共和国轻工出版社)P135瓦楞纸板表（GB6543-86）&瓦楞纸板技术指标（GB6544-86）) 计算完毕，进入校核计算完毕，进入校核.若PsPd,则选取楞型不合理，或者堆码高度过高，就需要返回重新选取；若Ps Val(第五页.Text53) Then Label60.Caption = 第五页.Text57.Text Label61.Caption = 第五页.Text59.Text Label62.Caption = 第五页.Text51.Text End If If Val(第五页.Text56) Val(第五页.Text54) Then Label63.Caption = 第五页.Text58.Text Label64.Caption = 第五页.Text60.Text Label65.Caption = 第五页.Text52.Text End If 保存方案到VB.doc 代码如下Private Sub Command2_Click()If Label60.Caption ThenIf 第四页.Option1 = True Then L = A A楞型代号If 第四页.Option2 = True Then L = B B楞型代号If 第四页.Option3 = True Then L = C C楞型代号Else：L = End IfIf Label63.Caption ThenIf 第四页.Option5 = True Then M = AB Ab楞型代号If 第四页.Option6 = True Then M = AC Ac楞型代号If 第四页.Option7 = True Then M = BC bc楞型代号Else：M = End If If 第四页.Option8 = True Then X = 一级 If 第四页.Option9 = True Then X = 二级 If 第四页.Option10 = True Then X = 三级 If 第四页.Option11 = True Then X = 四级 Open (app.Path&VB.Doc) For Output As #1Print #1，第三页.Label20.Caption & Chr(10) & 您选取楞型是： & L & & M & Chr(10) & 您选取安全系数： & X & Chr(10) & Chr(10)；堆码高度（cm） & 第四页.Text7.Text & Chr(10) & Chr(10) & 成果单瓦楞纸箱长(mm) 宽(mm) 高(mm) 为： & Label60.Caption & & Label61.Caption & & Label62.Caption & & Chr(10) & Chr(10) & 成果双瓦楞纸箱长(mm) 宽(mm) 高(mm) 为： & Label63.Caption； & Label64.Caption； & Label65.CaptionClose#1 EndSub 2.3制作系统界面7添加窗体，名称改为第七页，添加“合用范畴 内销运送 0201 瓦楞纸箱 （瓦楞纸板材料含水量很小）”“参照文献：包装构造设计（第二版中华人民共和国轻工出版社）”“Visual Basic 程序设计教程（上海交通大学出版社）”“Visual Basic 程序设计教程习题及习题解答（第二版电子工业出版社）”“包装材料学（吉林大学出版社）”五个标签.添加“返回继续使用”“上一步”“退出”三个命令按钮.添加“谢谢使用”标签. 2.4 最后是查看保存到当前文献夹vb.doc，依照以上方案，那咱们将得到是一下某些数据. 2.5 页面链接右键单击第一页“进入”命令，选取查看代码，选取command1，输入 第一页.Hide 第二页.Show即则单击第一页“进入”按钮就会浮现第二页界面.同理，背面页面也是这样链接.2.6 音乐播放这一段程序咱们是网上找 是一种控件这是声明 Private Declare Function ShellExecute Lib shell32.dll Alias ShellExecuteA (ByVal hwnd As Long，ByVal lpOperation As String，ByVal lpFile As String，ByVal lpParameters As String，ByVal lpDirectory As String，ByVal nShowCmd As Long) As Long播放程序 Private Sub BOFANG_Click() WindowsMediaPlayer1.URL = App.Path & 0.mp3End Sub关闭程序 Private Sub tingzhi_Click(Index As Integer) WindowsMediaPlayer1.CloseEnd Sub2.7 查看协助 链接 Private Sub CHAKANBANGZHU_Click()ShellExecute 0，open，(App.Path & 纸箱CAD协助.chm)，vbNullString，vbNullString，1End Sub2.8 打印预览Private Sub dayinyulan_Click()If Dir(App.Path & vb.doc) = Then MsgBox 请先拟定纸箱设计方案 & Chr(10) & 与否已经保存，0，请注意 Else：ShellExecute Me.hwnd，open，(App.Path & vb.doc)，vbNullString，vbNullString，1End IfEnd Sub3 结 论本课题研究是瓦楞纸箱包装CAD设计系统软件，采用面向对象技术VB编程语言来进行计算机程序化实现，核心技术即设计流程程序化实现.由于瓦楞纸箱设计参数、公式、表格众多，设计计算繁杂.各模块间由于选取设计办法、初始化条件不同会以不同先后顺序互相联系，开发瓦楞纸箱CAD系统难度是相称大.因而本课题只是选用其中一小某些进行简朴研究，即重点是专门针对小型瓦楞纸箱设计智能化，只合用于单箱重量不超过20KG包装纸箱.通过本次课题研究，成功实现了小型瓦楞纸箱包装设计计算机化.将瓦楞纸箱设计思想以计算机语言形式表达出来，建立了和谐顾客界面，实现箱型排列方式自动选取；构造尺寸计算；堆码、抗压强度校核；操作使用便捷，提高设计效率，节约时间，减少了生产制作成本.此外，由于时间和精力有限，课题仅对瓦楞原则箱型进行简朴设计，在某些方面看来，考虑问题角度也不是很全面，例如箱型库、数据库建立不够全面等等，这些问题都是需要在此后研究中来不断完善.建议此后研究也可以对箱型库进行完善；对装箱排列方式进一步优化；在VB程序实现过程中加入数据库使用，扩大软件合用范畴.通过一段时间学习研究，学会了独立分析问题、解决问题能力，理解了要独立完毕一种项目是需要不断付出，懂得了文献在研究过程中重要地位和作用，也懂得了做任何事情时候都需要那种孜孜不倦专研精神.