【正文】 結構化高級 程序設計語言 ，可用于開發(fā) Windows 環(huán)境下的各類 應用程序 。在 Visual Basic環(huán)境下，利用事件驅動的編程機制、新穎易用的可視化設計工具，使用 Windows內部的廣泛 應用程序接口 （ API） 函數(shù) ，動態(tài)鏈接庫（ DLL）、對象的鏈接與嵌入（ OLE）、開放式 數(shù)據(jù)連接 （ ODBC）等技術，可以高效、快速地開發(fā) Windows環(huán)境下功能強大、圖形界面豐富的 應用軟件 系統(tǒng)。 教室類別管理：可實現(xiàn)教室類別添加，如添加的教室是普通教室，多媒體教室，普通教室，該教室屬于哪個樓，還包括其他選項。類別管理一項可添加，刪除，修改教室類別。教室信息管理供修改和刪除以上信息，教室查詢可根據(jù)條件查找自己需要使用的教室。 教室使用情況：使用情況登記可在使用教室時輸入教室編號，使用部門，使用班級，開始使用時間，結束使用時間，負責人，負責人電話。 系統(tǒng)功能模塊如圖 所示： 圖 系統(tǒng)流程 系統(tǒng)必須考慮安全問題，故給至少給一個登錄模塊，在使用系統(tǒng)時進行身份的驗證。當然也可以在系統(tǒng)中再增加其他的功能。 圖 數(shù)據(jù)庫概念結構設計 通過對學校教室管理信息 系統(tǒng)的數(shù)據(jù)庫的需求分析，可以得到數(shù)據(jù)庫的基本數(shù)據(jù)和數(shù)據(jù)結構以及數(shù)據(jù)處理 的流程，下面列出系統(tǒng)的 教室查詢 實體間的聯(lián)系ER圖 如圖 。 圖 教室類別實體及其屬性圖 管理員實體及其屬性圖 如圖 。 圖 教室類別 樓號 其他 普通教室 多媒體 教室 語音教室 查詢教室 教室類別 可用否 座位數(shù) 教室名稱 房號 關系 教室 使用班級 使用部門 開始使用時間 結束使用時間 負責人 負責人 電話 教室編號編 號 修改 使用 登錄 查詢 管理員 用戶名 密碼 登 錄 新疆財經(jīng) 大學 本科畢業(yè)論文 6 數(shù)據(jù)庫邏輯結構設計 數(shù)據(jù)庫是 ，其中有管理員表，教室可用情況表，教室類別表，教室信息表和教室使用情況表 。 管理員表 主要輸入用戶名和密碼，如表 所示 表 管理員 表 字段名稱 數(shù)據(jù)類型 字段大小 備注 ，是否為空 id 長整型 自動編號 主鍵 用戶名 文本 50 否 密碼 文本 50 是 教室信息 表 主要進行對教室基本信息的維護，如表 表 教室信息 表 字段名稱 數(shù)據(jù)類型 字段大小 備注 ，是否為空 id 長整型 自動編號 主鍵 教室編號 文本 50 否 教室名稱 文本 50 否 教室簡稱 文本 50 否 樓號 數(shù)字 10 否 房號 數(shù)字 10 否 座位數(shù) 數(shù)字 10 否 考試座位數(shù) 數(shù)字 10 否 教室類別 文本 50 否 添加時間 日期 /時間 使用情況表 主要是教室使用者的基本信息，如表 新疆財經(jīng) 大學 本科畢業(yè)論文 7 使用情況 表 字段名稱 數(shù)據(jù)類型 字段大小 備注 ，是否為空 id 自動編號 長整型 主鍵 教室編號 文本 50 是 使用部門 文本 50 是 使用班級 文本 50 是 開始時間 日期 /時間 結束時間 日期 /時間 負責人 文本 50 是 負責人電話 文本 50 是 添加時間 日期 /時間 新疆財經(jīng) 大學 本科畢業(yè)論文 8 第 4 章 系統(tǒng)詳細設計與實現(xiàn) 功能模塊簡介 本系統(tǒng)功能模塊分為 ： 管理員 、 教室類別 管理 、 教室信息 管理 、 可用情況設置 、 教室使用情況 等。這個模塊能夠實現(xiàn)新用戶的增加、已有用戶的查找、已有用戶的刪除、已有用戶的密碼修改、注銷不再使用的用戶等功能。 教室 管理模塊應具有的功能： 教室添加、教室信息管理、教室查詢 等 功能，實現(xiàn)需要使用教室者可根據(jù)需要查詢教室。在本模塊中 可以實現(xiàn)查找該教室當前是否可用，考試可用否等 操作。 圖 登陸界面 窗體上的兩個文本框分別用于輸入用戶名和密碼，設密碼文本框PasswordChar=*。單擊“確定”按鈕后，用 SQL 語句查詢“用戶”表中是否有相符的用戶名和密碼，若不符 ，提示重新輸入，焦點返回文本框。若輸入正確，將用戶名和用戶權限保存在全局變量中，顯示系統(tǒng)主窗體，卸載本窗體。 新疆財經(jīng) 大學 本科畢業(yè)論文 9 提示：保存用戶名和用戶權限需要建立一個標準模塊（ Module），用 Public關鍵字聲明兩個全局變量，將“用戶登錄”窗體運行時輸入的用戶名和用戶權限存入全局變量中，以供其他模塊引用。單擊登錄 For i = 0 To 1 If T1(i).Text = Then MsgBox 請輸入 amp。 的內容！ , 48, 提示 T1(i).SetFocus Exit Sub End If Next Dim rs_user As New With rs_user sql = select * from 管理員 where 用戶名 =39。 T1(0).Text amp。 _ amp。 amp。 39。是否查找 MsgBox 你輸入的用戶名或密碼錯誤！重新輸入！ , 48, 提示 Exit Sub End If 用戶名 = T1(0).Text .Fields(最后登錄時間 ) = Date .Fields(登陸次數(shù) ) = .Fields(登陸次數(shù) ) + 1 .Update .Close Unload Me 系統(tǒng)主界面 .Show End With 新疆財經(jīng) 大學 本科畢業(yè)論文 10 ElseIf Index = 1 Then 39。結束程序 End If End Sub Private Sub Form_Load() End Sub 設計系統(tǒng)主 界面 系統(tǒng)主窗體（ frmMain）作為 學校教室管理 系統(tǒng)的主界面，設計成 MDI 窗體樣式，如 圖 所示。 窗體主要代碼如下： Private Sub 類別管理 _Click() 教室類別信息修改 .Show End Sub Private Sub 使用情況查詢 _Click() 使用情況信息查詢 .Show 新疆財經(jīng) 大學 本科畢業(yè)論文 11 End Sub Private Sub 使用情況登記 _Click() 使用情況信息添加 .Show