【正文】 助設(shè)計(jì)系統(tǒng)用戶應(yīng)該有一定的了解他們的體系結(jié)構(gòu)如何和操作數(shù)據(jù)。設(shè)計(jì)器可以操縱視圖以適合個(gè)別項(xiàng)目要求，并且自動(dòng)更新，以確保這兩個(gè)邏輯和拓?fù)涞囊恢滦浴？梢詫Ρ鹊氖?，系統(tǒng)操作之間的橋梁和感知設(shè)計(jì)器允許設(shè)計(jì)師更好地了解范圍和更有效地部署CAD 系統(tǒng)。在中這種方式，幾個(gè)應(yīng)用程序可以同時(shí)訪問相同的池設(shè)計(jì)信息?？梢钥闯觯煞椒ú粦?yīng)是那么混亂，更好的結(jié)構(gòu)化也更易于管理。多學(xué)科工作，或者跨越不同公司之間也可以。 集成的探討多個(gè)應(yīng)用程序集成的合理路徑位于集成的所有相關(guān)數(shù)據(jù)輸入和輸出 CAD 數(shù)據(jù)庫可以訪問的應(yīng)用程序。 但只是 39。用戶界面上表現(xiàn)的重大改進(jìn)使許多現(xiàn)有的 CAD 系統(tǒng)從所具有的數(shù)據(jù)結(jié)構(gòu)發(fā)展到設(shè)計(jì)器屏蔽的結(jié)構(gòu)。所需計(jì)算機(jī)輔助設(shè)計(jì)的同時(shí)，顯示數(shù)據(jù)結(jié)構(gòu)和關(guān)聯(lián)的圖形表示形式。 構(gòu)建計(jì)算機(jī)圖形信息 39。另一方面，實(shí)際上沒有構(gòu)成用戶界面之間的用戶感知的間接尋址級別CAD 系統(tǒng)。對于一個(gè)原型系統(tǒng)，成立一個(gè)訪問機(jī)制，可以允許圖形化和非圖形化設(shè)計(jì)的雙向協(xié)調(diào)信息。尋求整合的 CAD 系統(tǒng)圖形和非圖形數(shù)據(jù)也有潛力作為修飾符來使用非圖形信息其相關(guān)聯(lián)的圖形化表示形式的定義選擇性的編輯和/或顯示操作。因此，圖形表示具有與非圖形數(shù)據(jù)相關(guān)聯(lián)的有關(guān)函數(shù)（屬性和性能標(biāo)準(zhǔn)）的設(shè)計(jì)元素。一個(gè)集成的 2D/3d 系統(tǒng)允許2D 起草相平衡的經(jīng)濟(jì)更大的功能和協(xié)調(diào)可能的3d建模。根據(jù)這些系統(tǒng)分類方法定義的模型線框模型，39。如今已經(jīng)可以通過理性和系統(tǒng)的方式來實(shí)現(xiàn)各維度的集成。版權(quán)1996 CivilComp有限公司和愛思唯爾科技有限公司。從課題的選擇到項(xiàng)目的最終完成，牛老師都始終給予我細(xì)心的指導(dǎo)和不懈的支持。雖然有老師一路的指導(dǎo)但此期間更多的問題需要我們自己去嘗試去摸索，在無數(shù)的失敗與教訓(xùn)中增長經(jīng)驗(yàn)?zāi)ゾ氁庵?。通過對這些模塊的設(shè)計(jì)實(shí)現(xiàn)了把工程地質(zhì)情況數(shù)據(jù)化的目的，用窗體實(shí)現(xiàn)對數(shù)據(jù)庫表的管理操作。426280受構(gòu)造影響重（斷層影響外帶），結(jié)構(gòu)面發(fā)育，巖體呈塊石碎石狀結(jié)構(gòu)，巖體完整性較差。面產(chǎn)狀為110176。潮濕，局部點(diǎn)滴狀。層面產(chǎn)狀為110176。潮濕427956427765該段巖性為灰色微風(fēng)化泥質(zhì)砂巖，中厚層面產(chǎn)狀為110176。該段巖性為砂巖、泥質(zhì)砂巖夾頁巖，中厚層厚層狀，埋深較淺，巖質(zhì)較硬。表62 設(shè)計(jì)時(shí)地質(zhì)工程數(shù)據(jù)工程名稱圍巖分級工程水文地質(zhì)里程前綴里程級別里程前綴里程描述田壩嶺隧道DK429000ⅣDK429000注1DK427200ⅢDK427200注2DK426900ⅣDK426900注3DK426500ⅢDK426500注4DK426330ⅤDK42685注5DK426200ⅣDK42685Ⅴ注：表里對工程水文地質(zhì)的描述字?jǐn)?shù)比較多使表格不協(xié)調(diào)，所以列到注釋里。添加工程名稱的步驟：點(diǎn)擊工具欄的“隧道地質(zhì)編錄”菜單項(xiàng) 選擇“工程管理”項(xiàng)彈出（圖61） 點(diǎn)擊“添加工程”按鈕彈出（圖62），根據(jù)提示錄入信息，工程名稱為“田壩嶺隧道進(jìn)口”，打印名稱為“田壩嶺隧道進(jìn)口圖”，起始里程“426085”，反向開挖不選中，信息錄入完畢退出對話框。從工程中輸入現(xiàn)存的部件的操作： 在 VBA IDE 的工程窗口中，選擇你要增加部件的工程；從文件菜單中，選擇輸入文件以打開輸入文件對話框；從輸入文件對話框中，選擇所要輸入的文件，然后按打開。新的模塊將被增加到你的工程中并出現(xiàn)在工程窗口中。類模塊部件包含你所有定義為類的自己的對象。如果不可見，可從查看菜單中選擇工程窗口，或按 CTRL+R ?；驈墓ぞ卟藛?，使用宏 V isual Basic 編輯器。創(chuàng)建新的宏操作：打開宏對話框并輸入新宏的名稱；在宏位置下拉列表中選擇所創(chuàng)建宏所要存在的位置；選擇創(chuàng)建。在嵌入工程中，ThisDrawi ng對象通常指向嵌入該宏的圖形。在對話框中顯示的是所有在有效范圍內(nèi)的宏名稱。新創(chuàng)建的工程將使用默認(rèn)的工程名稱 ACADproject 。嵌入工程到 AutoCAD 圖形中的操作：打開 VBA 管理器并選擇你所要嵌入的工程；選擇嵌入。如果你禁用代碼，工程同樣會(huì)裝載，但工程中的所有代碼將不能運(yùn)行。裝載現(xiàn)存的 VBA 工程文件：在 VBA 管理器中，使用裝載項(xiàng)可彈出打開 VBA 工程對話框；在打開 VBA 工程對話框中，選擇打開的工程文件。如果一次要修改某條記錄的多個(gè)字段值，而且不同記錄被修改的字段值也不相同時(shí)，建議使用記錄集對象的Update方法修改當(dāng)前記錄。在實(shí)際應(yīng)用時(shí)一般要設(shè)計(jì)2個(gè)網(wǎng)頁文檔，一個(gè)是數(shù)據(jù)輸入界面，另一個(gè)是完成記錄插入的數(shù)據(jù)更新的。Delete：刪除當(dāng)前記錄。Fields中的每個(gè)元素是一個(gè)字段對象。AbsolutePage：用來設(shè)置或返回當(dāng)前記錄所在的頁號(hào)。顯示記錄集中的數(shù)據(jù) 記錄集創(chuàng)建好后，可以通過它的屬性、方法和集合完成對記錄集中數(shù)據(jù)的顯示。以后就可以應(yīng)用Rs對象的各種方法進(jìn)行操作，非常方便。（1）關(guān)閉連接對象的命令格式為： 或 Set 連接對象變量名=Nothing關(guān)閉對象并非將它從內(nèi)存中刪除，以后仍可以更改它的屬性設(shè)置并且再次打開。mdb)}。通過ADO，應(yīng)用程序可以方便地存取、查詢、操作數(shù)據(jù)庫中的數(shù)據(jù)。圖35 編錄出圖 打印本窗體實(shí)現(xiàn)圖形的打印，窗體設(shè)置及按鈕布局如圖36所示。圖32 工程數(shù)據(jù)管理設(shè)計(jì)本窗體同樣需要初始化事件Initalize，同時(shí)窗體的添加、刪除、更新、退出等單擊事件Click與工程管理模式相同這里不再贅述。本模塊共包括10個(gè)過程，其中在函 數(shù) SetWorkPath里設(shè)置工作目錄；在函數(shù)GetWorkPath里獲得工作目錄；在函數(shù) GetDBName里獲得數(shù)據(jù)庫表名稱；在函數(shù)GetTKSize里獲取邊框尺寸，本過程設(shè)置圖框選項(xiàng)包括A0、AAAA4圖框尺寸；在函數(shù)DBOpen里設(shè)置數(shù)據(jù)庫表所在的位置打開本地?cái)?shù)據(jù)庫；函數(shù)ExecuteSQL在本過程里執(zhí)行SQL查詢，例如select、update、delete、insert語句；函數(shù)MakeLCStr本過程主要是規(guī)范里程書寫格式，是里程書寫規(guī)范化；函數(shù)MakeWCStr里實(shí)現(xiàn)了圍巖分級由數(shù)字轉(zhuǎn)化為希臘數(shù)字的功能；在函數(shù)MakeOldFWJ里方位角的度數(shù)表示，模塊具體的代碼見附表33。 Caidan 模塊模塊功能說明：本模塊屬于通用命令，主要功能是創(chuàng)建工具欄菜單，以及下拉菜單項(xiàng)?？偟膩碚f就是，表YT約束shigong、yanxing表，而表shigong、sheji、weiyanfenji、xianlu分別通過不同的主鍵約束表name。(3)表Shigong里面將DM_ID設(shè)置為主鍵并與name表通過字段E_ID建立約束關(guān)系，其中shigong是主鍵表，name是外鍵表，強(qiáng)制外鍵約束、強(qiáng)制與復(fù)制、標(biāo)識(shí)名稱是shigong_name_pk。表24 weiyanfenji（圍巖分級）表包括的字段及內(nèi)容字段數(shù)據(jù)類型定義備注E_IDInt工程地址WCCsmallint圍巖級別WCIDInt圍巖分級地址主鍵WCQZnvarchar(10)圍巖級別前綴WCLCdecimal(18, 0)圍巖級別里程（5）Xianlu表主要記錄了平面線路中曲線的特征值，E_ID表示某工程對應(yīng)的平面線路的曲線特征；JD_ID表示本工程里線路走向變化的點(diǎn)（交點(diǎn)）信息；X表示平面線路交點(diǎn)的橫向坐標(biāo)值；Y表示平面線路交點(diǎn)的縱向坐標(biāo)值；R表示緩和曲線中圓曲線半徑；lo表示曲線上的緩和曲線長，詳細(xì)信息見表25。本工程所建立的數(shù)據(jù)庫中有7個(gè)表組成，表名分別為Name、sheji、shigong、weiyanfenji、xianlu、yanxing、YT。（5）系統(tǒng)分析把寫好的概要設(shè)計(jì)文檔，根據(jù)所例出的功能一個(gè)一個(gè)的編寫。窗體里編寫可以輸入任意起始里程、終止里程以及是否繪制展示圖及填充物的代碼。為此我們搜集了一個(gè)比較齊全的巖性庫，然后在數(shù)據(jù)庫里建立表yanxing，用CommASS模塊中GetWorkPath過程調(diào)用巖性庫中我們使用的巖性添加到y(tǒng)anxing表中。在CommASS模塊中編寫公共過程用來調(diào)用數(shù)據(jù)庫、執(zhí)行SQL語言的代碼；在窗體里編寫可以執(zhí)行添加、刪除和更改，可以顯示起點(diǎn)和終點(diǎn)的坐標(biāo)里程且可以更改數(shù)據(jù)的代碼。用窗體代碼把數(shù)據(jù)管理起來，模塊代碼負(fù)責(zé)顯示工具欄菜單和下拉菜單。（3）填充圖例管理模塊設(shè)計(jì)、實(shí)現(xiàn)填充管理模塊用來實(shí)現(xiàn)管理巖石特性的功能。在CommASS模塊中編寫公共過程調(diào)用數(shù)據(jù)庫、執(zhí)行SQL語言的代碼；DZSub模塊里編寫字體、編寫字體邊框線、展示圖圖框定位、展示圖文字定位、調(diào)用數(shù)據(jù)庫表里的字段記錄信息等。（4）系統(tǒng)分析根據(jù)確認(rèn)的需求文檔所例用的界面和功能需求，用迭代的方式對每個(gè)界面或功能做系統(tǒng)的概要設(shè)計(jì)。下面是本程序解決問題時(shí)需要在數(shù)據(jù)庫中所建立的幾個(gè)表及其內(nèi)容的具體介紹。其中，E_ID表示某個(gè)工程里圍巖級別的變化情況；WCC表示某工程的圍巖級別變化情況；WCID表示圍巖級別變化處的地址；WCLC表示圍巖級別變化處的里程；WCQZ圍巖級別里程前綴（DK），詳細(xì)信息見表24。只有sheji表里的內(nèi)容清空后name表才可以被刪除，否則無法對name表進(jìn)行某些操作。只有YT表里的內(nèi)容清空后shigong表才可以被刪除，否則無法對shigong表進(jìn)行某些操作。它主要包括：圖框的繪制、字體大小及位置的設(shè)置、里程在那條曲線的判斷、方位角的計(jì)算、斷面投影的計(jì)算等。 CommASS 模塊模塊功能說明：本模塊主要功能是通用輔助，總調(diào)用模塊用來實(shí)現(xiàn)連續(xù)調(diào)用其它幾個(gè)模塊。設(shè)計(jì)時(shí)窗體按鈕布局如圖32所示，施工時(shí)窗體按鈕布局如圖33所示。窗體布置及按鈕布局如圖35所示。5）如果或者，則里程不在工程范圍6）如果，則所求里程在直線上，線路走向=a1 規(guī)范方位角方位角必須定位在（360,360）之間，如果超出此范圍則需要修正： （433） （434）第 5 章 主要應(yīng)用技術(shù) ADO技術(shù)簡介ADO是一種為基于Internet并且以數(shù)據(jù)為中心的應(yīng)用程序而提供的數(shù)據(jù)訪問接口，這種應(yīng)用程序接口和應(yīng)用程序使用的語言無關(guān)。（2）對于ACCESS類型的數(shù)據(jù)庫的連接字符串格式 Driver={Microsoft Access Driver (* PWD=密碼關(guān)閉連接 當(dāng)不再需要使用連接對象時(shí)，需要用CLOSE方法來關(guān)閉連接以釋放系統(tǒng)資源。格式如下：Set 記錄集對象變量名稱= “SQL命令” 例如：Set Rs = “SELECT * FROM 注冊用戶”查詢表“注冊用戶”中所有字段所有記錄，以此建立名為 rs 的RecordSet對象的實(shí)例。Open方法的使用格式如下：記錄對象變量名Open、數(shù)據(jù)來源、連接對象、指針類型、鎖定方式、數(shù)據(jù)源類型。RecordCount：返回一個(gè)記錄集中的記錄總數(shù)。（3）記錄集的子集合 RecordSet對象包含一個(gè)字段子集合Fields，它儲(chǔ)存記錄的全部字段。而用記錄集對象的Addnew是常用的插入記錄的方法。 （1）增加記錄 向表中插入新記錄時(shí)，如果該記錄的字段較多，且字段值大都是由用戶實(shí)際輸入的，我們一般都使用RecordSet對象的AddNew方法，具體實(shí)現(xiàn)過程如下：首先向表中插入一條空記錄，通過賦值語句向該記錄的不同字段賦值，最后通過Update方法完成對數(shù)據(jù)庫的數(shù)據(jù)真正更新。（3）修改記錄 對于一次要修改多條記錄，且被修改的多條記錄修改的方法相同時(shí)，一般使用通過連接對象的Execute方法執(zhí)行SQL命令中的Update命令，用這種修改記錄的方法建議被修改的值不宜過多，如果被修改的值過多書寫代碼復(fù)雜且容易出錯(cuò)。保存在 DVB 文件中的工程必須單獨(dú)裝載。如果你選用啟用代碼，如果工程中含有宏病毒時(shí)病毒可能會(huì)發(fā)作。如果圖形已經(jīng)包含有一個(gè)嵌入工程，你必須在同樣地入其它工程之前將該嵌入工程分離出。創(chuàng)建新的 VBA 工程的操作：打開 VBA 管理器；選擇新建。打開宏對話框的操作：從工具菜單中選擇宏：或在 AutoCAD 中調(diào)用 VBARUN 命令。所有在全局工程的宏中所涉及的 ThisDrawing 對象將指向當(dāng)前活動(dòng)圖形。逐語句運(yùn)行宏的操作：在宏對話框中，選擇要逐語句運(yùn)行的宏；選擇逐語句；選擇逐語句。按需要打開 VBA IDE 的操作 ，你可以從命令行或從菜單欄中打開 VBA IDE 從命令行，可輸入 VBAIDE 。VBA IDE 工程窗口，工程窗口默認(rèn)為可見。標(biāo)準(zhǔn)模塊也歸類為代碼模塊或簡單的模塊。增加新的部件到工程的操作：在 VBA IDE 的工程窗口中，選擇你要增加部件的工程；從插入菜單中，選擇用戶窗體、模塊或類模塊以增加新的部件到你的工程中。如果你用現(xiàn)存的同樣的名稱輸入部件，該文件將添加到工程中相應(yīng)的部件上。 工程名稱的錄入為了實(shí)現(xiàn)對不同工程的管理，首先要錄入工程名稱，且每個(gè)工程名稱對應(yīng)一個(gè)E_ID不允許重復(fù)。田壩嶺隧道設(shè)計(jì)的地質(zhì)數(shù)據(jù)見表62，把表中的數(shù)據(jù)通過工程數(shù)據(jù)管理—設(shè)計(jì)窗體添加到表中添加后窗體如圖65所示。地下水主要為基巖裂隙水環(huán)境水對混凝土結(jié)構(gòu)無侵蝕性。表63 層面特征工程名稱線路里程層面特征里程前綴劃分級別里程傾向傾角巖石特征田壩嶺隧道DKⅤ42894710022泥質(zhì)砂巖5022續(xù)表63泥質(zhì)砂巖DKⅤ42893510020泥質(zhì)砂巖DKⅢ42874511035泥質(zhì)砂巖DKⅢ42860011035泥質(zhì)砂巖DKⅢ42856011035泥質(zhì)砂巖DK