CAD 作為應用最廣泛的繪圖軟體，它的功能非常強大，基於CAD 環境下的二次開發也很方便。但是，在CAD 繪圖軟體的各種版本中，均無現成的常用結構圖形庫.本文介紹CAD常用結構參數化設計
針對各類零件特點的常用結構，如軸類零件的鍵槽、帶輪槽、密封圈槽、移出剖面圖和局部放大圖等，實現了對常用結構的參數化繪圖［1］。繪圖人員只要輸入要求的參數，就可以自動生成對應圖形，簡單方便實用。由於常用結構的編程過程非常相似，下面就以鍵槽為例，講述標準結構參數化設計及繪圖過程。
1 參數選擇
鍵槽是軸類零件上常見的結構，通過對圖1和圖2 的比較可見，只要圖2 中5 個參數給定，就可將鍵槽的主視圖和剖面圖確定下來［2］。而且，根據標準機械設計手冊，參數中的b、t 是由軸徑d決定的，那幺，繪圖過程需要的參數只有三個：d、l、a。而另外兩個參數b、t 可作為資料庫內容通過d 來查詢，這部分任務通過程序來完成。因此，經過分析可知，繪圖人員只要輸入參數d、l、a 的數值就能快速簡潔地完成（圖2）了。
2 編程思路
2. 1 建立Access 資料庫
普通平鍵及鍵槽尺寸如圖3 所示。
Access 是開發小型資料庫應用系統的理想工具，功能靈活，易於學習和操作［3］。本軟體便採用Access 來建立資料庫。表的結構非常簡單，只是對機械手冊相關表格中部分欄位的選取。對於鍵槽來說，則採用如表1 的表格形式（表1 只選取完整表格的一部分）。
2. 2 資料庫操作部分
本軟體對資料庫的操作使用ADO（ActiveXData Objects）方式［3］。
其中，打開資料庫的語句如下：
Public Const DATABASE As String = " 常用
結構. mdb"
Private cnn As ADODB. Connection
Set cnn = New ADODB. Connection
cnn. ConnectionString = " Provider = Microsoft. Jet. OLEDB. 4. 0；
Data Source = " - + App. path +
" " + DATABASE + " ；"4
cnn. Open
對資料庫中的數據，本軟體最常用的是查詢功能。例如：根據所給軸的直徑d 查詢鍵槽的相關尺寸b、t 的查詢語句如下：
SELECT b，t FROM 普通平鍵及鍵槽尺寸表
WHERE d > dmin and d < = dmax.
其他對資料庫的操作與查詢類似，不再贅述。
2. 3 繪圖部分
對於鍵槽結構來說，圖形分為兩部分：主視圖和剖面圖。線條比較簡單，主要採用畫直線和圓弧的命令，尺寸標註也主要採用線性型尺寸標準方式，它的基本命令為：
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）
當然，繪圖部分實現最終的圖形顯示，在程序中難免有相當多的數據的傳輸調用。本文採用的是全局變數的形式。例如軸徑：Public d As Double。
與CAD 的介面可以使用菜單方式，也可以採用命令方式，都非常方便簡單。
3 結束語
本文所實現的對常用結構的參數化設計，是在CAD 環境下，利用VBA 這種編程語言完成的。界面簡潔，簡單易用，減少了繪圖人員的查閱標準時間，減輕了繪圖工作量，提高了出圖速度，並且可以避免在繪圖和查表的交錯進行中產生的失誤，具有一定的實用價值。
以上就是本文的內容CAD常用結構參數化設計，是進行二次語言vba 編程完成的功能。非常實用。希望本文對你有鎖幫助。
