包装印刷瓦楞纸箱包装CAD软件的研制doc 13页.docx

包装印刷瓦楞纸箱包装CAD软件的研制doc 13页.docx

《包装印刷瓦楞纸箱包装CAD软件的研制doc 13页.docx》由会员分享，可在线阅读，更多相关《包装印刷瓦楞纸箱包装CAD软件的研制doc 13页.docx（12页珍藏版）》请在冰豆网上搜索。

包装印刷瓦楞纸箱包装CAD软件的研制doc13页

包装印刷瓦楞纸箱包装CAD软件的研制（doc13页）

⏹

《包装CAD课程设计》说明书

题目《包装CAD课程设计》

学院轻工学院

专业包装工程

班级074班

学号107141113

学生姓名陈跃

同组同学白贵福王国钢谭波

包装.由于水平所限，我们设计的系统还有一些缺陷.因为是初次使用VB，希望各位能指出更多缺陷或错误，或提出好的建议.

1.1瓦楞纸包装在包装工业中的地位及现状

在当今纸包装制品中，瓦楞纸包装应用最为广泛，它可以制成瓦楞纸箱、瓦楞纸盒、瓦楞纸板缓冲结构、瓦楞纸板托盘、瓦楞纸板展示台架等等.瓦楞纸具有一下特点：

（l）重量轻，结构性能好

（2）对商品保护性能好

（3）运输费用低

（4）易于变更箱型尺寸，包装适应性强

（5）包装作业易实现自动化

（6）原料成本低，废箱易于回收

1.2瓦楞纸箱产品设计现状

CAD（ComputerAidedDesign）即计算机辅助设计被广泛应用与制造业以及工程设计等各个领域.将CAD技术运用到纸箱包装行业会大大缩短瓦楞纸箱产品的设计周期，提高设计质量.我国计算机技术在包装行业中起步较晚，和发达国家差距较大，国内部分纸盒制造厂商人采用传统的手工设计和加工工艺，很难满足现代工业对纸盒包装的要求.随着生产水平的提高及对外贸易的发展，人们对纸盒的质量也提出了更高的要求.因此，在我国包装业，引入CAD/CAM技术，以实现纸盒包装设计/制造现代化尤为重要.

1.3CAD系统软件的发展趋势

近些年来，国内许多企业在进行“甩图板”工程中尝到了甜头，希望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（堆码高度/瓦楞箱高）

堆码高度为手动选择条件中给出

计算预计纸箱抗压强度PdMakee简易公式（详见《包装结构设计》（中国轻工出版社）P126）

Pd=1.858×10-2Pm（tZ）0.5

Pd为纸箱设计抗压强度,Nt为瓦楞纸板厚度,mmZ为纸箱周边长,cm等于（2*（纸箱长+纸箱宽））

Pm为瓦楞纸板边压强度,N/m.因为我们的纸箱主要用于内销运输，内装物最大重量小于20Kg,因此选择第二类纸板单瓦楞S-2.3，Pm=980N/m;双瓦楞D-2.2,Pm=980N/m.（详见《包装结构设计》（中国轻工出版社）P135瓦楞纸板表（GB6543-86）&瓦楞纸板技术指标（GB6544-86））

计算完成，进入校核

计算完成，进入校核.若Ps>Pd,则选择的楞型不合理，或者堆码高度过高，就需要返回重新选择；若Ps<=Pd,则设计合理，可以进入下一个输出结果阶段.

其中抗压强度编程如下

PrivateSubCommand12_Click（IndexAsInteger）

Label58.Caption=Int（1.858*10^（-2）*6370*（（Val（第四页.Text41.Text）*2*（Val（Text57.Text+Text59.Text）/10））^0.5））'Pd=1.858×10-2Pm（tZ）0.5

Label59.Caption=Int（1.858*10^（-2）*7350*（Val（第四页.Text42.Text）*2*（Val（Text58.Text+Text60.Text）/10）^0.5））

Text55.Text=Label58.Caption

Text56.Text=Label59.Caption

EndSub

2.2制作系统界面6

添加窗体，名称改为第六页.添加一个“设计箱型示意图”标签，后面添加一个显示按钮，下面添加一个空白文本框.在水平方向上添加“长度L”“宽度B”“高度H”三个标签，竖直方向上添加“单瓦楞”、’双瓦楞”标签.以及6个空白文本框，使他们排列成表格的形式.然后再添加“新方案”“上一步”“下一步”“退出”四个命令按钮.

其中显示按钮的编程代码如下

PrivateSubCommand16_Click（IndexAsInteger）

Picture1.Picture=LoadPicture（App.Path+"\123.bmp"）

IfVal（第五页.Text55）>Val（第五页.Text53）Then

Label60.Caption=第五页.Text57.Text

Label61.Caption=第五页.Text59.Text

Label62.Caption=第五页.Text51.Text

EndIf

IfVal（第五页.Text56）>Val（第五页.Text54）Then

