第一課：入門(mén)
1.為什么要寫(xiě)這個(gè)教程
市面上ACAD VBA的書(shū)不多，它的幫助是英文版的，很多人看不懂。其實(shí)我轉(zhuǎn)行已經(jīng)好幾年了，而且手藝也慢慢生疏了，寫(xiě)個(gè)教程對(duì)自己來(lái)說(shuō)也是一次復(fù)習(xí)。
2.什么是Autocad VBA？
VBA是Visual Basic for Applications的英文縮寫(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ì)閱讀本教程，完成例題，在學(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ù)制下面的紅色代碼
第二步：在模型空間按快捷鍵Alt+F8，出現(xiàn)宏窗口
第三步：在宏名稱中填寫(xiě)C100，點(diǎn)“創(chuàng)建”、“確定”
第四步：在Sub c100()和End Sub之間粘貼代碼
第五步：回到模型空間，再次按Alt+F8，點(diǎn)擊“運(yùn)行”
Sub c100()
Dim cc(0 To 2) As Double '聲明坐標(biāo)變量
cc(0) = 1000 '定義圓心座標(biāo)
cc(1) = 1000
cc(2) = 0
For i = 1 To 1000 Step 10 '開(kāi)始循環(huán)
Call ThisDrawing.ModelSpace.AddCircle(cc, i * 10) '畫(huà)圓
Next i
End Sub
也許您還看不懂上面的代碼，這沒(méi)有關(guān)系，只要能把同心畫(huà)出來(lái)就可以了，祝您成功。
