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