【正文】 .dat For Input As 1 For i = 0 To zong 1 Input 1, ww class_form3_yuan1(i) = ww Next i Close End If 添加刪除數(shù)據(jù) 該系統(tǒng)設(shè)計到了多個數(shù)據(jù)的添加刪除，對教師，教室，課程，班級添加刪除。讀入班的 If (first_class).Text Then Open .\kcb_done\class_kcb\ amp。 form3_Text7(b1) = ww End If Next b1 Close 1 39。 amp。 form3_Text7(b1) = ww End If Next b1 Close 1 End If Next a1 39。 (a1).Text amp。代碼列舉如下： 39。 排列此老師：對老師進行課程排列。 排課系統(tǒng)的使用： 課程設(shè)置 教師設(shè)置 班級設(shè)置 教室設(shè)置：在主界面的菜單上選擇設(shè)置，再進入子菜單各項，對課程，教師，班級，教室分別進行添加，并設(shè)置它所對應(yīng)的各項。即先用相對少的成本，較短的周期開發(fā)一個簡單的、但可以運行的系統(tǒng)原型向用戶演示或讓用戶試用，以便及早澄清并檢驗一些主要設(shè)計策略，在此基礎(chǔ)上再開發(fā)實際的軟件系統(tǒng) 。 由于種種原因，在需求分析階段得到完全、一致、準確、合理的需求說明是很困難的，在獲得一組基本需求說明后，就快速地使其 “實現(xiàn) ”，通過原型反饋，加深對系統(tǒng)的理解，并滿足用戶基本要求，使用戶在試用過程中受到啟發(fā)，對需求說明進行補充和精確化，消除不協(xié)調(diào)的系統(tǒng)需求，逐步確定各種需求，從而獲得合理、協(xié)調(diào)一致、無歧義的、完整的、現(xiàn)實可行的需求說明。 快速原型是利用原型輔助軟件開發(fā)的一種新思想。 9. 使用動態(tài)數(shù)組，而不是靜態(tài)數(shù)組 使用動態(tài)數(shù)組對代碼的執(zhí)行速度不會產(chǎn)生太大的影響，但是在某些情況下可以節(jié)約大量的資源。 8. 使用數(shù)組，而不是多個 變量 當你有多個保存類似數(shù)據(jù)的變量時 , 可以考慮將他們用一個數(shù)組代替。但遺憾的是，沒有辦法可以避免它。例如： 在上面的例子中，程序引用了兩個對象： Form1 和 Text1。在這種情況下，你可以把函數(shù)中的代碼拷貝到原來調(diào)用函數(shù)的地方。但是如果循環(huán)比較復(fù)雜，你就沒有必要這樣做了。在這種情況下，你可以把循環(huán)展開。這個數(shù)字聽起來有點駭人聽聞，但是如果你考慮到集合是一個對象，你就會明白為什么差異會這么大。 4. 盡量 使用數(shù)組，避免使用集合 除非你必須使用集合（ Collection），否則你應(yīng)該盡量使用數(shù)組。 3. 盡量避免使用屬性 在平時的代碼中，最常見的比較低效的代碼就是在可以使用變量的情況下，反復(fù)使用屬性（ Property），尤其是在循環(huán)中。通常使用變體類型的目的是為了減少設(shè)計的工 4 作量和代碼量，也有的程序員圖個省事而使用它。 2. 避免使用變體 對 于一個 VB 程序員來說，這是再明顯不過的事情了。例如程序中約定有三位小數(shù)，那么只需要將保存在 Integer 變量中的數(shù)值除以 1000 就可以得到結(jié)果。 在大多數(shù)情況下，程序員選擇使用 Single 或 Double 的原因是因為它們能夠保存小數(shù)。也許你不相信，但是正確地選擇數(shù)據(jù)類型可以大幅度提升代碼的性能。只在 以下有效 CDate Date CDbl Double CInt Integer CLng Long CSng Single CStr String CVar Variant ‘只在 以下有效 CVErr Error 39。 9 Fix(n) 返回數(shù)字的整數(shù)部分。 Val(n) 把字符串轉(zhuǎn)換為數(shù)值值。 Str(n) 把數(shù)值值轉(zhuǎn)換成字符串。 Sin(n) 返回 n 的正弦值，以弧度為單位。 Rnd(n) 產(chǎn)生 0 到 1 之間的一個隨機數(shù)。 Cos(n) 返回 n 的余弦值，以弧度為單位。 第三章 Visual Basic 技術(shù) Basic 常用函數(shù)介紹 Abs(n) 返回 n 的絕對值。 利用 VB 的事件驅(qū)動性特點，只需在窗體或控件上的代碼窗口中添加少量的代碼，便可達到告訴當在相應(yīng)的窗體或控件上發(fā)生某一事件時，它們在事件發(fā)生后應(yīng)該做什么工作的目的。 利用 VB 的 可視性特點，可方便的設(shè)計了程序的窗體界面，并在各個窗體中的合適位置繪制所需的每種控件。程序員不必擔心如何判斷事件是否已發(fā)生，只需要編寫一段代碼告訴計算機在事件發(fā)生以后應(yīng)該做什么工作就可以了。 VB 的另一重要特點是事件驅(qū)動。系統(tǒng)引進了窗體和控件的機制，用于設(shè)計應(yīng)用程序界面。屬性也用于為對象提供數(shù)據(jù)和從對象取回信息。 屬性 — 對象的特征，如尺寸、位置、顏色或文本。 過程 — 為完成任務(wù)而編寫的代碼段。 對象 — 程序的基本元素，它含有定義其特征的屬性，定義其任務(wù)和識別它可以響應(yīng)的事件的方法。 方法 — 嵌入在對象定義中的程序代碼，它定義 對象怎樣處理信息并響應(yīng)某事件。 事件 — 由用戶或操作系統(tǒng)引發(fā)的動作。 Visual Basic 常用術(shù)語解釋 在以下討論 Visual Basic時，經(jīng)?？梢月牭竭@些術(shù)語，因此首先對這些術(shù)語進行理解，以下是 Visual Basic中最常用到的幾個術(shù)語： 控件 — 提供程序可見界面的可重用對象。 通過幾年的發(fā)展，它已成為一種真正的專業(yè)化的開發(fā)語言和環(huán)境。 VB 功能強大，學習簡單。并且從 VB3 開始，微軟將 ACCESS 的數(shù)據(jù)庫驅(qū)動集成到了VB 中，這使得 VB 的數(shù)據(jù)庫編程能力大大提高。這使得程序員欣喜之極，都嘗試在 VB 的平臺上進行軟件創(chuàng)作。其實，以我們現(xiàn)在的目光來看， VB10 的功能實在是太弱了。這在當時引起了很大的轟動。 第二階段： （ 1975 年～ 80 年代中） 微機上固化的 BASIC 第三階段：（ 80 年代中～ 90 年代初） 結(jié)構(gòu)化 BASIC 語言。 BASIC 簡單、易學，目前仍是計算機入門的主要學習語言之一。 第二章 關(guān)于 Visual Basic Visual Basic 的歷史 Visual Basic 是由 BASIC 演化而來的， BASIC 是 Beginner39。 因此，開發(fā)一個排課系統(tǒng)是很有必要的。 由計算機進行排課的方式于傳統(tǒng)的方式相比較，優(yōu)勢是顯而易見的，首先， 可以省去大量人工，加速現(xiàn)代化的進程；其次，避免了人工排課出錯，使排課過程可以輕松進行。首先介紹開發(fā)工具 Visual Basic，接著介紹了 Visual Basic 的常用函數(shù)和怎樣編寫高質(zhì)量的 Visual Basic，最后詳細講解了用 Visual Basic 開發(fā)排課系統(tǒng)，這一部分主要講解系統(tǒng)功能的實現(xiàn)，在最后做了開發(fā)總結(jié)。由于對課程的排列時一項繁瑣的工作，所以它已經(jīng)逐漸改為由計算機完成。 該系統(tǒng)的不盡如人意的地方和功能上的缺陷，這些我都會進一步的改善。 2） 系統(tǒng)界面美觀欠缺：界面單調(diào)，整體布局不太合理，這個問題時由于開發(fā)過程中著重關(guān)注技術(shù)的原因，導(dǎo)致界面不象商業(yè)軟件一樣美觀。但是由于時間、技術(shù)等各方面因素，本系統(tǒng)仍不完善，有很多問題需要解決。 amp。 amp。 amp。如下 3 張圖，分別以班級，教室，教師排列的課表。 生成課表 點擊主界面的查詢菜單，再下拉菜單中選擇所有課表，可以看到課表，課表左側(cè)的有 3個選項，班級，教師教室。 排列可以將該教師加入課表中去。 xueshi amp。 .dat For Output As 1 Dim TeacherClassCount As String For h = 0 To 47 TeacherClassCount = (h).Text Write 1, TeacherClassCount Next h Close 1 Open .\data\teacher_name\ amp。 amp。 amp。 amp。 amp。 amp。 amp?？梢栽谙吕藛沃羞x擇課程，也可以添加刪除教師和教室。 amp。 amp。 amp。 amp。 amp。 amp。 amp。 amp。 amp。 For Output As 1 Close 1 End If End Sub 添加刪除教室，添加刪除班級，添加刪除教師都需要對時間表進行設(shè)置，并且可以將此課程放入不用排的課程類別中去。 .dat For Output As 9 Close 9 Open .\data\room_name\ amp。添加刪除課程的界面如下： 代碼如下： Private Sub Command1_Click() If = Empty Then MsgBox 請在文本框中輸入文字 , , 錯誤 //若沒由輸入，出 現(xiàn)提示框 Else Dim i As Integer For i = 0 To 1 = i If = Then MsgBox 不能重復(fù) !, , 警告！ //輸入課程重復(fù)，出現(xiàn)提示框 Exit Sub End If Next i Open .\data\ For Append As 4 //將輸入的課程名稱存入 中 Dim D As String D = Write 4, D Close 4 (D) SendKeys {home}+{end} = Open .\data\lesson_name\ amp。 (first_class).Text amp。以下將倆個（教師與班級）原始數(shù)據(jù)讀入 yuan，教室的 yuan 要在選中教室之后，寫入教室之前讀入 39。 For Input As 1 ‘使用循環(huán) For b1 = 0 To zong 1 Input 1, ww If doingct(b1) = Then doingct(b1) = ww 39。將這個老師的課程數(shù)據(jù)也讀入這組變量 doingct Open .\kcb_done\teacher_kcb\ amp。 .dat For Input As 1 For b1 = 0 To zong 1 Input 1, ww If doingct(b1) = Then doingct(b1) = ww 39。將這一排所有班的課程數(shù)據(jù)都讀入一組變量 doingct For a1 = first_class To first_class + 3 If (a1).Text Then Open .\kcb_done\class_kcb\ amp。 系統(tǒng)功能的實現(xiàn) 儲存數(shù)據(jù)形式 該系統(tǒng)所有的數(shù)據(jù)都是以變量的形式分 別存入 dat 文件中，然后從文件中的變量讀取數(shù)據(jù)。 新建一門課程：選擇一門課程，進行教師，教室的添加，可以選擇一個老師?？焖僭偷谋硎緢D如下： 原型表示圖 系統(tǒng)的基本組成及使用 運行該系統(tǒng)，進入主窗體界面，界面上有多個菜單選項，對這些菜單進行操作就能實現(xiàn)該系統(tǒng)的主要功能，該系統(tǒng)的主要窗體有主界面，添加 /刪除班級，添 加 /刪除教師，添加 /刪除教室，添加 /刪除課程，添加教室，選擇老師，查詢課表，由主界面能進入各個窗體，并能進行相應(yīng)的操作。又把快速原型思想用到軟件開發(fā)的其他階段，向軟件開發(fā)的全過程擴展。經(jīng)過簡單快速分析，快速實現(xiàn)一個原型，用戶與開發(fā)者在試用原型過程中加強通信與反饋，通過反復(fù)評價和改進原型，減少誤解，彌補漏洞，適應(yīng)變化，最終提高軟件質(zhì)量。 第四章 使用 Visual Basic 開發(fā)排課系統(tǒng) 開發(fā)使用的過程模型 在開發(fā)此套系統(tǒng)之前，首先要按照軟件工程的方法確定所使用的開發(fā)模型，利用 軟件工程的相關(guān)知識，確定采用的過程模型是 快速原型 。在 VB 中，數(shù)組是最高效的數(shù)據(jù)結(jié)構(gòu)之一。程序員唯一可以做就是使用 With 或者將用另一個對象保存子對象（ Text1）。利用這種方法引用效率很低。 7. 減少對子對象的引用 在 VB 中，通過使用 .來實現(xiàn)對象的引用。 6. 避免使用很短的函數(shù) 和使用小的循環(huán)體相同，調(diào)用只有幾行代碼的函數(shù)也是不經(jīng)濟的 調(diào)用函數(shù)所花費的時間或許比執(zhí)行函數(shù)中的代碼需要更長的時間。原因是循 環(huán)會占用額外的 CPU