autocad_vba教程--普天同慶

1、1AutocadAutocadVBAVBA初級(jí)教程初級(jí)教程(第一課第一課:入門(mén)入門(mén))作者：網(wǎng)友普天同慶|閱讀次數(shù)：2315轉(zhuǎn)自：CAD世界網(wǎng)論壇時(shí)間：2005年4月25日16:38第一課：入門(mén)第一課：入門(mén)1.為什么要寫(xiě)這個(gè)教程市面上ACADVBA的書(shū)不多，它的幫助是英文版的，很多人看不懂。其實(shí)我轉(zhuǎn)行已經(jīng)好幾年了，而且手藝也慢慢生疏了，寫(xiě)個(gè)教程對(duì)自己來(lái)說(shuō)也是一次復(fù)習(xí)。2.什么是AutocadVBA？VBA是VisualBasicfAppl

2、ications的英文縮寫(xiě)，它是一個(gè)功能強(qiáng)大的開(kāi)發(fā)工具，學(xué)好VBA可以成倍甚至成百、成萬(wàn)倍提高工作效率，在工作中，有很多任務(wù)僅用ACAD命令不可能完成的，只要學(xué)好VBA就可以做到，相信到時(shí)候您一定會(huì)得到同事的佩服、老板的器重。3、VBA有多難？相信大家都知道Basic是的含義。應(yīng)該承認(rèn)，我的水平還不高，錯(cuò)誤之處在所難免，如果大家發(fā)現(xiàn)錯(cuò)誤一定要提出批評(píng)，以便及時(shí)更正。4、怎樣學(xué)習(xí)VBA？介紹大家一個(gè)學(xué)習(xí)公式：信心恒心=開(kāi)心。仔細(xì)閱讀本教程

3、，完成例題，在學(xué)習(xí)的過(guò)程中一定要多思考，多想一些是什么、為什么。本教程將陸續(xù)發(fā)布在CAD世界論壇上，您不需要付費(fèi)就可以學(xué)習(xí)。本作者在此鄭重承諾：關(guān)于本教程中有任何疑問(wèn)，可以跟貼提問(wèn)，只要有時(shí)間，本人一定會(huì)耐心解答。我不會(huì)發(fā)到任何人的郵箱中，您自己在論壇上找就可以了，請(qǐng)不要再向我索要這份教程。5、現(xiàn)在我們開(kāi)始編寫(xiě)第一個(gè)程序：畫(huà)一百個(gè)同心圓第一步：復(fù)制下面的紅色代碼第二步：在模型空間按快捷鍵AltF8，出現(xiàn)宏窗口第三步：在宏名稱(chēng)中填寫(xiě)C10

4、0，點(diǎn)“創(chuàng)建”、“確定”第四步：在Subc100()和EndSub之間粘貼代碼第五步：回到模型空間，再次按AltF8，點(diǎn)擊“運(yùn)行”Subc100()Dimcc(0To2)AsDouble聲明坐標(biāo)變量cc(0)=1000定義圓心座標(biāo)cc(1)=1000cc(2)=0Fi=1To1000Step10開(kāi)始循環(huán)CallThisDrawing.ModelSpace.AddCircle(cci10)畫(huà)圓NextiEndSub也許您還看不懂上面的代碼

5、，這沒(méi)有關(guān)系，只要能把同心畫(huà)出來(lái)就可以了，祝您成功。第二課第二課編程基礎(chǔ)編程基礎(chǔ)本課主要任務(wù)是對(duì)上一課的例程進(jìn)行詳細(xì)分析3很多情況下，后面可以不加step10如：Fi=1to100，它的作用是每循環(huán)一次i值就增加1Nexti語(yǔ)句必須出現(xiàn)在需要結(jié)束循環(huán)的位置，不然程序沒(méi)法運(yùn)行。下面看畫(huà)圓命令：CallThisDrawing.ModelSpace.AddCircle(cci10)Call語(yǔ)句的作用是調(diào)用其他過(guò)程或者方法。ThisDrawin

