【正文】 （414）1）如果dx 0,dy 0 ，則方位角a在第一象限；2）如果dx 0,dy 0 ，則方位角a在第二象限；3）如果dx 0,dy 0 ，則方位角a在第三象限；4）如果dx 0,dy 0 ，則方位角a在第四象限；5）如果dx 0,dy 0 ，則方位角a在第三象限； （415） （416）判斷線路走向：若a0 ,說明左轉(zhuǎn)，否則右轉(zhuǎn)， 如果a0則轉(zhuǎn)角取a+360的正值，否則取a；如果a0則轉(zhuǎn)角取a360的正值，否則取a。圖32 工程數(shù)據(jù)管理設(shè)計(jì) 平面數(shù)據(jù)管理本窗體主要實(shí)現(xiàn)了工程與平面線路的對(duì)應(yīng)關(guān)系，而且還實(shí)現(xiàn)了起點(diǎn)和終點(diǎn)坐標(biāo)里程的更改曲線特征的添加、刪除和更改。窗體里編寫可以任意起始里程、終止里程，以及是否繪制展示圖及填充物的代碼，本模塊詳細(xì)代碼見附表34 窗體本設(shè)計(jì)共有7個(gè)窗體其中一個(gè)窗體是被工程管理這個(gè)窗體添加工程時(shí)調(diào)用的，下面介紹幾個(gè)窗體的作用。Caidan模塊代碼見附表31。四個(gè)模塊名稱分別為：Caidan、Caidanxianshi、CommASS、DZSub。只有weiyanfenji表里的內(nèi)容清空后name表才可以被刪除，否則無法對(duì)name表進(jìn)行某些操作。表27 YT（巖性特征）表包括的字段及內(nèi)容字段數(shù)據(jù)類型定義備注YX_IDInt巖性地址主鍵YTIDInt巖性特征地址YTQXdecimal(18, 0)f巖性特征傾向YTQJdecimal(18, 0)巖性特征傾角DM_IDInt隧道斷面地址 數(shù)據(jù)庫中表的關(guān)聯(lián)圖上一節(jié)介紹了數(shù)據(jù)庫中建立的表及其內(nèi)容，具體這幾個(gè)表之間有什么樣的關(guān)系，我們是如何利用它們發(fā)揮作用的呢？(1)表xianlu里面將E_ID、JD_ID設(shè)為主鍵且E_ID為自動(dòng)標(biāo)識(shí)列，表name中E_ID設(shè)為主鍵，兩個(gè)表通過字段E_ID建立約束關(guān)系，其中xianlu是主鍵表，name是外鍵表。其中，E_ID表示工程的地址，不同的工程用不同的E_ID來區(qū)分；ENAME表示工程名稱，不同工程名稱用不同的E_ID表示；EPNAME表示工程打印名稱；EFX表示是否反向；LC表示工程包含的里程，詳細(xì)信息見表21 。 預(yù)期成果通過本設(shè)計(jì)過程，使學(xué)生掌握計(jì)算機(jī)輔助設(shè)計(jì)的基本技能，并具備AutoCAD二次開發(fā)的初步技能，提高其應(yīng)用計(jì)算機(jī)解決實(shí)際問題的能力水平，預(yù)期達(dá)到以下要求：（1）熟練掌握AutoCAD平臺(tái)Axtivex 開發(fā)技術(shù)；利用AutoCAD平臺(tái)Axtivex開發(fā)技術(shù)，在AutoCAD里實(shí)現(xiàn)了添加工具欄“地質(zhì)編錄”菜單項(xiàng)，在菜單項(xiàng)編寫下拉菜單記錄數(shù)據(jù)最終實(shí)現(xiàn)自動(dòng)繪制展示圖的目的。 步驟軟件開發(fā)流程一般分為以下六步：（1）相關(guān)系統(tǒng)分析和應(yīng)用需求的初步了解需求，然后用WORD列出要開發(fā)的系統(tǒng)的大功能模塊，每個(gè)大功能模塊有哪些小功能模塊，對(duì)于有些需求比較明確相關(guān)的界面時(shí)，在這一步里面可以初步定義好少量的界面。同樣我們?cè)谶@里應(yīng)用了CommASS模塊中編寫公共過程調(diào)用數(shù)據(jù)庫、執(zhí)行SQL語言的代碼；窗體里編寫可以執(zhí)行添加、刪除和更改填充比例的代碼。而窗體任然是對(duì)表進(jìn)行修改的一個(gè)工具。石家莊鐵道大學(xué)畢業(yè)設(shè)計(jì)CAD在建設(shè)工程實(shí)踐中的二次開發(fā)畢業(yè)設(shè)計(jì)論文第 1 章 緒 論 開發(fā)的意義、背景為了解決困擾工程地質(zhì)界的隧道地質(zhì)編錄繪圖難題，探索實(shí)現(xiàn)隧洞設(shè)計(jì)及施工地質(zhì)展示圖繪圖自動(dòng)化和計(jì)算機(jī)化的可能途徑，本文以田壩嶺隧道施工地質(zhì)為范例，提出了鐵路隧道地質(zhì)編錄自動(dòng)成圖系統(tǒng)概念和實(shí)施要點(diǎn)，實(shí)現(xiàn)了通過對(duì)AutoCAD平臺(tái)的二次開發(fā)最終實(shí)現(xiàn)自動(dòng)成圖的目的。在數(shù)據(jù)庫里建立sheji和shigong兩個(gè)表，這兩個(gè)表管理設(shè)計(jì)和施工的地質(zhì)信息。（4）自動(dòng)繪圖模塊設(shè)計(jì)、實(shí)現(xiàn)自動(dòng)繪圖要實(shí)現(xiàn)輸入任意一段里程后計(jì)算機(jī)自動(dòng)繪制展示圖的功能。（2）系統(tǒng)分析深入了解和分析需求，根據(jù)自己的經(jīng)驗(yàn)和需求用WORD或相關(guān)的工具再做出一份文檔系統(tǒng)的功能需求文檔。（2）初步具備利用關(guān)系型數(shù)據(jù)庫管理工程數(shù)據(jù)的能力數(shù)據(jù)庫里表建立聯(lián)系圖約束數(shù)據(jù)的變化，使數(shù)據(jù)庫中的表成為一個(gè)不可分離的整體執(zhí)行任務(wù)。表21 Name（工程名稱）表包括的字段及內(nèi)容字段數(shù)據(jù)類型定義備注E_IDInt工程地址主鍵ENAMEnvarchar(50)工程名稱EPNAMEnvarchar(50)工程打印名稱EFXbit反向LCnvarchar(15)工程里程（2）Sheji表主要記錄了平面線路沿線的地質(zhì)水文情況，E_ID表示某個(gè)工程對(duì)應(yīng)的水文地質(zhì)情況；GWID表示不同水文地質(zhì)的分界標(biāo)識(shí)；GWQZ表示工程水文地質(zhì)里程的前綴（DK）；GWM表示工程水文地質(zhì)的描述信息；GWLC不同工程水文地質(zhì)情況分界的里程，詳細(xì)信息見表22。強(qiáng)制外鍵約束、強(qiáng)制與復(fù)制，標(biāo)識(shí)名稱是xianlu_name_pk。(5)表YT里面將YX_ID設(shè)置為主鍵并與yanxing表通過字段YX_ID建立約束關(guān)系，其中是YT主鍵表，yanxing是外鍵表，強(qiáng)制外鍵約束、強(qiáng)制與復(fù)制、標(biāo)識(shí)名稱是YT_yanxing_pk。窗體名稱分別為：工程管理、工程數(shù)據(jù)管理、平面數(shù)據(jù)管理、編錄出圖、巖性表管理、打印。 Caidanxianshi 模塊模塊功能說明：本模塊主要功能是顯示下拉菜單項(xiàng)窗體，并實(shí)現(xiàn)其相應(yīng)操作的功能函數(shù)。 工程管理窗體工程管理窗體的作用是實(shí)現(xiàn)對(duì)工程的操作，在本窗體里我們可以用insert語句在數(shù)據(jù)庫name表里添加新的工程，用delete語句刪除name表里不用的工程，還可以對(duì)原有工程名稱用update語句進(jìn)行修改。窗體設(shè)置及按鈕布局如圖33所示。 參數(shù)計(jì)算圓曲線在ZH—XY坐標(biāo)下的切線角 （417）緩和曲線在ZH—XY坐標(biāo)下的切線角 （418）內(nèi)移參數(shù) （419）增值參數(shù) （420）緩和曲線的切線長(zhǎng) （421）緩和曲線的曲線長(zhǎng) （422）緩直點(diǎn)坐標(biāo)和里程 （423） （424） （425） （426）1）如果且，則所求里程點(diǎn)在直線上，2）如果 且 ，則所求里程點(diǎn)在緩和曲線上 （427） （428）a0時(shí)，曲線走向=a1+β；a0時(shí)，曲線走向=a1β。 建立連接對(duì)象 在進(jìn)行連接之前，必須要先聲明一個(gè)對(duì)象來作為ASP程序和數(shù)據(jù)庫之間的連接媒介，聲明的方法如下：Set對(duì)象變量名稱=(“”)連接數(shù)據(jù)源 Connection對(duì)象中有一個(gè)方法：OPEN，專門用來打開Connection對(duì)象與數(shù)據(jù)庫之間的通道，實(shí)現(xiàn)數(shù)據(jù)源與ASP程序的真正連通。 Database=數(shù)據(jù)庫名稱。（1）執(zhí)行SQL命令后，不返回記錄集在執(zhí)行像Insert、Delete、Update等命令時(shí)，操作結(jié)果不會(huì)返回記錄集，它只是對(duì)數(shù)據(jù)庫完成一種操作，可以使用下列格式的命令： “SQL命令” [n ]，N：是一個(gè)可選項(xiàng)變量名。創(chuàng)建Recordset 對(duì)象 第一種方法前面介紹過的通過連接對(duì)象的Execute()方法返回的查詢結(jié)果自動(dòng)創(chuàng)建RecordSet，這種方法創(chuàng)建的記錄集對(duì)象可以直接使用，而不用先創(chuàng)建對(duì)象實(shí)例。是為True不是為False。移動(dòng)當(dāng)前指針的方法有5種，除了Move方法有兩個(gè)參數(shù)外，其余的四個(gè)不含參數(shù)，使用很方便。AddNew：添加一條新的空記錄。 CancalUpdate：撤消更新操作。通過復(fù)選框選擇多條要?jiǎng)h除的記錄，這種方式一般要設(shè)計(jì)兩個(gè)動(dòng)態(tài)頁面，一個(gè)動(dòng)態(tài)頁面用于提供可供選擇的刪除記錄，每個(gè)記錄前有一個(gè)復(fù)選框，供用戶確定該記錄是否要?jiǎng)h除；另一個(gè)動(dòng)態(tài)頁面用于獲取選擇頁面所提交的刪除記錄的特征值，從而確定要?jiǎng)h除的記錄。打開 VBA 管理器的步驟：在工具菜單中選擇宏 VBA 管理器或者在 AutoCAD中調(diào)用 VBAMAN 命令。還有， AutoCAD 在啟動(dòng)時(shí)將自動(dòng)裝載名稱為 的工程文件。嵌入工程到圖形中：當(dāng)你嵌入一個(gè)工程時(shí)，你是將工程的一個(gè)副本置于圖形數(shù)據(jù)庫中。如果你不想保存該工程信息到外部文件，可以在 “ 你是否想在刪除 VBA 工程前將其輸出？ ” 的提示下選擇 “ 否 ” ，此時(shí)工程信息將在沒有保存的情況下從圖形中刪除。使用 VBA 管理器保存工程的操作：打開 VBA 管理器并選擇要保存的工程；選擇另存為，此時(shí)另存為對(duì)話框打開；選擇用于保存工程的文件；選擇保存 處理宏 與設(shè)置 VBA 工程選項(xiàng)一樣，宏對(duì)話框允許你運(yùn)行、編輯、刪除和創(chuàng)建宏。它可幫助你注意到當(dāng)前有多少宏裝載到圖形中或指定工程中有多少宏。編輯宏的操作：打開宏對(duì)話框并選擇要編輯的宏； 選擇編輯。如果你在提示下選擇“取消”宏對(duì)話框?qū)⑾?，宏也沒有創(chuàng)建。工程窗口有它自己的工具欄，使用其工具欄可打開不同的工程部件進(jìn)行編輯。在 AutoCAD VBA 工程，該對(duì)象聲稱為當(dāng)前AutoCAD 圖形。你有責(zé)任更新所有部件的屬性 ( 如部件的名稱 ) 并在其中寫入適當(dāng)?shù)拇a。當(dāng)你輸入一個(gè)部件文件，文件 的一個(gè)副本將輸入并增加到工程中。編輯部件的操作：在 VBA IDE 的工程窗口中，選擇你要編輯的部件；選擇工程窗口中的查看代碼按鈕以打開代碼窗口；選擇工程窗口中的查看對(duì)象按鈕以打開用戶窗體窗口和關(guān)聯(lián)的工具箱。在“巖性表管理”中可以添加所需要的巖性、刪除多余的巖性并且可以更新填充比例，詳見圖（63） 平面數(shù)據(jù)錄入在田壩嶺隧道這個(gè)工程里添加本線路包含的特征參數(shù)，本工程有5個(gè)交點(diǎn)：0、3，其中JD_ID=1時(shí)表示終點(diǎn)曲線的信息，JD_ID=0表示起點(diǎn)曲線信息，因?yàn)槠瘘c(diǎn)是直線所以我們可以把起點(diǎn)的里程錄入到lo里方便以后使用。該段為泥盆系中統(tǒng)組砂巖、泥質(zhì)砂巖夾頁巖，青灰色，紫紅色，中細(xì)粒質(zhì)結(jié)構(gòu)，中厚厚層狀?yuàn)A薄層狀，巖質(zhì)較硬。該段巖性灰?guī)r和砂巖、泥質(zhì)砂巖夾頁巖，中厚薄層狀，巖質(zhì)軟硬相間?！?0176。巖體較破碎，層間結(jié)合差，巖體穩(wěn)定性較差，巖體呈碎石塊石狀構(gòu)造,局部碎石角礫狀構(gòu)造，易掉塊。426547426435巖體極破碎，巖體穩(wěn)定性差，推測(cè)為斷層破碎帶，巖體呈散體結(jié)構(gòu)。∠30176。圖65 工程數(shù)據(jù)管理設(shè)計(jì)圖66 工程數(shù)據(jù)管理施工 編錄出圖點(diǎn)擊工具欄的“地質(zhì)編錄”菜單，然后選擇“編錄出圖”項(xiàng)彈出對(duì)話框如圖66。使工作量由軟件從已編寫的數(shù)據(jù)庫文件中提取數(shù)據(jù)自動(dòng)生成圖形。在逐步的完善中希望可以的到一個(gè)功能齊全的應(yīng)用軟件，使得我們只需要提供隧道勘測(cè)數(shù)據(jù)和施工數(shù)據(jù)就能很快的到一個(gè)滿意的結(jié)果，大大減少工作量節(jié)省時(shí)間。它討論了集成系統(tǒng)的必要性，以及在結(jié)構(gòu)工程背景下，要以確定有針對(duì)性的集成的幾個(gè)維度為目標(biāo)。這些就導(dǎo)致了“系統(tǒng)集成”的發(fā)展，以聯(lián)系更多具體的應(yīng)用。事實(shí)上，最早的建筑圖紙可以追溯到公元前 2000 年。然而，無論是從時(shí)間還是計(jì)算機(jī)資源來說，這種功能都是昂貴的。它不僅證明不只2D起草和三維效果的最佳功能相結(jié)合造型的成功，而且還允許設(shè)計(jì)器獨(dú)立或聯(lián)合來部署它們的靈活性。因此，沒有在 CAD 系統(tǒng)的處理不完全表示中的非圖形設(shè)計(jì)信息結(jié)果設(shè)施自這兩個(gè)方面的設(shè)計(jì)信息 （圖形和非圖形） 的組成部分，描述的是設(shè)計(jì)元素。此類應(yīng)用程序應(yīng)能夠從 CAD 系統(tǒng)中提取信息，而且在適當(dāng)?shù)那闆r下，提供系統(tǒng)的輸入功能。集成的數(shù)據(jù)結(jié)構(gòu)因圖形化和非圖形設(shè)計(jì)的結(jié)合信息強(qiáng)化了窗體和設(shè)計(jì)元素之間的關(guān)系，從而確保一個(gè)更完整的表示功能。根據(jù)新的英國(guó)標(biāo)準(zhǔn)： 28 英寸39。這兩個(gè)組件的有系統(tǒng)的協(xié)調(diào)對(duì)CAD 系統(tǒng)是至關(guān)重要的，不只是在于增加靈活性并使系統(tǒng)容易使用，而且確保面向設(shè)計(jì)器的計(jì)算機(jī)輔助設(shè)計(jì)系統(tǒng)的正常使用。在上面的方法中，通過確保允許自由操作設(shè)計(jì)器的靈活性的數(shù)據(jù)結(jié)構(gòu)，將完全忽略圖形表示形式。它可以這樣說不需要對(duì)應(yīng)用程序39。如前所述，3d 技術(shù)的建模能力和處理非圖形數(shù)據(jù)能力大大提高 CAD 系統(tǒng)與其他應(yīng)用程序鏈接的潛力。此外集成的方法是支持多用戶等設(shè)計(jì)團(tuán)隊(duì)工作、 交換信息、處理潛在的分布式和并發(fā)訪問的。綜合CAD 數(shù)據(jù)庫集成的設(shè)計(jì)任務(wù)可能同時(shí)跨不同學(xué)科。數(shù)據(jù)可以抽象的模型材料列表中從工程計(jì)算的分析、 設(shè)計(jì)、 代碼檢查，估計(jì)時(shí)，制造或生產(chǎn)和項(xiàng)目管理。 或 39。用戶界面上表現(xiàn)出的許多重大改進(jìn)對(duì)現(xiàn)有的 CAD 系統(tǒng)所具有的數(shù)據(jù)設(shè)計(jì)器的結(jié)構(gòu)有很大幫助。概念證明發(fā)展中采用的方法原型基于 39。（BS1192： 第 5 部分)。4 集成的數(shù)據(jù)結(jié)構(gòu)和用戶界面盡管它很重要，這也是集成的一個(gè)水平，是不充分處理的計(jì)算機(jī)輔助設(shè)計(jì)系統(tǒng)。使用關(guān)系數(shù)據(jù)結(jié)構(gòu)，可以更好地處理非圖形設(shè)計(jì)信息。顯然，計(jì)算機(jī)化的全部?jī)?yōu)點(diǎn)，不能以這種方式實(shí)現(xiàn)。3 集成的圖形和非圖形數(shù)據(jù)圖形表示的重要性不只在于它作為一種通訊手段而設(shè)計(jì)的傳統(tǒng)角色而且還在于其把設(shè)計(jì)器中的信息思維過程化。大多數(shù)工程結(jié)構(gòu)應(yīng)用程序中，三維模型被認(rèn)為不可行，復(fù)雜且昂貴的。這些系統(tǒng)提供了輸入和操作圖形的工具，以及在給定的平面上完成合適的圖紙的可能。這些故障是由于早期嘗試太硬性的集成而約束了程序員關(guān)于程序設(shè)計(jì)的看法。該文簡(jiǎn)要討論了實(shí)現(xiàn)這些層次的一體化的手段，以及關(guān)于集成系統(tǒng)的未來發(fā)展的探討。Kramer, Bill. AutoCAD VBA Programming: Tools and Techniques ：San Francisco, Calif. CMP [12] Gibb,