【正文】 庫含有各個不同部分的術(shù)語，象記錄、域等。 新建一個數(shù)據(jù)庫創(chuàng)建任何一個數(shù)據(jù)庫的第一步是仔細(xì)的規(guī)劃數(shù)據(jù)庫，設(shè)計必須是靈活的、有邏輯的。創(chuàng)建一個數(shù)據(jù) 庫結(jié)構(gòu)的過程被認(rèn)為是數(shù)據(jù)模型設(shè)計。 1． 標(biāo)識需要的數(shù)據(jù)； 2． 收集被標(biāo)識的字段到表中； 3． 標(biāo)識主關(guān)鍵字字段； 4． 繪制一個簡單的數(shù)據(jù)圖表； 5． 規(guī)范數(shù)據(jù)； 6． 標(biāo)識指定字段的信息； 7． 創(chuàng)建物理表。 修改已建的數(shù)據(jù)庫數(shù)據(jù)庫的修改分為：添加、編輯和刪除記錄。這三種操作均可由 Visual Basic 創(chuàng)建的程序來完成，下面的章節(jié)將詳細(xì)描述實現(xiàn)的具體方法。 實現(xiàn)數(shù)據(jù)庫之間的聯(lián)系數(shù)據(jù)庫之間的關(guān)系指明兩個庫之間共享一個共同的關(guān)鍵字值。一個連接是指一種虛擬的表，這種表是在當(dāng)用戶要求從相互關(guān)聯(lián)的各個不同的表中獲取信息時建立 的，關(guān)鍵字段用于在相互連接的不同表中查找匹配的記錄。一個更高級的連接形式稱為自連接。這種連接是指一個表被連接到它自己的一個字段，或在不同的紀(jì)錄中由重復(fù)數(shù)據(jù)的組合字段。數(shù)據(jù)庫中有三種不同類型的關(guān)鍵字：主關(guān)鍵字、組合關(guān)鍵字和外關(guān)鍵字。在表中使用的關(guān)鍵字類型用于描述庫表示什么以及在數(shù)據(jù)庫中如何與其它的庫建立關(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ǒng)具體實現(xiàn) 用戶界面的實現(xiàn)封面具體實現(xiàn)見主界面 具體實現(xiàn)見 .主界面包含三方面的內(nèi)容 ,以下一一介紹 : ,進入記錄操作菜單項分別由文件、視圖及幫助三個選項。 文 件包括：新建打開打開寫字板 保存另存打印退出視圖包括：狀態(tài)條工具欄背景顏色顯示課程表 2．記錄操作打開記錄操作進入記錄操作選項頁分別由瀏覽記錄、查找等三個選項組成。 2． 1瀏覽記錄：教師課程庫課程庫排課庫 2． 2 查找記錄 2． 3 備注 3．系統(tǒng)信息打開系統(tǒng)信息進入選項頁分別由系統(tǒng)信息、信息采集等組成。幫助系統(tǒng) 系統(tǒng)管理員登錄 數(shù) 據(jù) 庫Access 系統(tǒng)管理 增加用戶 功能界面 刪除用戶 密碼修改 課程模塊：該模塊主要完成教師基本信息的錄入、刪除 、更新等功能。在此模塊中定義了八個域名來進行教師的信息存儲。如果用戶修改某一紀(jì)錄中的某一項，可單添加按鈕進行教師記錄的編輯 ，此窗口使用數(shù)據(jù)窗口的 FREEDOM 風(fēng)格（典型的錄入界面）。該種風(fēng)格特點是列標(biāo)題緊挨著數(shù)據(jù)列在此窗口還可以增加新教師紀(jì)錄。 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)緊密的連接。 Visual Basic 支持不同的關(guān)系數(shù)據(jù)庫 管理系統(tǒng)并充分發(fā)揮每一個數(shù)據(jù)庫的特長。生成獨立應(yīng)用或脫離服務(wù)器運行的服務(wù)以上的應(yīng)用， Visual Basic 連接數(shù)據(jù)庫的方式有兩種：通過使用 Visual Basic 的 DATA控件。 通過使用由 Visual Basic 提供的專用的直接與數(shù)據(jù)庫相連的接口 . 第七章 VB中調(diào)用帶參數(shù)存儲過程的實現(xiàn) VB 做為快速應(yīng)用開發(fā)（ RAD）工具越來越得到開發(fā)人員的認(rèn)可和接受。它對許多 API（如 ODBC API、 SOCKET API 等等）的封裝使得編程變得簡單起來。同時，它支持集成開發(fā)環(huán)境下的可視化、事件驅(qū)動、面向?qū)ο?等編程特點。下面，我們談?wù)勗?VB 中調(diào)用存儲過程的實現(xiàn)方法及其注意事項。 我們知道， VB 的數(shù)據(jù)庫編程有許多種方法，比如直接用 ODBC API 編程，這種方法靈活、高效，程序員可以實現(xiàn)對數(shù)據(jù)庫復(fù)雜的控制；也可以用 VB中的數(shù)據(jù)對象，如 RDO（遠(yuǎn)程數(shù)據(jù)對象）、 DAO（數(shù)據(jù)訪問對象）、 ADO（ ActiveX 數(shù)據(jù)對象），這種方法實現(xiàn)起來方便、快捷，但靈活性較差一些。由于存儲過程在實現(xiàn)數(shù)據(jù)封裝、隱藏以及代碼的預(yù)編譯、減少網(wǎng)絡(luò)負(fù)載、維護方便等優(yōu)點，所以被許多 RDBMS 和編程工具做支持。 VB 中的各類數(shù)據(jù)對象也提供 對存儲過程的支持。 我們以 ADO 為例來說明其實現(xiàn)的步驟 1． 創(chuàng)建、調(diào)試存儲過程。你可以在數(shù)據(jù)庫中也可以在其他外掛程序的支持下進行存儲過程的創(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）控件。 3． 創(chuàng)建連接 ADO connection； 4． 創(chuàng)建命令 ADO mand。 5． 創(chuàng)建參數(shù)并設(shè)置各個參數(shù)的屬性； 6． 執(zhí)行 ADO mand。 7． 對數(shù)據(jù)進行處理； MSFlexGrid 顯示查詢到的數(shù)據(jù) 8． 釋放 連接，退出程序。 其中代碼如下： 在窗體中聲明以下變量： 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。uid=sa。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。 = name1 this line can be ommited = adInteger ‘參數(shù)類型 = 3 ‘參數(shù)長度 = adParamInput ‘參數(shù)方向，輸入或輸出 = 100 ‘參數(shù)的值 parm_jobid ‘加入?yún)?shù) Set parm_joblvl = New ‘ = name2 = adInteger = 3 = adParamInput = 100 parm_joblvl = n1 ‘指定該 mand 的當(dāng)前活動連接 = myprocedure ‘ myprocedure 是你要調(diào)用的存儲過程名稱 = adCmdStoredProc ‘表明 mand 為存儲過程 Set rstByQuery = New Set rstByQuery = () I = 0 Do While Not I = I + 1 ‘ I 中保存記錄個數(shù) Loop = I + 1 ‘動態(tài)設(shè)置 MSFlexGrid 的行和列 = + 1 = 0 For I = 0 To 1 = I + 1 = (I).Name Next ‘設(shè)置第一行的標(biāo)題，用域名填充 I = 0 Set rstByQuery = () Do While Not I = I + 1 = I ‘確定行 For j = 0 To 1 = j + 1 = rstByQuery (j) ‘添充所有的列 Next Loop ‘這個循環(huán)用來填充 MSFlexGrid 的內(nèi)容 特殊說明 1． Set recordset = ( RecordsAffected, Parameters, Options ) RecordsAffected, Parameters, Options 這是mand 的兩種用法，一種有返回結(jié)果集，一種沒有返回結(jié)果集。 RecordsAffected：是指用 update、 delete 操作時所影響的結(jié)果，對select 的查詢，其值為 1；這和在 Ms sql server 中的 Query Analyzer 中的不一樣。 Query Analyzer 中， select、 update、 delete 的結(jié)果顯示的是實際查、改、刪的記錄數(shù)。 Options：指明 mand 的類型，有 adCmdText、 adCmdTable、adCmdStoredProc 等等，用戶可見 MSDN。 ，用戶可以用 varchar 來代替 integer,系統(tǒng)會幫你自動實施轉(zhuǎn)化； 3．本例中僅為帶輸入?yún)?shù)的存儲過程，如果要有輸出參數(shù)，根據(jù) MSDN的材料，用 ADO 不行。你可以用 RDO 數(shù)據(jù)對象， MSDN 中有一個例子，此處不做過多贅述； 4．可以不用 ADO COMMAND 對象，也可直接調(diào)用 ADO CONNECTION 的execute 方法 ,結(jié)果很類似。 第八章 結(jié)束語 經(jīng)過 三個多月的設(shè)計和開發(fā)，中小學(xué)排課管理系統(tǒng)基本開發(fā)完畢。其功能基本符合用戶需求，能夠完成教師課程的存儲和排課的查詢以及各類相關(guān)報表的打印。并提供部分系統(tǒng)維護功能 ,使用戶方便進行數(shù)據(jù)備份和恢復(fù)、數(shù)據(jù)刪除。，對于數(shù)據(jù)的一致性的問題也通過程序進行了有效的解決。但是由于畢業(yè)設(shè)計時間較短，所以該系統(tǒng)還有許多不盡如人意的地方，比如聯(lián)機文檔比較少，用戶界面不夠美觀，出錯處理不夠等多方面問題。這些都有待進一步改善。 致謝： 在這次畢業(yè)設(shè)計中，我從指導(dǎo)老師朱靜老師身上學(xué)到了很多東西。朱老師的工作態(tài)度，嚴(yán)謹(jǐn)?shù)闹螌W(xué)精神和深厚的 理論水平都使我非常的感動。她無論在