【導讀】深刻認識，作為計算機組成的一部分，AutoCAD已成為當今計算機輔助設計軟件之一。中多個圖層進行塊的插入比較麻煩，尤其是對地形圖符號的插入更是繁瑣。中創(chuàng)建塊，然后再插入，這樣操作起來步驟繁瑣、費時且麻煩，工作量比較大并且容易出錯。來的軟件開發(fā)中有借鑒作用并在使用上有實際意義。

　　

【正文】 Sub Private Sub CommandButton2_Click() End 退出程序 End Sub Private Sub CommandButton3_Click() Dim pt1 As Variant pt1 = (, 請輸入插入點 ) = pt1(0) 獲得插入點 坐標 = pt1(1) = pt1(2) End Sub Private Sub CommandButton4_Click() Dim xs As Double xs = Val(InputBox(請輸入 X比例 :, X比例因子 )) 統(tǒng)一 插入 比例 = xs = xs = xs End Sub Private Sub UserForm_Initialize() 界面初始化 xp1 = 0 初始插入點為 0,0,0 yp1 = 0 zp1 = 0 xscale1 = 初始插入比例為 , yscale1 = zscale1 = End Sub 模塊設置 Public i 設置 i為全 局變量 Sub bysj() 程序運行先顯示地形圖符號界面 End Sub 21 6 調試和測試系統(tǒng)功能 調試與測試 在程序輸入階段，應該充分利用 VBA 編輯器的智能功能。當你在寫代碼時，輸入一些字母后，編輯器可以自動列出合適的語句、對象、函數供你選擇，可以用上下鍵選擇，然后按 TAB 鍵確認。當輸入一個回車符后程序會自動對這條語句進行分析，如果出現錯誤就會提示 .在運行 VBA 時 經常遇到的錯誤類型有： 。 這種邏輯錯誤在編寫程序時很容易見，當你想運行一個事件過程并且檢驗它時，建立的圖形用戶界面時，文本框中的 Name 屬性已經更新，在編寫程序時，代碼的 Name 屬性必須與文本框一致。有 IF語句時，必須要有 END IF 結尾。 ， VBA 解釋程序有時會立即發(fā)現有編譯錯誤。當程序轉換成可執(zhí)行的形式時，錯誤也可能 被 編輯程序發(fā)現。 編譯錯誤的出現就是因為輸入了不正確的代碼，當輸入的語句沒有滿足Visual Baisc 語言句法上的要求時，一些編 譯錯誤就會立即出現。例如： ① 編譯錯誤：子過程或函數未定義 ② 編譯錯誤：語法錯誤 ③ 編譯錯誤：方法或數據成員未找到 針對上述編譯錯誤，我采取了如下措施： 找到未定義的子過程或函數 進行定義；對于語法錯誤的地方進行修改，并不斷的進行測試等。 。 當代碼被運行的同時這些語句試圖執(zhí)行非法操作時，將會發(fā)生運行錯誤。例如， 運行時錯誤，無法獲取 document 對象。 當正在使用調用對象的變量時，將產生另一個普通的運行錯誤，那就是在賦值語句中缺少 Set 語句。 VBA IDE 不能很好的解決這些錯誤 ，但在出現錯誤時它確實能提供有用的功能，你必須盡可能的確保輸入的代碼在句法上是正確的，以便解釋程序能理解它。列外一些特點就是當程序不是按照所期望的要求去執(zhí)行的時候，它能輔助你調試代碼。 22 其它問題及解決方案 在設計的過程中，雖然取得的一定的成效，學到了不少的東西，但也出現了一定的問題： VBA 如何初始化？ ， Auto CAD 忙。 有了問題，自然就要想辦法去解決，具體的解決辦法如下： CAD安裝目下，通過 VBA 語言實現絕對路徑查找 ； Initalize 事件初始化 AutoCAD VBA； ，在窗體 1 中設置變量值，在窗體 2中通過條件選擇實現圖標與圖形的一一對應關系； ，重命名文件 ； ：一是按 ESC 鍵；二是按回車鍵，使命令結束。 23 小 結 基于 AutoCAD的地形圖符號自動生成的開發(fā)與研究，在這次的設計使得我解決問題的能力以及運用工具的能力提高了，同時也讓我弄清了以前對系統(tǒng)開發(fā)的一些模糊的認識，而且提 高了系統(tǒng)開發(fā)的水平，培養(yǎng)了嚴謹的工作作風，對我來說是一次很好的鍛煉。在這短暫的兩個月我們這組人員在開始時一起選擇資料，討論問題，互相幫助解決了一部分問題，大家都基本上完成了自己的任務。我相信只要努力學習了就會有收獲。 基于 AutoCAD，使用 VBA語言進行二次開發(fā)， 實現地形圖符號的自動生成 ，并已將自動生成菜單掛在 CAD軟件上，實現了它自身的價值。從而也展示 VBA語言在 AutoCAD二次開發(fā)中的應用和 AutoCAD的可擴展性和實用性以及這一開發(fā)的現實意義。 整個設計過程中，自己參考了不少書本，吳老師也給予了不 少幫助，也上網查了不少資料。雖然基本功能實現了，但是因為時間緊張，而未能將所有地形圖符號都實現自動生成。目前還只能針對點狀地形圖符號和部分面狀符號實現自動生成，線型符號還有待進一步開發(fā)。 24 參考文獻 [1]張晉西 .Visual Basic與 AutoCAD二次開發(fā)［ M］ .北京： 清華大學出版社， 2020. [2]二代龍震工作室 .AutoCAD VBA函數庫查詢辭典［ M］ . 北京： 中國鐵道出版社， 2020. [3]李鳳華 .AutoCAD2020 VBA開發(fā)指南［ M］ . 北京： 清華大學出版社 2020. [4]張帆 .AutoCAD VBA開發(fā)精彩實例教程［ M］ . 北京： 清華大學出版社， 2020. [5]張帆，鄭立楷，盧擇臨，王成煌等 .AutoCAD VBA 二次開發(fā)教程 [M]. 北京 ： 清華大學出版社 .2020年 . [6]張帆，鄭立楷，王華杰 .AutoCAD VBA開發(fā)精彩實例教程 [M].北京： 清華大學出版社 . 2020年 . [7]佟士懋等 .二次開發(fā)技術基礎及應用實例 AutoCAD ActiveX/VBA［ M］ . 北京： 國防工業(yè)出版 .2020. [8]蔣新生，徐輝等 .基于 AutoCAD 開放式系統(tǒng)軟件的用戶菜單開發(fā) [J].重慶： 重慶工業(yè)高等?？茖W校學報 . [9]汪昌成，段成龍，曾小惠 .AutoCAD 的二次開發(fā)技術 [J].機械設計與制造 ,中國知網： 2020(6) [10]經通道 論壇 AutoCAD VBA二次開發(fā)版塊 . [11 博學天下論壇 [12 CAD設計論壇 [13]Marion Cottingham 著孔祥豐譯 .AutoCAD VBA 從入門到精通［ M］ .北京： 電子工業(yè)出版社， 2020. 25 致 謝 通過這一階段的努力，我的畢業(yè)論文《 基于 AutoCAD的地形圖符號自動生成的開發(fā)與研究 》終于完成了，這意味著大學生活即將結束。在大學階段，我在學習上和思想上都受益非淺，這除了自身的努力外，與各位老師、同學和朋友 以及家人 的關心、支持和鼓勵是分不開的。 首先要 感謝我的爸爸媽媽，焉得諼草，言樹之背，養(yǎng)育之恩，無以回報，你們永遠健康快樂是我最大的心愿。 在本論文的寫作過程中，我的導師 吳 老師傾注了大量的心血，從選題到開題報告，從 設計思路 ，到 編程中出現的各種問題 ，嚴格把關，循循善誘，在此我表示衷心感謝。同時我還要感謝在我學習期間給我極大關心和支持的各位老師以及關心我的同學和朋友。 寫作畢業(yè)論文是一次再系統(tǒng)學習的過程，畢業(yè)論文的完成，同樣也意味著新的學習生活的開始。我將銘記我曾是一名 城院 學子，在今后的工作中把 城院 的優(yōu)良傳統(tǒng)發(fā)揚光大。 感謝各位專家的批評指導。