6、g.ModelSpace是指當(dāng)前CAD文檔的模型空間AddCircle是畫(huà)圓方法Addcicle方法需要兩個(gè)參數(shù)：圓心和半徑CC就是圓心坐標(biāo)，i10就是圓的半徑，本例中，這些圓的半徑分別是10、110、210、310……本課到此結(jié)束，下面請(qǐng)完成一道思考題：1.以(42)為圓心，畫(huà)5個(gè)同心圓，其半徑為15本章將為你介紹AutoCADVBA工程及VBA交互開(kāi)發(fā)環(huán)境(VBAIDE)。盡管大部分VBA環(huán)境在行為上都是相似的，但AutoCADVB

7、AIDE還是有些獨(dú)有的特性。在AutoCAD中還有些相關(guān)的命令可以用于裝載工程、運(yùn)行工程，或打開(kāi)VBAIDE環(huán)境。本章將概要介紹VBA工程、VBA命令和VBAIDE的使用。本章具體內(nèi)容如下：了解嵌入和全局VBA工程用VBA管理器組織工程處理宏用VBAIDE編輯工程更多的信息回顧AutoCADVBA工程術(shù)語(yǔ)回顧AutoCADVBA命令了解嵌入和全局VBA工程返回目錄來(lái)源：明經(jīng)通道作(譯)者：鄭立楷上傳者：mccad上傳時(shí)間：2002年8月

8、29日AutoCADVBA工程是代碼模塊、類(lèi)模塊和窗體的集合，它們組合起來(lái)以執(zhí)行給予的功能。工程可保存在AutoCAD圖形中，或作為獨(dú)立的文件保存。嵌入工程是保存在AutoCAD圖形中。當(dāng)包含有這些工程的圖形中AutoCAD打開(kāi)時(shí)，他們可以自動(dòng)地裝載，這種方法可以很方便地分發(fā)工程給用戶。嵌入工程也有它的極限，它不能打開(kāi)或關(guān)閉AutoCAD圖形，那是由于他們的函數(shù)只存在于工程所在的文檔中。使用嵌入工程不需要在運(yùn)行程序之前查找并裝載工程文件

9、。舉個(gè)含有嵌入工程的圖形的例子，當(dāng)圖形打開(kāi)時(shí)，一個(gè)時(shí)間日志被觸發(fā)。通過(guò)這樣一個(gè)宏的應(yīng)用可以登記并記錄用戶在該圖形上所花費(fèi)的時(shí)間。這時(shí)用戶不必去記住在打開(kāi)圖形之前裝載工程，這就是自動(dòng)操作的一個(gè)很好的例子。全局工程保存在獨(dú)立的文件中，它更加通用，因?yàn)樗麄兡茉贏utoCAD圖形中運(yùn)行，也能打開(kāi)、關(guān)閉AutoCAD圖形，但它在圖形打開(kāi)時(shí)不能自動(dòng)裝載。用戶必須知道他們所需要的宏包含在哪個(gè)工程文件中。然而，全局工程非常容易與其它使用者共享，它可以將

10、通用的宏做為很好的庫(kù)而存在。舉個(gè)例子，你保存在一個(gè)工程文件中的宏是有關(guān)多個(gè)圖形的材料清單。這個(gè)宏可以在工作周期的末期由管理員運(yùn)行，這樣就可以收集到所有圖形的信息。在特定的時(shí)間，用戶可以在同個(gè)AutoCAD進(jìn)程中同時(shí)裝載嵌入工程和全局工程。AutoCADVBA工程與VisualBasic工程在二進(jìn)制結(jié)構(gòu)上是不兼容的。然而，其中的窗體、模塊和類(lèi)可以通過(guò)在VBAIDE環(huán)境中使用輸入和輸出VBA命令來(lái)在工程之間進(jìn)行轉(zhuǎn)換。關(guān)于VBAIDE的更多信