【文章內(nèi)容簡介】 生檢查管理 打印宿舍信息 獎罰管理 打印工作人員信息 打印檢查信息 報表打印管理 第 四 章 數(shù)據(jù)庫設計 數(shù)據(jù)庫概要說明 用戶的需求具體體現(xiàn)在各種信息的提供保存、更新 、 查詢 、 維護和打印 ， 這就要求數(shù)據(jù)庫結(jié)構(gòu)能充分滿足各種信息的輸入和輸出。 實現(xiàn)有組織地、動態(tài)地存儲大量關(guān)聯(lián)數(shù)據(jù)，方便用戶訪問系統(tǒng)中的數(shù)據(jù) 。 本系統(tǒng)采用的是 SQL server 2020數(shù)據(jù)庫，系統(tǒng)數(shù)據(jù)庫命名為“ stucheckbase”，數(shù)據(jù)庫用來存儲宿舍信息、宿舍檢查信息、用戶信息以及獎罰信息等，在該數(shù)據(jù)庫中包含 4張表，下面給出數(shù)據(jù)表的概要說明和主要數(shù)據(jù)表的結(jié)構(gòu)定義 。 為了使讀者更好地了 解系統(tǒng)后臺數(shù)據(jù)庫中的數(shù)據(jù)表， 本人 設計了一個對照表。數(shù)據(jù)表的對照表如表所示 表 41 數(shù)據(jù)表的對照表 表名 說明 user_if 用戶信息表，用來保存用戶和密碼 hygiene_staff 宿舍信息表，存儲宿舍信息以及成員相關(guān)信息 reward_punish 獎罰信息表，存儲宿舍獎罰相關(guān)信息 hygiene_check 宿舍檢查信息表，保存宿舍檢查結(jié)果信息 數(shù)據(jù)庫概念設計 (ER 圖 ) 在本系統(tǒng)中我采用 “ 實體聯(lián)系模型 ” （ ER 模型）來描述數(shù)據(jù)庫的結(jié)構(gòu)與語義，以對現(xiàn)實世界進行第一次抽象。 ER 模型直 接從現(xiàn)實世界抽象出實體類型及實體間聯(lián)系，然后用 ER 圖來表示數(shù)據(jù)模型。它有兩個明顯的優(yōu)點：接近于人的思維，容易理解；與計算機無關(guān)，用戶容易接受。但 ER 模型只能說明實體間語義的聯(lián)系，不能進一步說明詳細的數(shù)據(jù)結(jié)構(gòu)，它只是數(shù)據(jù)庫設計的第一步。 根據(jù)以上對系統(tǒng)所作的需求分析，系統(tǒng)設計，規(guī)劃出本系統(tǒng)中使用的數(shù)據(jù)實體。 那么本系統(tǒng)的 ER 圖如下： (1)用戶信息表（ user_if） 本系統(tǒng)中該實體包括 user_ID、 user_PWD、 user_Des 屬性，實體的 ER 圖如圖 42 所示 圖 42 用戶信息實體的 ER圖 (2)宿舍信息表（ hygiene_staff） 該實體包括編號、棟號、寢舍號、姓名、學院、年齡、性別、職位、電話、備注屬性，實體的 ER 圖如圖 43所示 用戶信息 user_ID user_PWD user_Des 圖 43 宿舍信息 實體的 ER圖 (3)獎罰信息表（ reward_punish） 該實體包括棟號、寢舍號、年級、學院、專業(yè)、寢舍成員、獎勵情況、違紀情況、電話屬性，實體的 ER圖如 圖 44所示 圖 44 獎罰信息 實體的 ER圖 (4)宿舍檢查信息表（ hygiene_check） 該實體包括日期、棟號、寢舍號、評分 評分 評分 總分、平均分屬性，實體的 ER 圖如圖 45所示 圖 45 宿舍檢查信息 實體的 ER圖 宿舍信息 編號 棟號 年齡 學院 姓名 寢舍號 職位 性別 電話 備注 獎罰信息 年級 棟號 寢舍號 學院 專業(yè) 電話 寢舍成員 獎勵情況 違紀情況 宿舍檢查信息 棟號 日期 寢舍號 評分 2 評分 1 評分 3 總分 平均分 數(shù)據(jù)庫邏輯設計 根據(jù)設計好的 ER 圖在數(shù)據(jù)庫中創(chuàng)建數(shù)據(jù)表，系統(tǒng)數(shù)據(jù)庫名稱為stucheckbase，針對本系統(tǒng)的特點，在對所搜集的數(shù)據(jù)進行規(guī)范化之后，定義了如下 四 張表格，分別是 用戶 信息表， 宿舍 信息表， 獎罰信息表， 宿舍檢查信息 表 。通過對這 四 張表格的操作可以較好地完成系統(tǒng)設計的各項功能， 四 張表格之間有著不同程度的聯(lián)系。 系統(tǒng)數(shù)據(jù)庫中各表的結(jié)構(gòu)如下 。 (1)userif（用戶信息表） 用戶信息表用來保存用戶和密碼，包括“ user_ID”、“ user_PWD”和“ user_Des”字段，其結(jié)構(gòu)表如 表 46所示 表 46 userif的 表 結(jié)構(gòu) 表名：user_if 說明：用戶信息表 字段名 類型 大小 主鍵 空值 默認 描述 user_ID char 10 Y user_PWD char 10 Y user_Des char 10 Y (2)hygiene_staff（宿舍信息表） 宿舍信息表用于存儲宿舍信息以及成員相關(guān)信息，其中“編號”，為主鍵，包括“棟號”、“ 寢室號 ”、“ 姓名 ”、“ 學院 ”、“ 年齡 ”、“ 性別 ”、“ 職位 ”、“ 電話 ”和“ 備注 ” 字段，其結(jié)構(gòu)表如 表 47所示 表 47 hygiene_staff的表結(jié)構(gòu) 表名： hygiene_staff 說明：宿舍信息表 字段名 類型 大小 主鍵 空值 默認 描述 編號 char 10 Y 棟號 char 4 Y ‘ 無 ’ 寢室號 char 10 Y ‘ 無 ’ 姓名 char 10 Y ‘ 無 ’ 學院 char 30 Y ‘ 無 ’ 年齡 int 4 Y ‘ 無 ’ 性別 char 8 Y ‘ 無 ’ 職位 char 20 Y ‘ 無 ’ 電話 char 12 Y ‘ 無 ’ 備注 varchar 50 Y ‘ 無 ’ (3)reward_punish（獎罰信息表） 獎罰信息表 用來存儲宿舍獎罰相關(guān)信息，其中“棟號”和“寢室號”為主鍵，包括“年級”、“學院”、“專業(yè)”、“寢室成員”、“獎勵情況”、“違紀情況”和“電話” 字段，其結(jié)構(gòu)表如 表 48所示 表 48 reward_punish的表結(jié)構(gòu) 表名： reward_punish 說明：獎罰信息表 字段名 類型 大小 主鍵 空值 默認 描述 棟號 char 4 Y 寢室號 char 10 Y 年級 char 10 Y ‘ 無 ’ 學院 char 30 Y ‘ 無 ’ 專業(yè) char 20 Y ‘ 無 ’ 寢室成員 text 16 Y ‘ 無 ’ 獎勵情況 char 200 Y ‘ 無 ’ 違紀情況 char 200 Y ‘ 無 ’ 電話 char 12 Y ‘ 無 ’ (4)hygiene_check（宿舍檢查信息表） 宿舍檢查信息表 用于保存宿舍檢查結(jié)果信息，其中“ 日期 ”、“ 棟號 ”和“ 寢室號 ”為主鍵，包括“ 評分 1”、“ 評分 2”、“ 評分 3”、“ 總分 ”和“ 平均分 ” 字段，其結(jié)構(gòu)表如 49所示 。 表 49 hygiene_check的表結(jié)構(gòu) 表名： hygiene_check 說明：宿舍檢查信息表 字段名 類型 大小 主鍵 空值 默認 描述 日期 datetime 8 Y 棟號 char 4 Y 寢室號 char 10 Y ‘ 0’ 評分 1 real 4 Y ‘ 0’ 評分 2 real 4 Y ‘ 0’ 評分 3 real 4 Y ‘ 0’ 總分 real 4 Y ‘ 0’ 平均分 decimal 5 Y 第 五 章 系統(tǒng)詳細設計 (1)附加數(shù)據(jù)庫 打開 SQL Server 的企業(yè)管理器，然后在左側(cè)的“數(shù)據(jù)庫”圖標上右擊，單擊彈出菜單上的 [所有任務 ]|[附加數(shù)據(jù)庫 ]命令，在彈出的對話框中，單擊 [瀏覽 ] ， 選 擇 路 徑 F:\ 宿 舍 衛(wèi) 生 檢 查 管 理 信 息 系 統(tǒng)\database\ 文件，最后單擊 [確定 ]，附加數(shù)據(jù)庫成功。數(shù)據(jù)庫配置 如圖 51所示 圖 51 數(shù)據(jù)庫配置 (2)通過 SQL 腳本生成數(shù)據(jù)庫 用 查 詢 分 析 器 打 開 F:\ 宿 舍 衛(wèi) 生 檢 查 管 理 信 息 系 統(tǒng)\database\ 文件，單擊執(zhí)行就會生成相應的表。這樣可以生成一個數(shù)據(jù)清空的數(shù)據(jù)庫，用戶可以設置自己的基礎(chǔ)數(shù)據(jù)。 (3)Visual Basic 與數(shù)據(jù)庫的連接字符串 本人設計了連接字符串的 ConnectSting 函數(shù)，代碼如下： 39。獲得計算機名稱的 API函數(shù) Public Declare Function GetComputerName Lib kernel32 Alias GetComputerNameA (ByVal lpBuffer As String, nSize As Long) As Long Public Function ConnectString()As String Dim ComputerName As String, i As Long i = 255 39。獲得計算機名稱的調(diào)用 API函數(shù) ComputerName = String(i, 0) GetComputerName ComputerName, i ComputerName = Left(ComputerName, i) strputername = ComputerName ConnectString = Provider=。 amp。 _ Persist Security Info=False。 amp。 _ UID=sa。PWD=314。 amp。 _ Initial Catalog=stucheckbase。 amp。 _ Data Source= + strputername + End Function 公共模塊的實現(xiàn) 在整套系統(tǒng)中，可以用公用模塊來存放公用的函數(shù)，過程和全局變量等，這樣可以提高代碼的效率，而不需要在每個模塊中都定義這些函數(shù)，過程或全局變量，用戶使用時也比較方便，在項目管理器中為項目添加一個 Module 即可，然后添加需要的代碼。由于系統(tǒng)的各個功能模塊都將頻繁的使用數(shù)據(jù)庫的各種數(shù)據(jù)，因此需要一個公共的數(shù)據(jù)操作函數(shù)，用于執(zhí)行各種 SQL 語句，在本系統(tǒng)中添加了函數(shù) ExecuteSQL，在 ExecuteSQL 函數(shù)中使用了 ConnectString 函數(shù)，這個函數(shù)用來連接數(shù)據(jù)庫。這里需要特別注意的是，在為 數(shù)據(jù)庫創(chuàng)建文件 DSN 時，名稱應該和 ConnectString 中的參數(shù)一致。需要注意的是， ConnectString 中的用戶和密碼參數(shù)必須和安裝的 SQL Server 的參數(shù)一致。 模塊主要有兩個函數(shù)。函數(shù)“ ConnectString”是連接字符串，它的功能是建立 Visual Basic 與 Microsoft SQL Server 2020 的連接；函數(shù)“ ExecuteSQL”執(zhí)行相應的 SQL語句，完成查詢、修改、刪除、插入等對數(shù)據(jù)庫的操作。其中函數(shù)“ ExecuteSQL”的代碼如下： Public Function ExecuteSQL(ByVal SQL As String,MsgString As String)_ As Dim n As Dim rst As Dim sTokens() As String On Error GoTo ExecuteSQL_Error sTokens = Split(SQL) Set n = New ConnectString If InStr(INSERT,DELETE,UPDATE,UCase$(sTokens(0))) Then SQL MsgString = sTokens(0) amp。 query successful Else Set rst = New Trim$(SQL), n,adOpenKeyset,adLockOptimistic 39。 39。get RecordCount Set ExecuteSQL = rst MsgString = 查詢到 amp。 amp。 條記錄 End If ExecuteSQL_Exit: Set rst = Nothing Set n = Nothing Exit Function ExecuteSQL_Error: MsgString = 查詢錯誤 : amp。 Resume ExecuteSQL_Exit End Function 登錄與主程序界面的設計 (1)登錄模塊 啟動程序以后，首先進入登錄界面， 系統(tǒng)登錄主要用于對登錄宿舍衛(wèi)生檢查管理信息系統(tǒng)的用戶進行安全性檢查，以防止非法用戶登錄該系統(tǒng) 。 登錄界面(frmlegoin,frm)如圖 52所示。 登錄界面主要實現(xiàn)以下功能