【正文】 resented by Microsoft because of its objective tools in Win32. VB offered a series of ActiveX operating a database. It can give you a shortcut to build up a prototype of system application. The prototype could be modified and developed till users are satisfied with : ActiveX , Form , Field . 目錄 前言 ………………………………………………………………………… 3 為什么要開發(fā)一個排課管理系統(tǒng) ………………………………………… 3 怎樣開發(fā)一個排課管理系統(tǒng) ……………………………………………… 4 Windows 下的 VisualVisual Basic 應(yīng)用程序 …………………………… 4 使用 Access2021 實現(xiàn)關(guān)系型數(shù)據(jù)庫 ……………………………………… 6 系統(tǒng)總體規(guī)劃 ………………………………………………………………10 系統(tǒng)具體實現(xiàn) ……………………………………………………………15 VB 中調(diào)用帶參數(shù)存儲 過程的實現(xiàn) ………………………………………20 結(jié)束語 ………………………………………………………………………27 致謝 …………………………………………………………………………28 1 參考文獻 ……………………………………………………………………29 1 源代碼 ………………………………………………………………………30 前言 排課管理系統(tǒng)是一個教育單位不可缺少的部分 ,它的內(nèi)容對于學校的決策者和管理者來說都至關(guān)重要 ,所以排課管理系統(tǒng)應(yīng)該能夠為用戶提供充足的信息和快捷的查詢手段。隨著科學技術(shù)的不斷提高 ,計算機科學日漸成熟 ,其強大的功能已為人們深刻認識 ,它已進入人類社會的各個領(lǐng)域并發(fā)揮著越來越重要的作用。這些優(yōu)點能夠極大地提高排課管理的效率 ,也是企業(yè)的科學化、正規(guī)化管理 ,與 世界接軌的重要條件。 第一章為什么要開發(fā)一個排課管理系統(tǒng)？ 計算機已經(jīng)成為我們學習和工作的得力助手：今天，計算機的價格已經(jīng)十分低廉，性能卻有了長足的進步。 在中小學中用計算機管理排課的意義現(xiàn)在我國的中小學校中排課的管理水平還停留在紙介質(zhì)的基礎(chǔ)上，這樣的機制已經(jīng)不能適應(yīng)時代的發(fā)展，因為它浪費了許多人力和物力，在信息時代這種傳統(tǒng)的管理方法必然被計算機為基礎(chǔ)的信息管理所取代。改革的總設(shè)計師鄧小平同志說過 科學技術(shù)是第一生產(chǎn)力 ，我希望能用我四年的所學編制出一個實用的程序來幫助中小學進行更有效的課程管理。 為將來學校上網(wǎng)做好準備跟據(jù) 1999 年中國電信的調(diào)查報告顯示我國的上網(wǎng)人數(shù)已達到 890萬，互聯(lián)網(wǎng)已經(jīng)十分普及，學校往界的畢業(yè)生希望能在世界的任何一個角落查到自己校友的信息，本系統(tǒng)為學校將來的上網(wǎng)作了先期工作，比如數(shù)據(jù)庫的建立。使用戶和開發(fā)人員可以較快地確定需求，然后采用循環(huán)進化的開發(fā)方式，對系統(tǒng)模型作連續(xù)的精化，將系統(tǒng)需具 備的性質(zhì)逐漸增加上去，直到所有的性質(zhì)全部滿足。 第二章怎樣開發(fā)一個排課管理系統(tǒng)？ 編程環(huán)境的選擇微軟公司的 Visual Basic 是 Windows 應(yīng)用程序開發(fā)工具，使目前最為廣泛的、易學易用的面向?qū)ο蟮拈_發(fā)工具。故而，實現(xiàn)本系統(tǒng) VB是一個相對較好的選擇。 Access 的優(yōu)點在于它能使用數(shù)據(jù)表示圖或自定義窗體收集信息。另外， Access 允許創(chuàng)建自定義報表用于打印或輸出數(shù)據(jù)庫中的信息。 Access 是一種關(guān)系數(shù)據(jù)庫工具，關(guān)系數(shù)據(jù)庫是已開發(fā)的最通用的數(shù)據(jù)庫之一。 二者的結(jié)合（ DBA）微軟的 JET 數(shù)據(jù)庫引擎提供了與數(shù)據(jù)庫打交道的途徑，我們是通過它以及 Visual Basic 來訪問數(shù)據(jù)庫并對其進行各種操作。 DATA 控件在數(shù)據(jù)庫中的信息與將信息顯示給用戶看的 Visual Basic 程序之間架起了一座橋梁。缺省情況 下， DATA 控件根據(jù)數(shù)據(jù)庫中的一個或多個數(shù)據(jù)表建立一個 dynasettype（動態(tài)集合）類型的記錄集合。 DATA 控件還提供了用來瀏覽不同記錄的各種跳轉(zhuǎn)按鈕。 第三章 Windows 下的 VisualVisual Basic 應(yīng)用程序 基本的構(gòu)建塊是用戶所創(chuàng)建的對象，每一個對象都具有一些特性和行為（屬性、事件和 方法）。使用應(yīng)用程序具有可通用性可說擴展性和強有力的功能。實現(xiàn)菜單選項菜單是程序最重要的特性之一，大多數(shù)程序都依賴一個定義良好的菜單使程序易于使用和維護， Visual Basic 也提供了強大的創(chuàng)建菜單功能是程序更加標準。 實現(xiàn)工具欄 CoolBar 控件與 Office97 種看到的 CoolBar 是類似的。通過在CoolBar 中遷入其他空間你局可以向用戶提供更好的靈活性和義用性。其中的按鈕可以顯示圖像和標題，并按功能分組或加入分隔符，還可以圍棋設(shè)置鼠標停留在其上顯示的提示字符。選擇 工程 下拉菜單中的 部件 選項，顯示 部件 對話框。 其屬性及對象如下： 1． Align 屬性定義工具條在窗體中的位置 2． ToolTipText 屬性是字符串類型，定義控件的提示字符 3． Style 屬性定義按鈕外觀。 5． HotImangeList 屬性設(shè)置一個 ImageList 控件名，該控件定義按鈕獲得熱點時顯示的圖像。創(chuàng)建工具條包括 ImageList 和 Toolbar 控件 ImageList 用于為其他控件提供圖像庫，將ImageList 控件加入到工具箱的操作于前述 Toolbar 控件相同。 無論寫出來的程序是要給大量的用戶使用，還是僅僅局限于公司內(nèi)部有限的使用者，我們都應(yīng)該為用戶提供詳細的、易于理解的聯(lián)機幫助文檔。使用它我們可以為我們編寫的應(yīng)用程序生成一組幫助文件。這些信息包括公司名稱、版本號、修訂號以及其他類似信息。 APP 對象的大多數(shù)屬性被應(yīng)用程序用來提供常規(guī)的信息，通過使用這些 APP 提供的屬性，可以在應(yīng)用程序和 用戶之間交流重要信息，在項目屬性框中可以設(shè)置它的屬性。數(shù)據(jù)庫的作用在于組織和表達信息，簡而言之，數(shù)據(jù)庫就是信息的集合。關(guān)系數(shù)據(jù)庫中包含了多個數(shù)據(jù)表的信息，數(shù)據(jù)庫含有各個不同部分的術(shù)語，象記錄、域等。創(chuàng)建一個數(shù)據(jù) 庫結(jié)構(gòu)的過程被認為是數(shù)據(jù)模型設(shè)計。 修改已建的數(shù)據(jù)庫數(shù)據(jù)庫的修改分為：添加、編輯和刪除記錄。 實現(xiàn)數(shù)據(jù)庫之間的聯(lián)系數(shù)據(jù)庫之間的關(guān)系指明兩個庫之間共享一個共同的關(guān)鍵字值。一個更高級的連接形式稱為自連接。數(shù)據(jù)庫中有三種不同類型的關(guān)鍵字：主關(guān)鍵字、組合關(guān)鍵字和外關(guān)鍵字。 系統(tǒng)結(jié)構(gòu)圖 圖一 支持環(huán)境 Microsoft Window98/2021/XP 程圖 系統(tǒng)流程圖 圖 二 系統(tǒng)功能流程圖 系統(tǒng)功能流程圖 系統(tǒng) 登錄界面 輸入操作員及密碼 數(shù)據(jù)庫 正確 功能 界 面 登錄 出錯 信 息 密碼錯 功能 處 理 出錯 信息 系 統(tǒng) 主 界 面 系 統(tǒng) 主 界 面 檢查 圖三 5 、系統(tǒng)管理流程圖 系統(tǒng)管 理流程圖 教職員入庫信息 課程設(shè)置 排課管理 打印表 系統(tǒng)管理員登錄 功能界面 教員入庫 數(shù) 據(jù) 庫Access 添加 修改 刪除 全刪 課程安排 帶課查詢 查詢 退出 第五章 系統(tǒng)總體規(guī)劃 系統(tǒng)功能 1． 可以進行文本操作； 2． 添加一個數(shù)據(jù)庫項目； 3． 刪除一個數(shù)據(jù)庫項目； 4． 修改一個數(shù)據(jù)庫項目； 5． 查詢信息； 6． 察看課程表。 文 件包括：新建打開打開寫字板 保存另存打印退出視圖包括：狀態(tài)條工具欄背景顏色顯示課程表 2．記錄操作打開記錄操作進入記錄操作選項頁分別由瀏覽記錄、查找等三個選項組成。幫助系統(tǒng) 系統(tǒng)管理員登錄 數(shù) 據(jù) 庫Access 系統(tǒng)管理 增加用戶 功能界面 刪除用戶 密碼修改 課程模塊：該模塊主要完成教師基本信息的錄入、刪除 、更新等功能。如果用戶修改某一紀錄中的某一項，可單添加按鈕進行教師記錄的編輯 ，此窗口使用數(shù)據(jù)窗口的 FREEDOM 風格（典型的錄入界面）。 6． 2． 2排課數(shù)據(jù)庫排課數(shù)據(jù)庫里存儲了教師的排課包括：編號、排課、等如表 列名（中文）列名（英文）數(shù)據(jù)類型寬度小數(shù)點位數(shù)是否為空姓名 Name Date8No 編號 CodeInteger6No 排課 ScoreDate10No 備注RecordDate15No 表 排課模塊：該模塊主要完成教師排課的基本信息的錄入、刪除 、更新等功能。課程數(shù)據(jù)庫課程數(shù)據(jù)庫利存儲了課程的信息：課程名、作者、出版社等如表列名（中文）列名（英文）數(shù)據(jù)類型寬度小數(shù)點位數(shù)是否為空課程IDCourseDate8No 課程名 NameDate15No 出版 社 PublisherDate20No 作者ScoreDate18No 備注 RecordDate15No 表 課程模塊：該模塊主要完成存儲課程的所有信息及錄入、刪除 、更新等功能 與 VB 的連接 Visual Basic 提供了與底層數(shù)據(jù)庫系統(tǒng)緊密的連接。生成獨立應(yīng)用或脫離服務(wù)器運行的服務(wù)以上的應(yīng)用， Visual Basic 連接數(shù)據(jù)庫的方式有兩種： 它對許多 API（如 ODBC API、 SOCKET API 等等）的封裝使得編程變得簡單起來。下面，我們談?wù)勗?VB 中調(diào)用存儲過程的實現(xiàn)方法及其注意事項。由于存儲過程在實現(xiàn)數(shù)據(jù)封裝、隱藏以及代碼的預(yù)編譯、減少網(wǎng)絡(luò)負載、維護方便等優(yōu)點，所以被許多 RDBMS 和編程工具做支持。 我們以 ADO 為例來說明其實現(xiàn)的步驟 1． 創(chuàng)建、調(diào)試存儲過程。本例中的存儲過程代碼如下（使用PUBS 的 MS SQL 中的例子庫 ）： CREATE PROCEDURE myprocedure job_id smallint, job_lvl tinyint AS SELECT * FROM employee WHERE job_id job_id AND job_lvl job_lvl 2． 在 VB 中生成一個新的工程，工程有一窗體，一個 COMMAND（ NAME：COMMAND1） 按鈕，一個 MSFlexGrid（ NAME： MSFlexGrid1）控件。 5． 創(chuàng)建參數(shù)并設(shè)置各個參數(shù)的屬性； 6． 執(zhí)行 ADO mand。 其中代碼如下： 在窗體中聲明以下變量： Dim n1 As ‘連接 Dim mymand As ‘命令 Dim parm_jobid As ‘參數(shù) 1 Dim parm_joblvl As ‘參數(shù) 2 Dim rstByQuery As ‘結(jié)果集 Dim strCnn As String ‘連接字符串 在 窗體的 LOAD 事件中加入如下代碼： Set n1 = New ‘生成一個連接 strCnn = DSN=MYDSN。pwd= ‘創(chuàng)建的系統(tǒng)數(shù)據(jù)源 MYDSN 指向 PUBS 數(shù)據(jù)庫 strCnn ‘打開連接 在窗體的 UNLOAD 中的加入代碼如下： ‘關(guān)閉連接 Set n1 = Nothing ‘釋放連接 在按鈕中的代碼如下： Dim I As integer Dim j as integer Set parm_jobid = New Set mymand = New 39。 RecordsAffected：是指用 update、 delete 操作時所影響的結(jié)果，對select 的查詢，其值為 1；這和在 Ms sql server 中的 Query Analyzer 中的不一樣。 Options：指明 mand 的類