【正文】 ………………………………………………15 VB 中調(diào)用帶參數(shù)存儲(chǔ) 過程的實(shí)現(xiàn) ………………………………………20 2 結(jié)束語(yǔ) ………………………………………………………………………27 2 致謝 …………………………………………………………………………28 2 參考文獻(xiàn) ……………………………………………………………………29 2 源代碼 ………………………………………………………………………30 前言 排課管理系統(tǒng)是一個(gè)教育單位不可缺少的部分 ,它的內(nèi)容對(duì)于學(xué)校的決策者和管理者來說都至關(guān)重要 ,所以排課管理系統(tǒng)應(yīng)該能夠?yàn)橛脩籼峁┏渥愕男畔⒑涂旖莸牟樵兪侄?。隨著科學(xué)技術(shù)的不斷提高 ,計(jì)算機(jī)科學(xué)日漸成熟 ,其強(qiáng)大的功能已為人們深刻認(rèn)識(shí) ,它已進(jìn)入人類社會(huì)的各個(gè)領(lǐng)域并發(fā)揮著越來越重要的作用。這些優(yōu)點(diǎn)能夠極大地提高排課管理的效率 ,也是企業(yè)的科學(xué)化、正規(guī)化管理 ,與 世界接軌的重要條件。 第一章為什么要開發(fā)一個(gè)排課管理系統(tǒng)？ 計(jì)算機(jī)已經(jīng)成為我們學(xué)習(xí)和工作的得力助手：今天，計(jì)算機(jī)的價(jià)格已經(jīng)十分低廉，性能卻有了長(zhǎng)足的進(jìn)步。 在中小學(xué)中用計(jì)算機(jī)管理排課的意義現(xiàn)在我國(guó)的中小學(xué)校中排課的管理水平還停留在紙介質(zhì)的基礎(chǔ)上，這樣的機(jī)制已經(jīng)不能適應(yīng)時(shí)代的發(fā)展，因?yàn)樗速M(fèi)了許多人力和物力，在信息時(shí)代這種傳統(tǒng)的管理方法必然被計(jì)算機(jī)為基礎(chǔ)的信息管理所取代。改革的總設(shè)計(jì)師鄧小平同志說過 科學(xué)技術(shù)是第一生產(chǎn)力 ，我希望能用我四年的所學(xué)編制出一個(gè)實(shí)用的程序來幫助中小學(xué)進(jìn)行更有效的課程管理。 為將來學(xué)校上網(wǎng)做好準(zhǔn)備跟據(jù) 1999 年中國(guó)電信的調(diào)查報(bào)告顯示我國(guó)的上網(wǎng)人數(shù)已達(dá)到 890 萬(wàn)，互聯(lián)網(wǎng)已經(jīng)十分普及，學(xué)校往界的畢業(yè)生希望能在世界的任何一個(gè)角落查到自己校友的信息，本系統(tǒng)為學(xué)校將來的上網(wǎng)作了先期工作，比如數(shù)據(jù)庫(kù)的建立。使用戶和開發(fā)人員可以較快地確定需求，然后采用循環(huán)進(jìn)化的開發(fā)方式，對(duì)系統(tǒng)模型作連續(xù)的精化，將系統(tǒng)需具 備的性質(zhì)逐漸增加上去，直到所有的性質(zhì)全部滿足。 第二章怎樣開發(fā)一個(gè)排課管理系統(tǒng)？ 編程環(huán)境的選擇微軟公司的 Visual Basic 是 Windows 應(yīng)用程序開發(fā)工具，使目前最為廣泛的、易學(xué)易用的面向?qū)ο蟮拈_發(fā)工具。故而，實(shí)現(xiàn)本系統(tǒng) VB是一個(gè)相對(duì)較好的選擇。 Access 的優(yōu)點(diǎn)在于它能使用數(shù)據(jù)表示圖或自定義窗體收集信息。另外， Access 允許創(chuàng)建自定義報(bào)表用于打印或輸出數(shù)據(jù)庫(kù)中的信息。 Access 是一種關(guān)系數(shù)據(jù)庫(kù)工具，關(guān)系數(shù)據(jù)庫(kù)是已開發(fā)的最通用的數(shù)據(jù)庫(kù)之一。 二者的結(jié)合（ DBA）微軟的 JET 數(shù)據(jù)庫(kù)引擎提供了與數(shù)據(jù)庫(kù)打交道的途徑，我們是通過它以及 Visual Basic 來訪問數(shù)據(jù)庫(kù)并對(duì)其進(jìn)行各種操作。 DATA 控件在數(shù)據(jù)庫(kù)中的信息與將信息顯示給用戶看的 Visual Basic 程序之間架起了一座橋梁。缺省情況 下， DATA 控件根據(jù)數(shù)據(jù)庫(kù)中的一個(gè)或多個(gè)數(shù)據(jù)表建立一個(gè) dynasettype（動(dòng)態(tài)集合）類型的記錄集合。 DATA 控件還提供了用來瀏覽不同記錄的各種跳轉(zhuǎn)按鈕。 第三章 Windows 下的 VisualVisual Basic 應(yīng)用程序 基本的構(gòu)建塊是用戶所創(chuàng)建的對(duì)象，每一個(gè)對(duì)象都具有一些特性和行為（屬性、事件和 方法）。使用應(yīng)用程序具有可通用性可說擴(kuò)展性和強(qiáng)有力的功能。實(shí)現(xiàn)菜單選項(xiàng)菜單是程序最重要的特性之一，大多數(shù)程序都依賴一個(gè)定義良好的菜單使程序易于使用和維護(hù)， Visual Basic 也提供了強(qiáng)大的創(chuàng)建菜單功能是程序更加標(biāo)準(zhǔn)。 實(shí)現(xiàn)工具欄 CoolBar 控件與 Office97 種看到的 CoolBar 是類似的。通過在CoolBar 中遷入其他空間你局可以向用戶提供更好的靈活性和義用性。其中的按鈕可以顯示圖像和標(biāo)題，并按功能分組或加入分隔符，還可以圍棋設(shè)置鼠標(biāo)停留在其上顯示的提示字符。選擇 工程 下拉菜單中的 部件 選項(xiàng)，顯示 部件 對(duì)話框。 其屬性及對(duì)象如下： 6． Align 屬性定義工具條在窗體中的位置 7． ToolTipText 屬性是字符串類型，定義控件的提示字符 8． Style 屬性定義按鈕外觀。 10． HotImangeList 屬性設(shè)置一個(gè) ImageList 控件名，該控件定義按鈕獲得熱點(diǎn)時(shí)顯示的圖像。創(chuàng)建工具條包括 ImageList 和 Toolbar 控件 ImageList 用于為其他控件提供圖像庫(kù)，將ImageList 控件加入到工具箱的操作于前述 Toolbar 控件相同。 無(wú)論寫出來的程序是要給大量的用戶使用，還是僅僅局限于公司內(nèi)部有限的使用者，我們都應(yīng)該為用戶提供詳細(xì)的、易于理解的聯(lián)機(jī)幫助文檔。使用它我們可以為我們編寫的應(yīng)用程序生成一組幫助文件。這些信息包括公司名稱、版本號(hào)、修訂號(hào)以及其他類似信息。 APP 對(duì)象的大多數(shù)屬性被應(yīng)用程序用來提供常規(guī)的信息，通過使用這些 APP 提供的屬性，可以在應(yīng)用程序和 用戶之間交流重要信息，在項(xiàng)目屬性框中可以設(shè)置它的屬性。數(shù)據(jù)庫(kù)的作用在于組織和表達(dá)信息，簡(jiǎn)而言之，數(shù)據(jù)庫(kù)就是信息的集合。關(guān)系數(shù)據(jù)庫(kù)中包含了多個(gè)數(shù)據(jù)表的信息，數(shù)據(jù)庫(kù)含有各個(gè)不同部分的術(shù)語(yǔ)，象記錄、域等。創(chuàng)建一個(gè)數(shù)據(jù) 庫(kù)結(jié)構(gòu)的過程被認(rèn)為是數(shù)據(jù)模型設(shè)計(jì)。 修改已建的數(shù)據(jù)庫(kù)數(shù)據(jù)庫(kù)的修改分為：添加、編輯和刪除記錄。 實(shí)現(xiàn)數(shù)據(jù)庫(kù)之間的聯(lián)系數(shù)據(jù)庫(kù)之間的關(guān)系指明兩個(gè)庫(kù)之間共享一個(gè)共同的關(guān)鍵字值。一個(gè)更高級(jí)的連接形式稱為自連接。數(shù)據(jù)庫(kù)中有三種不同類型的關(guān)鍵字：主關(guān)鍵字、組合關(guān)鍵字和外關(guān)鍵字。 系統(tǒng)結(jié)構(gòu)圖 圖一 支持環(huán)境 Microsoft Window98/2020/XP 程圖 系統(tǒng)流程圖 圖 二 系統(tǒng)功能流程圖 系統(tǒng) 登錄界面 輸入操作員及密碼 數(shù)據(jù)庫(kù) 正確 功能 界 面 登錄 出錯(cuò) 信 息 密碼錯(cuò) 功能 處 理 出錯(cuò) 信息 系 統(tǒng) 主 界 面 系 統(tǒng) 主 界 面 檢查 系統(tǒng)功能流程圖 圖三 5 、系統(tǒng)管理流程圖 教職員入庫(kù)信息 課程設(shè)置 排課管理 打印表 系統(tǒng)管理員登錄 功能界面 教員入庫(kù) 數(shù)據(jù) 庫(kù)Access 添加 修改 刪除 全刪 課程安排 帶課查詢 查詢 退出 系統(tǒng)管 理流程圖 第五章 系統(tǒng)總體規(guī)劃 系統(tǒng)功能 1． 可以進(jìn)行文本操作； 2． 添加一個(gè)數(shù)據(jù)庫(kù)項(xiàng)目； 3． 刪除一個(gè)數(shù)據(jù)庫(kù)項(xiàng)目； 4． 修改一個(gè)數(shù)據(jù)庫(kù)項(xiàng)目； 5． 查詢信息； 6． 察看課程表。 件包括：新建打開打開寫字板 保存另存打印退出視圖包括：狀態(tài)條工具欄背景顏色顯示課程表 2．記錄操作打開記錄操作進(jìn)入記錄操作選項(xiàng)頁(yè)分別由瀏覽記錄、查找等三個(gè)選項(xiàng)組成。幫助系統(tǒng) 系統(tǒng)管理員登錄 數(shù) 據(jù) 庫(kù)Access 系統(tǒng)管理 增加用戶 功能界面 刪除用戶 密碼修改 課程模塊：該模塊主要完成教師基本信息的錄入、刪除 、更新等功能。如果用戶修改某一紀(jì)錄中的某一項(xiàng)，可單添加按鈕進(jìn)行教師記錄的編輯 ，此窗口使用數(shù)據(jù)窗口的 FREEDOM 風(fēng)格（典型的錄入界面）。 6． 2． 2 排課數(shù)據(jù)庫(kù)排課數(shù)據(jù)庫(kù)里存儲(chǔ)了教師的排課包括：編號(hào)、排課、等如表 列名（中文）列名（英文）數(shù)據(jù)類型寬度小數(shù)點(diǎn)位數(shù)是否為空姓名 Name Date8No 編號(hào) CodeInteger6No 排課 ScoreDate10No 備注RecordDate15No 表 排課模塊：該模塊主要完成教師排課的基本信息的錄入、刪除 、更新等功能。課程數(shù)據(jù)庫(kù)課程數(shù)據(jù)庫(kù)利存儲(chǔ)了課程的信息：課程名、作者、出版社等如表列名（中文）列名（英文）數(shù)據(jù)類型寬度小數(shù)點(diǎn)位數(shù)是否為空課程IDCourseDate8No 課程名 NameDate15No 出版 社 PublisherDate20No 作者ScoreDate18No 備注 RecordDate15No 表 課程模塊：該模塊主要完成存儲(chǔ)課程的所有信息及錄入、刪除 、更新等功能 與 VB 的連接 Visual Basic 提供了與底層數(shù)據(jù)庫(kù)系統(tǒng)緊密的連接。生成獨(dú)立應(yīng)用或脫離服務(wù)器運(yùn)行的服務(wù)以上的應(yīng)用， Visual Basic 連接數(shù)據(jù)庫(kù)的方式有兩種： 它對(duì)許多 API（如 ODBC API、 SOCKET API 等等）的封裝使得編程變得簡(jiǎn)單起來。下面，我們談?wù)勗?VB 中調(diào)用存儲(chǔ)過程的實(shí)現(xiàn)方法及其注意事項(xiàng)。由于存儲(chǔ)過程在實(shí)現(xiàn)數(shù)據(jù)封裝、隱藏以及代碼的預(yù)編譯、減少網(wǎng)絡(luò)負(fù)載、維護(hù)方便等優(yōu)點(diǎn)，所以被許多 RDBMS 和編程工具做支持。 我們以 ADO為例來說明其實(shí)現(xiàn)的步驟 1． 創(chuàng)建、調(diào)試存儲(chǔ)過程。本例中的存儲(chǔ)過程代碼如下（使用PUBS 的 MS SQL 中的例子庫(kù) ）： 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 中生成一個(gè)新的工程，工程有一窗體，一個(gè) COMMAND（ NAME：COMMAND1） 按鈕，一個(gè) MSFlexGrid（ NAME： MSFlexGrid1）控件。 5． 創(chuàng)建參數(shù)并設(shè)置各個(gè)參數(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 ‘生成一個(gè)連接 strCnn = DSN=MYDSN。pwd= ‘創(chuàng)建的系統(tǒng)數(shù)據(jù)源 MYDSN 指向 PUBS 數(shù)據(jù)庫(kù) 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 操作時(shí)所影響的結(jié)果，對(duì)select 的查詢，其值為 1；這和在 Ms sql server 中的 Query Analyzer 中的不一樣。 Options：指明 mand 的類型，有 adCmdText、 adCmdTable、adCmdStoredProc 等等，用戶可見 MSDN。你可以用 RDO 數(shù)據(jù)對(duì)象， MSDN 中有一個(gè)例子，此處不做過多贅述； 4．可以不用 ADO COMMAND 對(duì)象，也可直接調(diào)用 ADO CONNECTION 的execute 方法 ,結(jié)果很類似。其功能基本符合用戶需求，能夠完成教師課程的存儲(chǔ)和排課的查詢以及各類相關(guān)報(bào)表的打印。對(duì)于數(shù)據(jù)的一致性的問題也通過程序進(jìn)行了有效的解決。這些都有待進(jìn)一步改善。朱老師的工作態(tài)度，嚴(yán)謹(jǐn)?shù)闹螌W(xué)精神和深厚的 理論水平都使我非常的感動(dòng)。 參考文獻(xiàn) ： 軟件系統(tǒng)開發(fā)技術(shù) 潘錦平 西安電子科技大學(xué)出版社 《軟件工程導(dǎo)論》 清華大學(xué)出版社 《 Visual Basic 數(shù)據(jù)庫(kù)實(shí)用程序設(shè)計(jì) 100 例》 段興 人民郵電出版社 《 Visual Basic 編程方法詳解》 李鴻吉 科學(xué)教育出版社 《數(shù)據(jù)庫(kù)系統(tǒng)概論》 薩師煊 高等教育出版社 《 Visual Basic 程序設(shè)計(jì)教程》 劉炳文 清華大學(xué)出版社 源代碼 : 進(jìn)入界面 Option Expli