齒輪加工動畫仿真是齒輪設計中的重要環(huán)節(jié)，已有數(shù)篇關(guān)于該課題的文獻。郭曉東采用基于AutoCAD環(huán)境的ObjectARX軟件包，用C++語言在AutoCAD環(huán)境下實現(xiàn)了對錐齒輪切齒過程的仿線DSMAX環(huán)境中開發(fā)了齒輪機構(gòu)工作動畫；馮涓在CAD環(huán)境下，用AutoLisp語言建立了范成法加工齒輪的仿真演示程序。

　　以上各種方法都有自己的特點，本文用VB對AutoCAD進行二次開發(fā)來實現(xiàn)齒輪加工的三維動畫仿真，這是因為VB是目前最簡捷的Windows軟件開發(fā)工具兼程序設計語言，能對AutoCAD進行二次開發(fā)，可將AutoCAD當成自己程序中的一個圖形窗口對其進行打開、繪圖等操作，能十分方便地實現(xiàn)齒輪加工的動畫仿真。

　　常見的齒輪加工方法有仿形法和范成法，范成法又包括齒輪插刀加工法、齒條插刀和齒輪滾刀加工法等。加工直齒圓柱齒輪的仿線 仿真程序流程圖

　　本程序只用一個窗體，用四個文本框接收輸入?yún)?shù)：齒數(shù)Z、模數(shù)m、壓力角α和變位系數(shù)x，用4個命令框控制子程序，1個命令框取消運行程序。該窗體運行結(jié)果如圖2所示。

　　用VB控制AutoCAD，是通過VB的Object技術(shù)來控制AutoCAD的對象及其方法和屬性的。VB6.0在調(diào)用AutoCAD 2000對象時，首先必須在VB中引用該對象庫，方法是在VB的“Projects/Preferences”菜單中選擇“AutoCADObjectLibrary”。

　　程序設計伊始，需定義一個AutoCAD對象變量GearCAD，通過該變量可以訪問AutoCAD的下級對象，定義方法為：Dim GearCAD As AcadApplication。然后在VB的窗體代碼中添加如下代碼，即可在程序運行時啟動AutoCAD：

　　其中，NewDirection（0 To 2）為雙精度型一維數(shù)組變量，存放視點的三維坐標。

　　用SendCommand方法實現(xiàn)圖形著色，本程序中使用Gouraud著色方式，可使三維模型表面光滑，富有逼真的質(zhì)感。其代碼如下：

　　在程序中先根據(jù)輸入的參數(shù)計算出齒輪的齒根圓半徑Rf、齒頂圓半徑Ra、分度圓半徑R、基圓半徑Rb、輪坯厚度Height和軸孔半徑r等。再利用AddCylinder方法分別生成一個以Ra為半徑的一個圓柱體Gear3d和一個以r為半徑的圓柱體Hole，再用布爾減（Boolean acSubtraction）方法生成齒輪中間的軸孔。

　　以齒條刀具為例，刀具模型形狀和刀具實體創(chuàng)建完畢時，分別如圖3和圖4所示。

　　(6)將齒條刀具Tool3d一端平移至與輪坯剛好相遇，準備切齒。平移尺寸根據(jù)變位系數(shù)x、模數(shù)m等參數(shù)算出。

　　(2)刀具向前水平移動，每次移動距離（πm/n）mm，n為正整數(shù)；刀具沿齒輪毛坯上下移動（用Move方法實現(xiàn)）切制出齒輪厚度方向齒形；

　　圖5和圖6分別為齒條插刀和仿形銑齒的動畫仿線 齒條插刀動畫仿線 仿形銑齒動畫仿真

　　通過VB對AutoCAD進行二次開發(fā)，實現(xiàn)了VB界面對AutoCAD中對象的控制，既發(fā)揮了VB在科學計算、數(shù)據(jù)處理及界面友好和事件驅(qū)動方面的優(yōu)勢，又利用了AutoCAD的精確繪圖功能。我們借此方便地實現(xiàn)了齒輪加工的三維動畫仿真，這在科研和教學方面有較大的實用性。