【正文】 Visual Basic(簡(jiǎn)稱 VB)是 Microsoft 公司推出的 Windows 環(huán)境下的軟件開(kāi)發(fā)工具。在語(yǔ)言功能方面，它與以前的 BASIC 語(yǔ)言基本兼容，但功能更強(qiáng)大，使用更方便。 Visual Basic 中的 ”Visual” 是指開(kāi)發(fā)圖形用戶界面（ GUI， Graphical User Interface）的方法。 Visual 的意思是“可視的“，也就是直觀的編程方法。在 VB中引入了控件的概念，各種各樣的按鈕、文本框、選擇框等。 VB把這些控件模式化，并且每個(gè)控件都由若干屬性來(lái)控制其外觀、工作方法。這樣，采用 Visual 方法無(wú)需編 寫(xiě)大量代碼去描寫(xiě)界面元素的外觀和位置，而只要把預(yù)先建立的控件加到屏幕上即可。就像使 建筑工程質(zhì)量檢測(cè)管理系統(tǒng) 第 7 頁(yè) 共 55 頁(yè) 用畫(huà)圖之類(lèi)的繪圖程序，通過(guò)選擇畫(huà)圖工具來(lái)畫(huà)圖一樣。 “Basic” 是指 BASIC（ Beginners Allpurpose Symbolic Instruction Code）語(yǔ)言，一種在計(jì)算機(jī)技術(shù)發(fā)展史上應(yīng)用得最為廣泛的語(yǔ)言。 Visual Basic 在原有 BASIC語(yǔ)言的基礎(chǔ)上進(jìn)一步發(fā)展，至今包含了數(shù)百條語(yǔ)句、函數(shù)及關(guān)鍵詞，其中很多和 Windows GUI有直接關(guān)系。專(zhuān)業(yè)人員可以用 VB實(shí)現(xiàn)其他 Windows 編程語(yǔ)言功能，而 初學(xué)者只要掌握幾個(gè)關(guān)鍵詞就可以建立實(shí)用的應(yīng)用程序。 四．設(shè)計(jì)具備的 VB基本技能 1. Data Environment Designer (數(shù)據(jù)環(huán)境設(shè)計(jì)器 ) Data Environment Designer 是一個(gè)交互式設(shè)計(jì)工具可以實(shí)時(shí)的幫助創(chuàng)建數(shù)據(jù)庫(kù)對(duì)象?；?ADO對(duì)象模型。 作用：使用 OLE DB 數(shù)據(jù)源或者 ODBC 數(shù)據(jù)源定義數(shù)據(jù)庫(kù) Connection 連接對(duì)對(duì)象的層次，可以被 HflexGrid 控件和 Data Report Designer 等分層工具使用；從設(shè)計(jì)者的Command 對(duì)象向綁定于 Command 對(duì) 象的 Form（表）對(duì)象或者 Data Report Designer拖放字段和表；在 Data Report Designer 中為 Connection 和 Recordset 對(duì)象附加代碼。 (SDI)和多文檔 (MDI)界面設(shè)計(jì) . 調(diào)整窗體布局 :對(duì)齊控件 。按相同大小制作控件 。調(diào)整控件間距 . MDI 窗體的特點(diǎn) : 程序啟動(dòng)時(shí) , MDI 窗體首先出現(xiàn) ,可以在其中打開(kāi)多個(gè)子窗體 .除 picture(圖片框 )控件和 Timer(定時(shí)器 ) 控件外 ,一般不能直接在 MDI 窗體上放置 . . (1) TreeView 控件顯示 Node 對(duì)象的分層列表，每個(gè) Node 對(duì)象均由一個(gè)標(biāo)簽和一個(gè)可選的位圖組成。 TreeView 一般用于顯示文檔標(biāo)題、索引入口、磁盤(pán)上的文件和目錄、或能被有效地分層顯示的其它種類(lèi)信息。 說(shuō)明 :創(chuàng)建了 TreeView 控件之后，可以通過(guò)設(shè)置屬性與調(diào)用方法對(duì)各 Node 對(duì)象進(jìn)行操作，這些操作包括添加、刪除、對(duì)齊和其它操作。可以編程展開(kāi)與折回 Node 對(duì)象來(lái)顯示或隱藏所有子節(jié)點(diǎn)。 Collapse、 Expand 和 NodeClick 三個(gè)事件也提供編程功能。 Node 對(duì) 象使用 Root、 Parent、 Child、 FirstSibling、 Next、 Previous 和 LastSibling 屬性。在代碼中可通過(guò)檢索對(duì) Node 對(duì)象的引用，從而在樹(shù)上定位。也可以使用鍵盤(pán)定位。 UP ARROW 鍵和 DOWN ARROW 鍵向下循環(huán)穿過(guò)所有展開(kāi)的 Node 對(duì)象。從左到右、從上到下地選擇 Node 對(duì)象。若在樹(shù)的底部，選擇便跳回樹(shù)的頂部，必要時(shí)滾動(dòng)窗口。 RIGHT ARROW 鍵和 LEFT ARROW 鍵也穿過(guò)所有展開(kāi)的 Node 對(duì)象，但是如果選擇了未展開(kāi)的 Node 之后再按 RIGHT ARROW 鍵，該 Node 便展開(kāi)；第二次按該鍵，選擇將移向下一個(gè) Node。相反，若擴(kuò)展的 Node 有焦點(diǎn)，這時(shí)再按 LEFT ARROW 鍵，該 Node 便折回。如果按下 ANSI 字符集中的鍵，焦點(diǎn)將跳轉(zhuǎn)至以那個(gè)字母開(kāi)頭的最近的 Node。后續(xù)的按該鍵的動(dòng)作將使選擇向下循環(huán)，穿過(guò)以那個(gè)字母開(kāi)頭的所有展開(kāi)節(jié)點(diǎn)。 TreeView 控件使用由 ImageList 屬性指定的 ImageList 控件，來(lái)存儲(chǔ)顯示于 Node 對(duì)象的位圖和圖標(biāo)。任何時(shí)刻， TreeView 控件只能 使用一個(gè) ImageList。這意味著，當(dāng) TreeView 控件的 Style 屬性被設(shè)置成顯示圖像的樣式時(shí)， TreeView 控件中每一 建筑工程質(zhì)量檢測(cè)管理系統(tǒng) 第 8 頁(yè) 共 55 頁(yè) 項(xiàng)的旁邊都有一個(gè)同樣大小的圖像。 (2) DataReport 對(duì)象是一個(gè)可編程對(duì)象，代表數(shù)據(jù)報(bào)表設(shè)計(jì)器（ Data Report designer）。 說(shuō)明 :Data Report 使用數(shù)據(jù)庫(kù)中的記錄生成報(bào)表。要使用它： 配置一個(gè)數(shù)據(jù)源，例如 Microsoft 數(shù)據(jù)環(huán)境，以訪問(wèn)數(shù)據(jù)庫(kù)。設(shè)定 DataReport 對(duì)象的 DataSource 屬性為數(shù)據(jù)源。設(shè)定 DataReport 對(duì) 象的 DataMember 屬性為數(shù)據(jù)成員。右鍵單擊設(shè)計(jì)器，并單擊“檢索結(jié)構(gòu)”。向相應(yīng)的節(jié)添加相應(yīng)的控件。為每一個(gè)控件設(shè)定 DataMember 和 DataFiel 用 Show 方法顯示數(shù)據(jù)報(bào)表。使用 DataReport 對(duì)象通過(guò)更 d屬性。運(yùn)行時(shí)，使改每一 Section 對(duì)象的布局，來(lái)編程改變數(shù)據(jù)報(bào)表的外觀和行為。 (3) SSTab 控件 SSTab 控件提供了一組選項(xiàng)卡，每個(gè)選項(xiàng)卡都可作為其它控件的容器。在控件中，同一時(shí)刻只有一個(gè)選項(xiàng)卡是活動(dòng)的，這個(gè)選項(xiàng)卡向用戶顯示它本身所包含的控件而隱藏其它選項(xiàng)卡中的控件。 說(shuō)明 :SSTab 控件就象筆記本中的分割線或一組文件夾上的標(biāo)簽一樣。用 SSTab 控件，可以在應(yīng)用程序中為某個(gè)窗口或?qū)υ捒虻南嗤瑓^(qū)域定義多個(gè)頁(yè)面。 (4) DataGrid 控件 顯示并允許對(duì) Recordset 對(duì)象中代表記錄和字段的一系列行和列進(jìn)行數(shù)據(jù)操縱。 說(shuō)明 : DataGrid 控件的每一個(gè)單元格都可以包含文本值，但不能鏈接或內(nèi)嵌對(duì)象。可以在代碼中指定當(dāng)前單元格，或者用戶可以使用鼠標(biāo)或箭頭鍵在運(yùn)行時(shí)改變它。通過(guò)在單元格中鍵入或編程的方式，單元格可以交互地編輯。單元格能夠被單獨(dú)地選定或按照行來(lái)選定。 如果一個(gè)單 元格的文本太長(zhǎng)，以致于不能在單元格中全部顯示，則文本將在同一單元格內(nèi)折行到下一行。要顯示折行的文本，必須增加單元格的 Column 對(duì)象的 Width屬性和／或 DataGrid 控件的 RowHeight 屬性。在設(shè)計(jì)時(shí)，可以通過(guò)調(diào)節(jié)列來(lái)交互地改變列寬度，或在 Column 對(duì)象的屬性頁(yè)中改變列寬度。 使用 DataGrid控件的 Columns集合的 Count屬性和 Recordset對(duì)象的 RecordCount屬性，可以決定控件中行和列的數(shù)目。 選擇一個(gè)單元格，則 ColIndex 屬性被設(shè)置，也就是選擇了 DataGrid 對(duì)象的 Columns集合中的一個(gè) Column對(duì)象。 Column對(duì)象的 Text和 Value屬性引用當(dāng)前單元格的內(nèi)容。使用 Bookmark 屬性能夠訪問(wèn)當(dāng)前行的數(shù)據(jù)，它能夠提供對(duì)下一級(jí) Recordset 對(duì)象中記錄的訪問(wèn)。 DataGrid 控件中的每一列都有自己的字體、邊框、自動(dòng)換行、和另外一些與其他列無(wú)關(guān)的能夠被設(shè)置的屬性。在設(shè)計(jì)時(shí)，您可以設(shè)置列寬和行高，并且建立對(duì)用戶不可見(jiàn)的列。您還能阻止用戶在運(yùn)行時(shí)改變格式。 建筑工程質(zhì)量檢測(cè)管理系統(tǒng) 第 9 頁(yè) 共 55 頁(yè) 第二章 需求分析 一．系統(tǒng)功能簡(jiǎn)介 經(jīng)過(guò)分析，我們對(duì)系統(tǒng)的功能進(jìn)行了歸納如下： 1. 本系統(tǒng)以 windows 98及以上版本作為運(yùn)行平臺(tái)，具有良好的人機(jī)界面和交互性。 2．系統(tǒng)前臺(tái)采用 作為開(kāi)發(fā)語(yǔ)言環(huán)境，后臺(tái)數(shù)據(jù)庫(kù)采用 Access2020。 3．要求系統(tǒng)主界面設(shè)計(jì)新穎，布局合理，對(duì)各種分別率能自動(dòng)滿屏匹配。 4．主界面元素：系統(tǒng)菜單，文檔瀏覽窗口，文檔庫(kù)目錄樹(shù) ,狀態(tài)欄等。 ： (1)系統(tǒng)具有登陸窗體 ,超級(jí)用戶對(duì)于客戶的密碼和權(quán)限的維護(hù)和修改窗口。 (2)能根據(jù)各個(gè)用戶的權(quán)限（對(duì)動(dòng)態(tài)的目錄文檔樹(shù)）分級(jí)管理：瀏覽，修改，無(wú)權(quán)限。 (3)采用圖形按鈕形式，對(duì)某些操作，為防止產(chǎn)生交叉干涉現(xiàn) 象，對(duì)相關(guān)的操作按鈕應(yīng)采取閉鎖方式，該操作解除后，相關(guān)的閉鎖釋放 (4)系統(tǒng)具備相關(guān)打印功能，用戶可以通過(guò)不同選擇來(lái)打印相關(guān)數(shù)據(jù)庫(kù)的表內(nèi)容。 (5)系統(tǒng)具備相關(guān)查詢，匯總功能?？梢灾付ㄎ芯幪?hào)，設(shè)定查詢期間，進(jìn)行查詢，我們對(duì)查詢結(jié)果以圖表的形式反映出來(lái)，進(jìn)行匯總。 (6)具有 windows 風(fēng)格的使用文檔和幫助。 二 .系統(tǒng)功能模塊圖 在上述基礎(chǔ)上我們可以畫(huà)出系統(tǒng)的功能模塊圖如下： 其中： 數(shù)據(jù)庫(kù)的功能為： ● 重裝數(shù)據(jù)庫(kù) ● 備份數(shù)據(jù)庫(kù) 室內(nèi)檢測(cè)的功能為以下各個(gè)窗體的添加，修改，刪除： ● 混凝土立方體抗壓強(qiáng)度 建筑工程質(zhì)量檢測(cè)管理系統(tǒng) 數(shù)據(jù)庫(kù) 委托 委托統(tǒng)計(jì) 室內(nèi)檢測(cè) 現(xiàn)場(chǎng)檢測(cè) 水電檢測(cè) 系統(tǒng)管理 個(gè)人管理 查詢 打印 建筑工程質(zhì)量檢測(cè)管理系統(tǒng) 第 10 頁(yè) 共 55 頁(yè) ● 砂漿立方體抗壓強(qiáng)度 ● 鋼材 ● 鋼筋焊接 ● 水泥 ● 混凝土配合比設(shè)計(jì) ● 砂漿配合比設(shè)計(jì) ● 建筑用砂 ● 建筑用石 ● 粘土磚 ● 鋁合金 ● 混凝土抗折強(qiáng)度 ● 防水材料 ● 混凝土抗?jié)B ● 塑料型材 ● 涂料 ● 高強(qiáng)螺栓 ● 抗滑移 ● 混凝土瓦 ● 混凝土砌塊 ● 陶瓷磚 現(xiàn)場(chǎng)檢測(cè)的功能為以下各個(gè)窗體的添加，修改，刪除： ● 混凝土回彈 ● 砂漿回彈 ● 鉆 芯 ● 混凝土構(gòu)件 ● 土工 水電檢測(cè)的功能為以下各個(gè)窗體的添加，修改，刪除： ● 委托 ● 線路絕緣 ● 接電裝置 ● 管道嚴(yán)密性 ● 通球試驗(yàn) 系統(tǒng)管理的功能為以下各個(gè)窗體的添加，修改，刪除： ● 用戶 ● 鋼材 ● 水泥 ● 鋼材生產(chǎn)廠家 ● 水泥生產(chǎn)廠家 ● 項(xiàng)目 建筑工程質(zhì)量檢測(cè)管理系統(tǒng) 第 11 頁(yè) 共 55 頁(yè) ● 回彈強(qiáng)度曲線 ● 收費(fèi)標(biāo)準(zhǔn) 個(gè)人管理的功能為： ● 重新登陸 ● 修改密碼 ● 注銷(xiāo) 三．?dāng)?shù)據(jù)庫(kù)的設(shè)計(jì) 在不同的階段，需要從數(shù)據(jù)庫(kù)中檢索不同的表。我們?cè)谶M(jìn)行開(kāi)發(fā)時(shí)，就需要建立數(shù)據(jù)庫(kù)了。我們采用的是 Microsoft Access2020 作為支撐數(shù)據(jù)庫(kù)，由于我們 在此系統(tǒng)中的表有很多，基于對(duì)調(diào)用數(shù)據(jù)庫(kù)表的方法基本一致，我們就給出了以下部分表的結(jié)構(gòu)： 用戶表（ Users） 字段名 字段名 類(lèi)型 長(zhǎng)度 用戶名 UserName 文本 20 密碼 UserPass 文本 20 *工號(hào) UserNumber 文本 5 負(fù)責(zé)人 Principal 是 /否 管理員 Administrator 是 /否 技術(shù)負(fù)責(zé)人 TechnicPrincipal 是 /否 委托 Consign 是 /否 室內(nèi)檢測(cè) RoomInspect 是 /否 現(xiàn)場(chǎng)檢測(cè) LocaleInspect 是 /否 水電檢測(cè) WaterElectricityInspect 是 /否 委托統(tǒng)計(jì) Stat 是 /否 查詢 Search 是 /否 匯總 Collect 是 /否 打印 Print 是 /否 任務(wù)單 Task 是 /否 收費(fèi)管理 Charge 是 /否 簽名 Idiograph OLE 對(duì)象 鋼材標(biāo)準(zhǔn)（ SteelStandard） 字段名 字段名 類(lèi)型 長(zhǎng)度 *種類(lèi) Kind 文本 50 *級(jí)別 Level 文本 20 屈服強(qiáng)度 BendIntensity 數(shù)字 單精度型 極限強(qiáng)度 UtmostIntensity 數(shù)字 單精度型 伸長(zhǎng)率 ElongateRate 數(shù)字 單精度型 標(biāo)據(jù)系數(shù) StandardCoefficient 數(shù)字 單精度型 建筑工程質(zhì)量檢測(cè)管理系統(tǒng) 第 12 頁(yè) 共 55 頁(yè) 水泥標(biāo)準(zhǔn)（ Ceme