你當(dāng)前的位置>>主頁>>AutoCAD>>AutoCAD二次開發(fā)
 
                      在AutoCAD2000中用VBA編程求冷沖模壓力中心
 

    隨著冷沖模設(shè)計任務(wù)的增多,依靠原來的手工方法計算不僅任務(wù)繁重,而且很容易出現(xiàn)計算錯誤;谏厦媲闆r,筆者在AutoCAD2000中用VBA編程,直接在圖紙上求解壓力中心,極大地降低了設(shè)計人員的工作強度。這種方法比手工方法計算更準(zhǔn)確,也使冷沖模的壽命更長。

  一、概 述

   冷沖模壓力中心是沖裁力合力的作用點,準(zhǔn)確求解壓力中心對于冷沖模的正常工作至關(guān)重要。

   在AutoCAD中,常用的求壓力中心的方法是先用pedit命令將沖裁邊編輯成多義線,再向兩邊偏移微小距離,運用一定的編輯方法圍繞沖裁邊形成一個狹窄封閉區(qū)域,用region命令編輯成面域,再用AutoCAD的Massprop命令求出面域質(zhì)心,此質(zhì)心接近壓力中心。對于復(fù)雜沖裁件,上述方法操作起來比較繁瑣,并且用Pedit命令編輯時要求線與線之間必須完全連接(特別是當(dāng)從其他繪圖軟件轉(zhuǎn)換過來的圖形連接不是很好時,這點影響較大)。更為重要的是,每一次求解壓力中心都得進(jìn)行類似的繁瑣工作。

   基于上述原因,筆者依據(jù)最基本,也是最準(zhǔn)確的計算法,運用AutoCAD2000下VBA編程求解沖模的壓力中心,再將其做成按鈕,置于查詢(Inquiry)工具條上,即可在所畫圖形上直接求解壓力中心。程序基本思路為:先選擇代表沖裁邊的圖元對象,再逐一判斷是何種對象,從而轉(zhuǎn)入相應(yīng)對象的計算處理。根據(jù)計算法原理,將此對象的壓力中心求出,并將它們當(dāng)作一個對象,與下一個對象計算,求出新的壓力中心,直至處理完所有對象。最后求出的壓力中心即為整個沖模的壓力中心。

    二、程序輸入及按鈕制作

  (1)打開AutoCAD2000,選擇工具菜單下Visual basic編輯器,輸入程序并存為Code.dvb文件(其文件位置假設(shè)為D:\presscenter\code.dvb)。

  (2)選擇AutoCAD工具菜單下的加載應(yīng)用程序,在Startup suite中加入保存的Code.dvb文件,關(guān)閉各對話框。以后在啟動AutoCAD時,將自動加載此工程文件。

  (3)打開視圖菜單下工具欄(Toolbar)對話框,選取查詢工具條,則查詢工具條出現(xiàn)在界面上。接著點Customize按鈕,出現(xiàn)Customize toolbar對話框,在此對話框的Categories條目中選Custom,下面將出現(xiàn)兩個空白按鈕,其中一個帶小三角(可用鼠標(biāo)在小三角前點擊,即可發(fā)現(xiàn)是兩個按鈕),將第一個空白按鈕(不帶小三角)拖至查詢工具欄中,查詢工具欄中出現(xiàn)一個空白按鈕,此時按Custmize toolbar對話框的Close按鈕。

   (4)在Toolbar對話框激活的情況下,在剛加入的空白按鈕上按鼠標(biāo)右鍵,出現(xiàn)Button properties對話框,在Name 欄輸入“壓力中心”字樣,在Macro欄輸入^c^c-vbarun D:/presscenter/code.dvb!ThisDrawing.presscenter (注意:vbarun命令前有小橫線,后面要加空格,另外,路徑必須是Code.dvb文件保存的路徑,路徑中反斜桿的方向與一般的路徑表示方向相反)。再點Edit按鈕,編輯按鈕的圖樣,最后按Close按鈕,并關(guān)閉各對話框,就完成了按鈕的制作。以后在打開AutoCAD時,此按鈕和其他工具欄按鈕一樣可隨時起作用了。

     
三、示例及操作

  (1)在AutoCAD中畫出圖 1所示的多凸模沖裁件,此工件是在矩形坯料上同時沖出5個不同形狀的孔,并切去一個10x45°的角。
          
                                           圖 1

  (2)點選制作的壓力中心按鈕,出現(xiàn)Select objects:提示,根據(jù)提示在AutoCAD圖形界面上選五個孔及10x45°斜邊(注意不選外沿的四條邊),回車,則自動求出壓力中心點,其坐標(biāo)值為(64,28.5)。

      四、說 明

(1)在選擇沖裁邊時,注意不要選上諸如中心線,尺寸線等不是沖裁邊的對象。
(2)在選擇沖裁邊前,一定要將用多義線、矩形、多邊形命令畫的圖元用炸開命令(Explode)炸開成單獨圖元。
(3)程序中的注釋在程序錄入時可忽略。
(4)以上程序在Windows2000和AutoCAD2000上調(diào)試通過,由于是直接計算,故結(jié)果準(zhǔn)確。
(5)如果是局域網(wǎng)用戶,請先在Administrator用戶下運行一次,再轉(zhuǎn)入標(biāo)準(zhǔn)用戶使用。
(6)此種方法前期工作比較復(fù)雜(如程序錄入、按鈕制作等),但完成以后求解壓力中心的操作會非常簡單,在實際應(yīng)用中效果很好。

(7)按鈕制作在不同Autodesk版本下稍有不同,請參閱相關(guān)技術(shù)資料。

五、應(yīng)用效果

     由于紡織機械上鈑金件非常多,特別是湖北宜昌紡織機械有限公司新開發(fā)的玻璃纖維捻線機、直捻機、電錠倍捻機基本上是由鈑金件組成,因此,冷沖模設(shè)計任務(wù)越來越多,依靠原來的手工方法計算不僅計算任務(wù)繁重,而且很容易計算錯誤。校對的人也要進(jìn)行驗算,如果驗算結(jié)果不一致,都得反復(fù)計算。因此,筆者利用計算機直接在圖紙上求解壓力中心,極大的降低了設(shè)計人員的工作強度,并且比手工方法計算得更準(zhǔn)確,從而對冷沖模的壽命更有好處。另外,將按鈕直接做在AUTOCAD的工具條上,畫完圖后,直接選擇沖裁邊計算壓力中心,非常方便。在近兩年的實際應(yīng)用中,取得了很好的效果。

民眾工作室.制作      版權(quán)所有