Label63.Caption=第五页.Text58.Text

Label64.Caption=第五页.Text60.Text

Label65.Caption=第五页.Text52.Text

EndIf

保存方案到\VB.doc的代码如下

PrivateSubCommand2_Click（）

IfLabel60.Caption<>""Then

If第四页.Option1=TrueThenL="A"'A楞型的代号

If第四页.Option2=TrueThenL="B"'B楞型的代号

If第四页.Option3=TrueThenL="C"'C楞型的代号

Else:

L=""

EndIf

IfLabel63.Caption<>""Then

If第四页.Option5=TrueThenM="AB"'Ab楞型的代号

If第四页.Option6=TrueThenM="AC"'Ac楞型的代号

If第四页.Option7=TrueThenM="BC"'bc楞型的代号

Else:

M=""

EndIf

If第四页.Option8=TrueThenX="一级"

If第四页.Option9=TrueThenX="二级"

If第四页.Option10=TrueThenX="三级"

If第四页.Option11=TrueThenX="四级"

Open（app.Path&"\VB.Doc"）ForOutputAs#1

Print#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.Caption

Close#1EndSub

2.3制作系统界面7

添加窗体，名称改为第七页，添加“适用范围内销运输0201瓦楞纸箱（瓦楞纸板材料含水量很小）”“参考文献：

《包装结构设计》（第二版中国轻工出版社）”“《VisualBasic程序设计教程》（上海交通大学出版社）”“《VisualBasic程序设计教程习题及习题解答》（第二版电子工业出版社）”“《包装材料学》（吉林大学出版社）”五个标签.添加“返回继续使用”“上一步”“退出”三个命令按钮.添加“谢谢使用”标签.

2.4最后是查看保存到当前文件夹的vb.doc，根据以上方案，那我们将得到是的一下的一些数据.

2.5页面链接

右键单击第一页的“进入”命令，选择查看代码，选择command1，

输入第一页.Hide

第二页.Show

即

则单击第一页的“进入”按钮就会出现第二页的界面.同理，后面的页面也是这样链接的.

2.6音乐播放

这一段程序我们是网上找的是一个控件

这是申明PrivateDeclareFunctionShellExecuteLib"shell32.dll"Alias"ShellExecuteA"（ByValhwndAsLong,ByVallpOperationAsString,ByVallpFileAsString,ByVallpParametersAsString,ByVallpDirectoryAsString,ByValnShowCmdAsLong）AsLong

播放程序PrivateSubBOFANG_Click（）

WindowsMediaPlayer1.URL=App.Path&"\0.mp3"

EndSub

关闭程序PrivateSubtingzhi_Click（IndexAsInteger）

WindowsMediaPlayer1.Close

EndSub

2.7查看帮助链接

PrivateSubCHAKANBANGZHU_Click（）

ShellExecute0,"open",（App.Path&"\纸箱CAD帮助.chm"）,vbNullString,vbNullString,1

EndSub

2.8打印预览

PrivateSubdayinyulan_Click（）

IfDir（App.Path&"\vb.doc"）=""Then

MsgBox"请先确定纸箱的设计方案"&Chr（10）&"是否已经保存",0,"请注意"

Else:

ShellExecuteMe.hwnd,"open",（App.Path&"\vb.doc"）,vbNullString,vbNullString,1

EndIf

EndSub

3结论

本课题研究的是瓦楞纸箱包装CAD设计系统软件，采用面向对象技术的VB编程语言来进行计算机程序化实现，核心技术即设计流程程序化实现.

由于瓦楞纸箱设计参数、公式、表格众多，设计计算繁杂.各模块间由于选择的设计方法、初始化条件的不同会以不同的先后顺序相互联系，开发瓦楞纸箱CAD系统的难度是相当大的.因此本课题只是选取其中的一小部分进行简单研究，即重点是专门针对小型瓦楞纸箱设计的智能化，只适用于单箱重量不超过20KG的包装纸箱.

通过此次课题的研究，成功实现了小型瓦楞纸箱包装设计的计算机化.将瓦楞纸箱设计思想以计算机语言的形式表达出来，建立了友好的用户界面，实现箱型排列方式的自动选择；结构尺寸的计算；堆码、抗压强度的校核；操作使用便捷，提高设计效率，节省时间，降低了生产制作成本.

此外，由于时间和精力有限，课题仅对瓦楞标准箱型进行简单设计，在某些方面看来，考虑问题的角度也不是很全面的，比如箱型库、数据库的建立不够全面等等，这些的问题都是需要在今后的研究中来不断完善.建议今后的研究也可以对箱型库进行完善；对装箱排列方式进一步优化；在VB程序实现过程中加入数据库的使用，扩大软件适用范围.

通过一段时间的学习研究，学会了独立分析问题、解决问题的能力，了解了要独立完成一个项目是需要不断的付出，知道了文献在研究过程中的重要地位和作用，也懂得了做任何事情的时候都需要那种孜孜不倦的专研精神.