【正文】 )appr(2) = pt1(0) + CDbl(Trim()) / 2: appr(3) = pt1(1) + CDbl(Trim())appr(4) = pt1(0) + CDbl(Trim()) / 2: appr(5) = pt1(1) CDbl(Trim())appr(6) = pt1(0) CDbl(Trim()) / 2: appr(7) = pt1(1) CDbl(Trim())Set acadtx = (appr) = True第5章 箱包CAD原型系統(tǒng) 系統(tǒng)菜單本次設(shè)計的箱包CAD系統(tǒng)菜單包括常用工具菜單和專業(yè)工具菜單，常用工具菜單包含直線、矩形、圓等常用作圖工具，專業(yè)工具菜單包括裁片對位、背包拋圍、打褶、打角、曲線編輯、導(dǎo)出表格等菜單和菜單模塊。另部分為箱包CAM系統(tǒng)菜單包括排刀工具菜單和排料工具菜單。其中箱包CAM系統(tǒng)部分非本次設(shè)計所作。箱包CAD/CAM系統(tǒng)的菜單可從AutoCAD菜單文件添加，也可設(shè)置快捷鍵。箱包CAD/。 系統(tǒng)菜單 常用工具菜單常用工具菜單包含直線、圓、矩形、梯形、點、角度線等常用的作圖工具，這些工具是工程制圖中最常見的工具。這也是作為箱包設(shè)計中不可或缺的一部分。這些功能在AutoCAD中除了梯形、垂直線、角度線都有原型存在，而本次設(shè)計采用人機交互界面實現(xiàn)這些功能。 常用工具菜單 專業(yè)工具菜單 專業(yè)工具菜單專業(yè)工具菜單包含裁片對位、打褶、曲線編輯菜單塊和背包拋圍、打角導(dǎo)出表格等工具。裁片對位是箱包和服裝類設(shè)計軟件的必須工具模塊，該模塊包括牙型牙位、裁片拼接、搭位等工具。背包拋圍根據(jù)前后片之間的距離展開背包側(cè)片，并用鏡像、平移等功能完成拋圍工作。打褶菜單包括單褶、多褶和工字褶等功能，是現(xiàn)代箱包設(shè)計的流行元素。打角功能從基礎(chǔ)圖樣中設(shè)計邊角使其成型從而可以生成裁片。曲線編輯菜單模塊包含自由曲線和封閉曲線，工具建立曲線后可通過修改控制點來完成設(shè)計需要的曲線形狀。導(dǎo)出表格功能為導(dǎo)出裁片信息、物料信息。 系統(tǒng)工具欄系統(tǒng)工具欄從菜單文件中加載，在AutoCAD環(huán)境中的自定義工具欄功能可對工具欄和按鈕進行修改。工具欄共有常用工具欄和專業(yè)工具欄兩個（）。常用工具欄有點、直線、垂直線、角度線、圓、圓弧、矩形、梯形、修剪等功能按鈕。專業(yè)工具欄有導(dǎo)出表格、裁片對位、文字、標注、曲線、鏡像等功能按鈕。 系統(tǒng)工具欄 直線、角度線和垂直線按鈕直線工具：創(chuàng)建相對于起始點任意長度和角度的直線。點擊后拾取兩點為初始線，兩點之間的長度和初始線的角度顯示在直線用戶窗體的長度和角度輸入框中（）。然后修改參數(shù)，點擊確定按鈕生成直線。 直線窗體長度輸入框角度輸入框計算長度和角度結(jié)束修改長度和角度選擇起點和終點畫出直線單擊直線按鈕點擊確定點擊取消 直線算法流程角度線工具：創(chuàng)建相對于目標直線任意長度和相對角度的直線。點擊后先選取目標直線對象，然后選取直線創(chuàng)建的起始點，彈出角度線用戶窗體（）輸入長度和角度參數(shù)創(chuàng)建直線。 角度線窗體結(jié)束選擇目標直線畫出角度線選擇插入點輸入長度輸入相對角度點擊確定點擊確定單擊角度線按鈕 角度線算法流程圖垂直線工具：創(chuàng)建垂直于目標直線任意長度的直線。點擊后選取目標直線對象，然后選取直線創(chuàng)建的起始點，彈出垂直線用戶窗體輸入長度參數(shù)和垂直方向創(chuàng)建直線（）。 垂直線窗體結(jié)束選擇目標直線畫出垂直線選擇插入點輸入長度選擇垂直方向單擊垂直線按鈕點擊確定點擊取消 垂直線算法流程圖 矩形、梯形和圓按鈕梯形工具：創(chuàng)建以起始點為一個角點的任意長度和寬度的矩形。點擊后拾取兩點為起始對角點的初始矩形，初始長度和寬度顯示在矩形用戶窗體的對應(yīng)輸入框中（），可修改參數(shù)和選擇是否倒圓角并可分開輸入上下邊的圓角半徑，點擊確定生成矩形。 矩形窗體長度輸入框?qū)挾容斎肟蛴嬎汩L度和角度結(jié)束修改長度和寬度選擇矩形對角點畫出矩形單擊矩形按鈕點擊確定點擊取消是否倒圓角輸入圓角 矩形算法流程圖梯形按鈕：創(chuàng)建以起始點為中心的任意形狀和大小的等腰梯形。點擊后拾取中心點，彈出梯形用戶窗體（），輸入上底、下底和高等參數(shù)創(chuàng)建梯形。 梯形窗體輸入下底選擇梯形中心點輸入下底輸入下底結(jié)束畫出梯形單擊梯形按鈕點擊確定點擊取消 梯形算法流程圖圓按鈕：創(chuàng)建以起始點為圓心任意大小半徑的圓。點擊后拾取圓心，彈出圓用戶窗體（），輸入半徑創(chuàng)建圓。 圓窗體半徑輸入框計算半徑結(jié)束修改半徑選擇圓心和圓上一點畫出圓單擊圓按鈕點擊確定點擊取消 圓算法流程圖 箱包CAD系統(tǒng)應(yīng)用簡單實例 箱包CAD應(yīng)用簡單實例本實例使用矩形、直線、鏡像、文字、修剪、垂直線、標尺等工具完成。導(dǎo)出表格按鈕：（），這些數(shù)據(jù)可用于產(chǎn)生加工時的刀具軌跡。結(jié)論箱包的CAD系統(tǒng)能夠很好地為箱包的制造參考跟標準進行生產(chǎn)，并且有著非常方便、快捷的功能，讓設(shè)計人員不需要花費大量的時間去完成這個繁瑣、復(fù)雜的工藝設(shè)計，使勞動力跟生產(chǎn)力大幅度的提高。用CAD軟件進行箱包設(shè)計能大量節(jié)省資源和時間，大大的降低生產(chǎn)成本，提高企業(yè)的效益。中國箱包、服裝產(chǎn)業(yè)的設(shè)計、制造方式相對歐美國家還是比較落后的，CAD系統(tǒng)的普及對中國的制造行業(yè)的貢獻是不可估量的。本文通過對箱包的市場和設(shè)計的分析，以及幾款現(xiàn)有的箱包設(shè)計軟件的分析作為切入點，再對幾種AutoCAD二次開發(fā)語言進行比較，最終選擇VBA作為開發(fā)語言。先全面分析了箱包CAD/CAM系統(tǒng)的結(jié)構(gòu)，再介紹了基于VBA的AutoCAD二次開發(fā)的步驟和箱包CAD系統(tǒng)的開發(fā)實例，最后展示了箱包CAD系統(tǒng)的結(jié)構(gòu)和使用實例。本次設(shè)計的目的主要是了解箱包CAD系統(tǒng)的構(gòu)成、框架，并對箱包CAD系統(tǒng)進行比較淺層次的開發(fā)。首先對箱包CAD系統(tǒng)的構(gòu)造要有一定深度的了解，對箱包出格設(shè)計工具在箱包設(shè)計中的具體的作用要有清楚的認識。設(shè)計過程中主要用的就是AutoCAD軟件，AutoCAD上自帶的二次開發(fā)工具VBA，利用VBA進行二次開發(fā)，得到符合本設(shè)計CAD系統(tǒng)要求的工具。AutoCAD軟件是常用的繪圖軟件，在對AutoCAD了解的基礎(chǔ)上才能進行很好的二次開發(fā)。目前市場上有很多的箱包設(shè)計軟件，各有各的優(yōu)點，這些軟件也都在不斷的發(fā)展更新中，箱包產(chǎn)業(yè)的發(fā)展離不開CAD軟件的支持。參考文獻[1] 張春興，／CAM系統(tǒng)[J].中國皮革，1997，26(4).[2] 于述平，[D].大連：大連藝術(shù)學(xué)院，2001.[3] [J].甘肅科技縱橫，2009，38(4).[4] [J].絲綢技術(shù)，1999(3).[5] [J].科學(xué)咨詢，2008(19).[6] [J].科技創(chuàng)新導(dǎo)報，2009（14）.[7] [J].浙江紡織服裝職業(yè)技術(shù)學(xué)院學(xué)報，2007(1).[8] 劉寶華，[J].新技術(shù)新工藝，2008(2).[9] 方貴盛，[J].機床與液壓，2007，35（6）.[10] 黃毓瑜等. 尺寸驅(qū)動的變參設(shè)計系統(tǒng)研究[J]. 工程圖學(xué)學(xué)報, .[11] 劉宏躍. 刀具參數(shù)化設(shè)計系統(tǒng)的研究與開發(fā)[J]. 工具技術(shù), .[12] 高永惠. AutoCAD參數(shù)化設(shè)計與實現(xiàn)[J]．懷化學(xué)院學(xué)報，.[13] 楊剛．CAD系統(tǒng)中的參數(shù)化設(shè)計[J]．四川兵工學(xué)報,2009．4.[14] 張偉．基于VBA的矩形花鍵拉刀參數(shù)化設(shè)計[J]. 湖北汽車工業(yè)學(xué)院學(xué)報,. [15] 韋林．基于AutoCAD的直齒輪齒廓的參數(shù)化設(shè)計[J]. 機械設(shè)計與制造,.[16] Michael J．Pratt，Billn Anderson，Tony Ranger．Towards the Standardized Exehange of Parameterized FeatureBased CAD Models[J]．ComputerAided Desig n，2005(37).[17] Aldefeld B．Variation of geometries based on a geometricreasoning method[J],20(3).致謝本文是在文和平老師的精心指導(dǎo)下完成的。文老師的指導(dǎo)對于我理解AutoCAD和AutoCAD二次開發(fā)提供了很大幫助，文老師以其嚴謹求實的治學(xué)態(tài)度、高度的敬業(yè)精神、兢兢業(yè)業(yè)、孜孜以求的工作作風(fēng)和大膽創(chuàng)新的進取精神對我產(chǎn)生重要影響，感謝文老師在百忙中抽出時間引導(dǎo)我完成本次項目的順利完成。在這次的畢業(yè)設(shè)計中，鞏固了AutoCAD的知識，學(xué)到了VBA的編程方式。在此衷心的感謝他！