【正文】 這些都有待進一步改善。 Options：指明 mand 的類型，有 adCmdText、 adCmdTable、adCmdStoredProc 等等，用戶可見 MSDN。 5． 創(chuàng)建參數(shù)并設置各個參數(shù)的屬性； 6． 執(zhí)行 ADO mand。下面，我們談談在 VB 中調(diào)用存儲過程的實現(xiàn)方法及其注意事項。課程數(shù)據(jù)庫課程數(shù)據(jù)庫利存儲了課程的信息：課程名、作者、出版社等如表列名（中文）列名（英文）數(shù)據(jù)類型寬度小數(shù)點位數(shù)是否為空課程IDCourseDate8No 課程名 NameDate15No 出版 社 PublisherDate20No 作者ScoreDate18No 備注 RecordDate15No 表 課程模塊：該模塊主要完成存儲課程的所有信息及錄入、刪除 、更新等功能 與 VB 的連接 Visual Basic 提供了與底層數(shù)據(jù)庫系統(tǒng)緊密的連接。 文 件包括：新建打開打開寫字板 保存另存打印退出視圖包括：狀態(tài)條工具欄背景顏色顯示課程表 2．記錄操作打開記錄操作進入記錄操作選項頁分別由瀏覽記錄、查找等三個選項組成。 實現(xiàn)數(shù)據(jù)庫之間的聯(lián)系數(shù)據(jù)庫之間的關系指明兩個庫之間共享一個共同的關鍵字值。數(shù)據(jù)庫的作用在于組織和表達信息，簡而言之，數(shù)據(jù)庫就是信息的集合。 無論寫出來的程序是要給大量的用戶使用，還是僅僅局限于公司內(nèi)部有限的使用者，我們都應該為用戶提供詳細的、易于理解的聯(lián)機幫助文檔。選擇 工程 下拉菜單中的 部件 選項，顯示 部件 對話框。實現(xiàn)菜單選項菜單是程序最重要的特性之一，大多數(shù)程序都依賴一個定義良好的菜單使程序易于使用和維護， Visual Basic 也提供了強大的創(chuàng)建菜單功能是程序更加標準。缺省情況 下， DATA 控件根據(jù)數(shù)據(jù)庫中的一個或多個數(shù)據(jù)表建立一個 dynasettype（動態(tài)集合）類型的記錄集合。另外， Access 允許創(chuàng)建自定義報表用于打印或輸出數(shù)據(jù)庫中的信息。使用戶和開發(fā)人員可以較快地確定需求，然后采用循環(huán)進化的開發(fā)方式，對系統(tǒng)模型作連續(xù)的精化，將系統(tǒng)需具 備的性質(zhì)逐漸增加上去，直到所有的性質(zhì)全部滿足。 第一章為什么要開發(fā)一個排課管理系統(tǒng)？ 計算機已經(jīng)成為我們學習和工作的得力助手：今天，計算機的價格已經(jīng)十分低廉，性能卻有了長足的進步。經(jīng)過分析 ,我們使用 MICROSOFT公司的 VISUAL BASIC開發(fā)工具 ,利用其提供的各種面向?qū)ο蟮拈_發(fā)工具 ,尤其是數(shù)據(jù)窗口這一能方便而簡潔操縱數(shù)據(jù)庫的智能化對象 ,首先在短時間內(nèi)建立系統(tǒng)應用原型 ,然后 ,對初始原型系統(tǒng)進行需求迭代 ,不斷修正和改進 ,直到形成用戶滿意的可行系統(tǒng)。 \ select * from teacher, con, adOpenStatic, adLockOptimistic If 0 Then displayInfo CanSave (False) Else 39。 End Sub Private Sub ImgBg_Click() End Sub Private Sub Timer1_Timer() Unload Me Beep End Sub 教員入庫 Dim con As Dim rs As Dim qrs As Dim slSql As String Dim i, j As Integer Dim strBak(2) As String Dim sqlStr As String Private Sub Command1_Click(Index As Integer) On Error GoTo Err: Dim As Integer For = 0 To 2 Text1().Text = Next If 0 Then Select Case Index Case 0: Case 1: Command1(2).Enabled = True Command1(3).Enabled = True Case 2: Command1(0).Enabled = True Command1(1).Enabled = True Case 3: End Select displayInfo End If GoTo ok: Err: Call dataOver ok: End Sub Private Sub dataOver() If Then Command1(0).Enabled = False Command1(1).Enabled = False Command1(2).Enabled = True Command1(3).Enabled = True Else If Then Command1(0).Enabled = True Command1(1).Enabled = True Command1(2).Enabled = False Command1(3).Enabled = False Else MsgBox Database Error, vbExclamation + vbOKOnly, Error unknown End If End If End Sub Private Sub Command2_Click(Index As Integer) On Error GoTo errDeal If Index = 0 Or Index = 2 Then CanSave (True) Else CanSave (False) End If Select Case Index Case 0: Call toNull Case 1: j = MsgBox(你確定要刪除本記錄嗎？ , vbYesNo + vbQuestion, 刪除 ) If j = vbYes Then Call toNull End If Case 2: Case 3: If Len(LTrim$(RTrim$(Text1(0).Text))) 0 Then 39。對于數(shù)據(jù)的一致性的問題也通過程序進行了有效的解決。 RecordsAffected：是指用 update、 delete 操作時所影響的結(jié)果，對select 的查詢，其值為 1；這和在 Ms sql server 中的 Query Analyzer 中的不一樣。本例中的存儲過程代碼如下（使用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）控件。它對許多 API（如 ODBC API、 SOCKET API 等等）的封裝使得編程變得簡單起來。 6． 2． 2排課數(shù)據(jù)庫排課數(shù)據(jù)庫里存儲了教師的排課包括：編號、排課、等如表 列名（中文）列名（英文）數(shù)據(jù)類型寬度小數(shù)點位數(shù)是否為空姓名 Name Date8No 編號 CodeInteger6No 排課 ScoreDate10No 備注RecordDate15No 表 排課模塊：該模塊主要完成教師排課的基本信息的錄入、刪除 、更新等功能。 系統(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)管 理流程圖 教職員入庫信息 課程設置 排課管理 打印表 系統(tǒng)管理員登錄 功能界面 教員入庫 數(shù) 據(jù) 庫Access 添加 修改 刪除 全刪 課程安排 帶課查詢 查詢 退出 第五章 系統(tǒng)總體規(guī)劃 系統(tǒng)功能 1． 可以進行文本操作； 2． 添加一個數(shù)據(jù)庫項目； 3． 刪除一個數(shù)據(jù)庫項目； 4． 修改一個數(shù)據(jù)庫項目； 5． 查詢信息； 6． 察看課程表。 修改已建的數(shù)據(jù)庫數(shù)據(jù)庫的修改分為：添加、編輯和刪除記錄。 APP 對象的大多數(shù)屬性被應用程序用來提供常規(guī)的信息，通過使用這些 APP 提供的屬性，可以在應用程序和 用戶之間交流重要信息，在項目屬性框中可以設置它的屬性。創(chuàng)建工具條包括 ImageList 和 Toolbar 控件 ImageList 用于為其他控件提供圖像庫，將ImageList 控件加入到工具箱的操作于前述 Toolbar 控件相同。其中的按鈕可以顯示圖像和標題，并按功能分組或加入分隔符，還可以圍棋設置鼠標停留在其上顯示的提示字符。使用應用程序具有可通用性可說擴展性和強有力的功能。 DATA 控件在數(shù)據(jù)庫中的信息與將信息顯示給用戶看的 Visual Basic 程序之間架起了一座橋梁。 Access 的優(yōu)點在于它能使用數(shù)據(jù)表示圖或自定義窗體收集信息。 為將來學校上網(wǎng)做好準備跟據(jù) 1999 年中國電信的調(diào)查報告顯示我國的上網(wǎng)人數(shù)已達到 890萬，互聯(lián)網(wǎng)已經(jīng)十分普及，學校往界的畢業(yè)生希望能在世界的任何一個角落查到自己校友的信息，本系統(tǒng)為學校將來的上網(wǎng)作了先期工作，比如數(shù)據(jù)庫的建立。這些優(yōu)點能夠極大地提高排課管理的效率 ,也是企業(yè)的科學化、正規(guī)化管理 ,與 世界接軌的重要條件。對于前者要求建立起數(shù)據(jù)一致性和完整性強、數(shù)據(jù)安全性好的庫。但一直以來人們使用傳 統(tǒng)人工的方式管理文件排課，這種管理方式存在著許多缺點 ,如 :效率低、保密性差 ,另外時間一長 ,將產(chǎn)生大量的文件和數(shù)據(jù) ,這對于查找、更新和維護都帶來了不少的困難。我作為一個計算機應用的大專生，希望可以在這方面有所貢獻。 Visual Basic 提供了大量的控件，這些控件可用于設計界面和實現(xiàn)各種功能，減少了編程人員的工作量，也簡化了界面設計過程，從而有效的提高了應用程序的運行效率和可靠性。如上所述， Access 作為關系數(shù)據(jù)庫開發(fā)具備了許多優(yōu)點，可 以在一個數(shù)據(jù)包中同時擁有桌面數(shù)據(jù)庫的便利和關系數(shù)據(jù)庫的強大功能。將 DATA 控件放置在窗體中之后，我們還必須在該控件與要處理的數(shù)據(jù)庫之間建立聯(lián)系。 CoolBar就是一個可以在窗體上浮動的工具，同時也是其他 ActiveX 的容器。 4． ImageList 屬性定義與數(shù)據(jù)條對應的 ImageList 控件名，該控件定義工具條按鈕顯示的圖像。 關于版本為了是程序顯得更具有專業(yè)風格，首先可以在其中加入通常的應用程序信息。 新建一個數(shù)據(jù)庫創(chuàng)建任何一個數(shù)據(jù)庫的第一步是仔細的規(guī)劃數(shù)據(jù)庫，設計必須是靈活的、有邏輯的。這種連接是指一個表被連接到它自己的一個字段，或在不同的紀錄中由重復數(shù)據(jù)的組合字段。在此模塊中定義了八個域名來進行教師的信息存儲。通過使用 Visual B