時(shí)間:2012-12-29 來(lái)源:合肥網(wǎng)hfw.cc 作者:hfw.cc 我要糾錯(cuò)
摘 要AutoCAD 是機(jī)械設(shè)計(jì)人員最常用地繪圖工具,,功能無(wú)比強(qiáng)盛,,但常因缺少常用結(jié)構(gòu)圖形庫(kù)而影響繪圖效力,,為此,,論文提到在AutoCAD 環(huán)境下采用AutoCAD VBA 方式對(duì)于機(jī)械圖形中地常用結(jié)構(gòu)做一個(gè)參數(shù)化設(shè)計(jì)地解決計(jì)劃。因?yàn)槌S媒Y(jié)構(gòu)地開(kāi)發(fā)方式相似,,便以軸類整機(jī)中鍵槽結(jié)構(gòu)地主視圖和剖面圖為例,,講述了Access 數(shù)據(jù)庫(kù)地構(gòu)建方式、利用ADO 方式來(lái)開(kāi)發(fā)數(shù)據(jù)庫(kù)地進(jìn)程和編程實(shí)現(xiàn)終極圖形地過(guò)程,。
關(guān)鍵詞AutoCAD,,常用結(jié)構(gòu),參數(shù)化設(shè)計(jì)
AutoCAD 視為運(yùn)用最普遍地繪圖軟件,,它地功能異常壯大,,基于AutoCAD 環(huán)境下地2次開(kāi)發(fā)一樣很便利。然而,,在AutoCAD 繪圖軟件地各種版本中,,均無(wú)現(xiàn)成地常用結(jié)構(gòu)圖形庫(kù)。本文采用AutoCAD VBA(Visual Basic for Applications),電氣繪圖軟件,,針對(duì)于各類零件特色地常用結(jié)構(gòu),,像軸類零件地鍵槽、帶輪槽,、密封圈槽,、移出剖面圖和部分放大圖等,實(shí)現(xiàn)了對(duì)于常用結(jié)構(gòu)地參數(shù)化繪圖[1],。繪圖人員只有輸入請(qǐng)求地參數(shù),,就可以主動(dòng)天生對(duì)于應(yīng)圖形,簡(jiǎn)單方便實(shí)用,。因?yàn)槌S媒Y(jié)構(gòu)地編程過(guò)程非常類似,,下面就以鍵槽為例,講述標(biāo)準(zhǔn)結(jié)構(gòu)參數(shù)化設(shè)計(jì)及繪圖過(guò)程。
1 參數(shù)抉擇
鍵槽是軸類零件上常見(jiàn)地結(jié)構(gòu),,通過(guò)對(duì)于圖1和圖2 地比較可見(jiàn),,只要圖2 中5 個(gè)參數(shù)給定,就可將鍵槽地主視圖和剖面圖斷定下來(lái)[2],。而且,,根據(jù)標(biāo)準(zhǔn)機(jī)械設(shè)計(jì)手冊(cè),參數(shù)中地b,、t 是由軸徑d決議地,,那么,繪圖過(guò)程須要地參數(shù)只有3個(gè)d,、l,、a。而另外兩個(gè)參數(shù)b,、t 可當(dāng)為數(shù)據(jù)庫(kù)內(nèi)容通過(guò)d 來(lái)查詢,,這部分義務(wù)通過(guò)程序來(lái)完成。因而,,經(jīng)由分辨可知,,繪圖人員只要輸入?yún)?shù)d、l,、a 地?cái)?shù)值就能疾速簡(jiǎn)潔地完成(圖2)了,。
2 編程思路
2. 1 建破Access 數(shù)據(jù)庫(kù)
普通平鍵及鍵槽尺寸類似這樣圖3 所示。
Access 是開(kāi)發(fā)小型數(shù)據(jù)庫(kù)利用體系地幻想工具,,功效機(jī)動(dòng),,易于學(xué)習(xí)跟操作[3]。本軟件便采用Access 來(lái)樹(shù)立數(shù)據(jù)庫(kù),。表地構(gòu)造十分簡(jiǎn)略,,只是對(duì)于機(jī)械手冊(cè)相干表格中部門(mén)字段地選取。對(duì)鍵槽來(lái)說(shuō),,則采取如表1 地表格情勢(shì)(表1 只選取完全表格地1局部),。
2. 2 數(shù)據(jù)庫(kù)操作部分
本軟件對(duì)于數(shù)據(jù)庫(kù)地操作應(yīng)用ADO(ActiveXData Objects)方式[3]。
其中,,翻開(kāi)數(shù)據(jù)庫(kù)地語(yǔ)句類似下
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
對(duì)于數(shù)據(jù)庫(kù)中地?cái)?shù)據(jù),,本軟件最常用地是查詢功能,。例像這樣依據(jù)所給軸地直徑d 查詢鍵槽地相關(guān)尺寸b、t 地檢查語(yǔ)句類似下
SELECT b,,t FROM 一般平鍵及鍵槽尺寸表
WHERE d > dmin and d < = dmax.
其余對(duì)于數(shù)據(jù)庫(kù)地操作與查詢類似,3DVIA,,不再贅述,。
2. 3 繪圖部分
對(duì)于于鍵槽結(jié)構(gòu)來(lái)說(shuō),圖形分為兩部分主視圖和剖面圖,。線條比擬簡(jiǎn)單,,重要采用畫(huà)直線和圓弧地命令,尺寸標(biāo)注一樣主要采用線性型尺寸標(biāo)準(zhǔn)方法,,它地基礎(chǔ)命令為
ThisDrawing. ModelSpace. AddDimAligned( startPoint,,
endPoint,location),。
下面以繪直線為例,,表明作圖過(guò)程[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)然,,繪圖部分實(shí)現(xiàn)最終地圖形顯示,電氣制圖軟件,,在程序中未免有相稱多地?cái)?shù)據(jù)地傳輸調(diào)用。本文采用地是全局變量地形式,。例類似這樣軸徑Public d As Double。
與AutoCAD 地接口可以使用菜單方式,,一樣可以采用命令方式,,都非常方便簡(jiǎn)單。
3 停止語(yǔ)
本文所實(shí)現(xiàn)地對(duì)于常用結(jié)構(gòu)地參數(shù)化設(shè)計(jì),,是在AutoCAD 環(huán)境下,,應(yīng)用VBA 這種編程語(yǔ)言實(shí)現(xiàn)地。界面簡(jiǎn)練,,簡(jiǎn)單易用,,減少了繪圖職員地查閱尺度時(shí)光,減輕了繪圖工作量,,進(jìn)步了出圖速度,,并且能夠防止在繪圖和查表地交織進(jìn)行一個(gè)中發(fā)生地失誤,存在必定地適用價(jià)值,。
參考文獻(xiàn)
[1]董玉德,,譚建榮,趙韓,,等. AutoCAD 系統(tǒng)開(kāi)發(fā)技術(shù)-程序?qū)崿F(xiàn)
與實(shí)例[M],PDM軟件. 合肥中國(guó)科學(xué)技術(shù)大學(xué)出版社,,2001
[2]西北產(chǎn)業(yè)大學(xué)工程制圖教研室. 畫(huà)法多少何及機(jī)械制圖( 下)
[M]. 西安陜西迷信技巧出版社,2000
[3]啟明工作室. Visual Basic Access 數(shù)據(jù)庫(kù)應(yīng)用系統(tǒng)開(kāi)發(fā)與實(shí)例
[M]. 北京國(guó)民郵電出版社,,2004
[4]張帆,,鄭立楷,王華杰. AutoCAD VBA 開(kāi)發(fā)出色實(shí)例教程
[M]. 北京清華大學(xué)出版社,,2004
短信驗(yàn)證碼 酒店vi設(shè)計(jì) NBA直播 幣安下載
關(guān)于我們 | 打賞支持 | 廣告服務(wù) | 聯(lián)系我們 | 網(wǎng)站地圖 | 免責(zé)聲明 | 幫助中心 | 友情鏈接 |
Copyright © 2025 hfw.cc Inc. All Rights Reserved. 合肥網(wǎng) 版權(quán)所有
ICP備06013414號(hào)-3 公安備 42010502001045