摘 要AutoCAD 是機械設(shè)計人員最常用地繪圖工具，功能無比強盛，但常因缺少常用結(jié)構(gòu)圖形庫而影響繪圖效力，為此，論文提到在AutoCAD 環(huán)境下采用AutoCAD VBA 方式對于機械圖形中地常用結(jié)構(gòu)做一個參數(shù)化設(shè)計地解決計劃。因為常用結(jié)構(gòu)地開發(fā)方式相似，便以軸類整機中鍵槽結(jié)構(gòu)地主視圖和剖面圖為例，講述了Access 數(shù)據(jù)庫地構(gòu)建方式、利用ADO 方式來開發(fā)數(shù)據(jù)庫地進程和編程實現(xiàn)終極圖形地過程。

    關(guān)鍵詞AutoCAD，常用結(jié)構(gòu)，參數(shù)化設(shè)計

    AutoCAD 視為運用最普遍地繪圖軟件，它地功能異常壯大，基于AutoCAD 環(huán)境下地2次開發(fā)一樣很便利。然而，在AutoCAD 繪圖軟件地各種版本中，均無現(xiàn)成地常用結(jié)構(gòu)圖形庫。本文采用AutoCAD VBA（Visual Basic for Applications）,電氣繪圖軟件，針對于各類零件特色地常用結(jié)構(gòu)，像軸類零件地鍵槽、帶輪槽、密封圈槽、移出剖面圖和部分放大圖等，實現(xiàn)了對于常用結(jié)構(gòu)地參數(shù)化繪圖［1］。繪圖人員只有輸入請求地參數(shù)，就可以主動天生對于應(yīng)圖形，簡單方便實用。因為常用結(jié)構(gòu)地編程過程非常類似，下面就以鍵槽為例，講述標(biāo)準(zhǔn)結(jié)構(gòu)參數(shù)化設(shè)計及繪圖過程。

1 參數(shù)抉擇

    鍵槽是軸類零件上常見地結(jié)構(gòu)，通過對于圖1和圖2 地比較可見，只要圖2 中5 個參數(shù)給定，就可將鍵槽地主視圖和剖面圖斷定下來［2］。而且，根據(jù)標(biāo)準(zhǔn)機械設(shè)計手冊，參數(shù)中地b、t 是由軸徑d決議地，那么，繪圖過程須要地參數(shù)只有3個d、l、a。而另外兩個參數(shù)b、t 可當(dāng)為數(shù)據(jù)庫內(nèi)容通過d 來查詢，這部分義務(wù)通過程序來完成。因而，經(jīng)由分辨可知，繪圖人員只要輸入?yún)��?shù)d、l、a 地數(shù)值就能疾速簡潔地完成（圖2）了。

2 編程思路

    2. 1 建破Access 數(shù)據(jù)庫

    普通平鍵及鍵槽尺寸類似這樣圖3 所示。

    Access 是開發(fā)小型數(shù)據(jù)庫利用體系地幻想工具，功效機動，易于學(xué)習(xí)跟操作［3］。本軟件便采用Access 來樹立數(shù)據(jù)庫。表地構(gòu)造十分簡略，只是對于機械手冊相干表格中部門字段地選取。對鍵槽來說，則采取如表1 地表格情勢（表1 只選取完全表格地1局部）。

    2. 2 數(shù)據(jù)庫操作部分

    本軟件對于數(shù)據(jù)庫地操作應(yīng)用ADO（ActiveXData Objects）方式［3］。

其中，翻開數(shù)據(jù)庫地語句類似下
Public Const DATABASE As String = " 常用
結(jié)構(gòu). mdb"
Private cnn As ADODB. Connection
Set cnn = New ADODB. Connection
cnn. ConnectionString = " Provider = Microsoft.
Jet. OLEDB. 4. 0；Data Source = " - + App. path +
" " + DATABASE + " ；"
cnn,PDM系統(tǒng). Open

    對于數(shù)據(jù)庫中地數(shù)據(jù)，本軟件最常用地是查詢功能。例像這樣依據(jù)所給軸地直徑d 查詢鍵槽地相關(guān)尺寸b、t 地檢查語句類似下

SELECT b，t FROM 一般平鍵及鍵槽尺寸表
WHERE d > dmin and d < = dmax.

    其余對于數(shù)據(jù)庫地操作與查詢類似,3DVIA，不再贅述。

    2. 3 繪圖部分

    對于于鍵槽結(jié)構(gòu)來說，圖形分為兩部分主視圖和剖面圖。線條比擬簡單，重要采用畫直線和圓弧地命令，尺寸標(biāo)注一樣主要采用線性型尺寸標(biāo)準(zhǔn)方法，它地基礎(chǔ)命令為

ThisDrawing. ModelSpace. AddDimAligned（ startPoint，
endPoint，location）。

下面以繪直線為例，表明作圖過程［4］
startPoin（t 0） = ArcCenPointX +（d/ 2# - t）
startPoin（t 1） = ArcCenPointY + b / 2

startPoin（t 2） = 0#
endPoin（t 0） = ArcCenPointX +（d / 2# - t）
endPoin（t 1） = ArcCenPointY - b / 2
endPoin（t 2） = 0#
Set lineObj =
ThisDrawing. ModelSpace. AddLine（ startPoint，
endPoint）

    當(dāng)然，繪圖部分實現(xiàn)最終地圖形顯示,電氣制圖軟件，在程序中未免有相稱多地數(shù)據(jù)地傳輸調(diào)用。本文采用地是全局變量地形式。例類似這樣軸徑Public d As Double。

    與AutoCAD 地接口可以使用菜單方式，一樣可以采用命令方式，都非常方便簡單。

3 停止語

    本文所實現(xiàn)地對于常用結(jié)構(gòu)地參數(shù)化設(shè)計，是在AutoCAD 環(huán)境下，應(yīng)用VBA 這種編程語言實現(xiàn)地。界面簡練，簡單易用，減少了繪圖職員地查閱尺度時光，減輕了繪圖工作量，進步了出圖速度，并且能夠防止在繪圖和查表地交織進行一個中發(fā)生地失誤，存在必定地適用價值。

參考文獻

［1］董玉德，譚建榮，趙韓，等. AutoCAD 系統(tǒng)開發(fā)技術(shù)-程序?qū)崿F(xiàn)
與實例［M］,PDM軟件. 合肥中國科學(xué)技術(shù)大學(xué)出版社，2001
［2］西北產(chǎn)業(yè)大學(xué)工程制圖教研室. 畫法多少何及機械制圖（ 下）
［M］. 西安陜西迷信技巧出版社，2000
［3］啟明工作室. Visual Basic Access 數(shù)據(jù)庫應(yīng)用系統(tǒng)開發(fā)與實例
［M］. 北京國民郵電出版社，2004
［4］張帆，鄭立楷，王華杰. AutoCAD VBA 開發(fā)出色實例教程
［M］. 北京清華大學(xué)出版社，2004