【正文】 有了總體上的認(rèn)識(shí)之后，應(yīng)對(duì)每一個(gè)模塊的任務(wù)有一個(gè)清晰的認(rèn)識(shí)，以防代碼重復(fù)，責(zé)任模糊而浪費(fèi)不必要的工作量。下面談一談我對(duì) 每一個(gè)模塊總體認(rèn)識(shí)。 1 數(shù)據(jù)輸入： a、 專(zhuān)業(yè)設(shè)置：可新增輸入專(zhuān)業(yè)代碼及專(zhuān)業(yè)名稱(chēng)。也可以刪除專(zhuān)業(yè)代碼及其專(zhuān)業(yè)名稱(chēng) b、學(xué)期設(shè)置：可新增輸入學(xué)期 c、學(xué)生信息：可新增輸入學(xué)號(hào)，姓名和專(zhuān)業(yè)。 d、試卷登記：顯示各專(zhuān)業(yè)每個(gè)學(xué)期的試卷登記信息。 e、試卷信息：顯示各專(zhuān)業(yè)每個(gè)學(xué)期的每一學(xué)生的試卷信息、即考試成績(jī)。 2 統(tǒng)計(jì)分析模塊： a、查找學(xué)生：可以按學(xué)號(hào)進(jìn)行查詢(xún)也可按姓名進(jìn)行查詢(xún)。 b、成績(jī)統(tǒng)計(jì)和頻數(shù)分布圖。 c、成績(jī)分析。 3 退出系統(tǒng)。 SQL 的數(shù)據(jù)定義包括 3 部分：定義 基本表，定義視圖和定義索引。視圖是從一個(gè)或幾個(gè)基本表（或視圖）導(dǎo)出的表。在應(yīng)用系統(tǒng)中視圖是極其重要組成部分。它的外模式是由若干基本表和若干視圖組成的，視圖是一個(gè)虛表。它的優(yōu)點(diǎn)有： 1 對(duì)于數(shù)據(jù)庫(kù)的重構(gòu)造提供了一定程度上的邏輯獨(dú)立性。 2 簡(jiǎn)化了用戶(hù)觀點(diǎn) 3 視圖的機(jī)制是不同的用戶(hù)能以不同的方式看待同一數(shù)據(jù)。 4 視圖的機(jī)制對(duì)機(jī)密數(shù)據(jù)提供了自動(dòng)的安全保護(hù)功能。 索引是數(shù)據(jù)庫(kù)檢索經(jīng)常用到的對(duì)象，為了提高查找速度應(yīng)該給表建立索引。索引可以是唯一的或不唯一的，可以是簇類(lèi)的或非簇類(lèi)的。對(duì)一個(gè)基本表，可以根據(jù)應(yīng)用環(huán)境的 需要建立若干索引，以提供多種存取路徑，提高系統(tǒng)的運(yùn)行速度。 根據(jù)以上分析將數(shù)據(jù)庫(kù)設(shè)計(jì)成若干個(gè)基本表，它們是 Paper 試卷信息 含 義 字 段 名 類(lèi) 型 長(zhǎng) 度 主 鍵 專(zhuān)業(yè)代碼 Spec_code Char 7 √ 學(xué) 期 Semester Char 9 √ 第一題分?jǐn)?shù) Due1 Tinyint 1 第二題分?jǐn)?shù) Due2 Tinyint 1 第三題分?jǐn)?shù) Due3 Tinyint 1 第四題分?jǐn)?shù) Due4 Tinyint 1 第五題分?jǐn)?shù) Due5 Tinyint 1 第六題分?jǐn)?shù) Due6 Tinyint 1 第七題分?jǐn)?shù) Due7 Tinyint 1 第八題分?jǐn)?shù) Due8 Tinyint 1 第九題分?jǐn)?shù) Due9 Tinyint 1 第十題分?jǐn)?shù) Due10 Tinyint 1 說(shuō)明： a、 專(zhuān)業(yè)代碼和學(xué)期作為主碼。 b、 Due1?? Due10 均為該題目滿(mǎn)分成績(jī)。 Score 成績(jī)信息 含 義 字 段 名 類(lèi) 型 長(zhǎng) 度 主 鍵 學(xué)生學(xué)號(hào) Stu_id Char 10 √ 學(xué) 期 Semeter Char 9 第一題分?jǐn)?shù) Score1 Float 8 第二題分?jǐn)?shù) Score2 Float 8 第三題分?jǐn)?shù) Score3 Float 8 第四題分?jǐn)?shù) Score4 Float 8 第五題分?jǐn)?shù) Score5 Float 8 第六題分?jǐn)?shù) Score6 Float 8 第七題分?jǐn)?shù) Score7 Float 8 第八題分?jǐn)?shù) Score8 Float 8 第九題分?jǐn)?shù) Score9 Float 8 第十題分?jǐn)?shù) Score10 Float 8 是否缺考 absent Tinyint 1 說(shuō)明： a、 學(xué)生學(xué)號(hào)為主鍵。 b、 Score1?? Score10 為該學(xué)生在考試中取得的考試分?jǐn)?shù)。 c、 是否缺考、默認(rèn)值為 0，即為不缺考 Student 學(xué)生信息 含 義 字 段 名 類(lèi) 型 長(zhǎng) 度 主 鍵 學(xué)生學(xué)號(hào) Stu_id Char 10 √ 學(xué)生姓名 Stu_name Char 10 專(zhuān)業(yè)代碼 Spec_code Char 7 說(shuō)明： a、 學(xué)生學(xué)號(hào)為主碼。 Semeter 學(xué)期信息 含 義 字 段 名 類(lèi) 型 長(zhǎng) 度 主 鍵 學(xué) 期 semeter char 9 √ 說(shuō)明： a、學(xué)期為主碼。 Specicalty 專(zhuān)業(yè)信息 含 義 字 段 名 類(lèi) 型 長(zhǎng) 度 主 鍵 專(zhuān)業(yè)代碼 Spec_code char 7 √ 專(zhuān)業(yè)名稱(chēng) Spec_name char 22 說(shuō)明： a、 專(zhuān)業(yè)代碼為主碼。 各表之間的關(guān)系 第五章 詳細(xì)設(shè)計(jì) 本章將想次地對(duì)各個(gè)模塊進(jìn)行分解和剖析，包括程序、變量使用和窗體的構(gòu)成等。系統(tǒng)氛圍四個(gè)模塊，下面依次對(duì)各個(gè)模塊進(jìn)行敘述。 基本界面： 專(zhuān)業(yè)設(shè)置窗口： 數(shù)據(jù)窗口 dw_1 連接 dataobject： dw_spec 學(xué)期設(shè)置： 數(shù)據(jù)窗口 dw_1 連接 dataobject： dw_xueqi SELECT FROM semester 學(xué)生基本信息： 數(shù)據(jù)窗口 dw_1 連接 dataobject： dw_xueshengxinxi 代碼部分： SELECT , , FROM student WHERE = :scode 試卷登記： 數(shù)據(jù)窗口 dw_1 連接 dataobject： dw_analysis SELECT , , , , , , , , , , , , FROM paper, specialty WHERE ( = ) and ( ( = :spec ) AND ( = :semes ) ) 試卷信息： 數(shù)據(jù)窗口 dw_1 連接 dataobject： dw_analysis 控鍵： tv_1 代碼： treeViewItem tvi (handle,tvi) var_spec = = false () 控鍵： tv_2 代碼： treeViewItem tvi (handle,tvi) var_semeter = = false () 查找學(xué)生： 數(shù)據(jù)窗口 dw_1 連接 dataobject： dw_analysis 檢索： string get_str get_str = trim() if = then return end if choose case case 1 = dw_find_stu_by_id (sqlca) (get_str) case 2 = dw_find_stu_by_name (sqlca) (get_str) end choose 成績(jī)統(tǒng)計(jì)和頻數(shù)分布圖： DataWindowChild dwc_score, dwc_absent,dwc_graph (dw_score, dwc_score) (dw_graph1,dwc_graph) if var_semester then decimal there_paper SELECT top 1 INTO :there_paper FROM paper WHERE ( = :var_semester ) 。 if 0 then messagebox(180。錯(cuò)誤 ,您所指定的專(zhuān)業(yè)在指定的學(xué)期不存在試卷！ ) (SQLCA) () (SQLCA) () return end if (SQLCA) (var_semester) (SQLCA) (var_semester,var_spec) else (SQLCA) () (SQLCA) (,) end if 成績(jī)分析： DataWindowChild dwc_section1,dwc_section2 (dw_section1, dwc_section1) //(dw_section2, dwc_section2) if var_semester then decimal there_paper[6,10] SELECT top 1 , , , , , , , , , INTO :there_paper[1,1], :there_paper[1,2], :there_paper[1,3], :there_paper[1,4], :there_paper[1,5], :there_paper[1,6], :there_paper[1,7], :there_paper[1,8], :there_paper[1,9], :there_paper[1,10] FROM paper WHERE ( = :var_semester ) 。 if 0 then messagebox(錯(cuò)誤 ,您所指定的專(zhuān)業(yè)在指定的學(xué)期不存在試卷 !) (SQLCA) () //(sqlca) //(,) return end if int var_questions = 1 //get questins numbers for var_questions=1 to 10 if there_paper[1,var_questions] = 0 then EXIT next var_questions = 1 //calculate difficult real temp[2,10] SELECT sum( case when = then 1 else 0 end), sum( case when = then 1 else 0 end), sum( case when = then 1 else 0 end), sum( case when = then 1 else 0 end), sum( case when = then 1 else 0 end), sum( case when = then 1 else 0 end), sum( case when = then 1 else 0 end), sum( case when = then 1 else 0 end), sum( case when = then 1 else 0 end), sum( case when = then 1 else 0 end), avg( ), max(), avg( ), max(), avg( ), max(), avg( ), max(), avg( ), max(), avg( ), max(), avg( ), max(), avg( ), max(), avg( ), max(), avg( ), max() INTO :there_paper[2,1], :there_paper[2,2], :there_paper[2,3], :there_paper[2,4], :there_paper[2,5], :there_paper[2,6], :there_paper[2,7], :there_paper[2,8], :there_paper[2,9], :there_paper[2,10], :temp[1,1],:temp[2,1],:temp[1,2],:temp[2,2],:temp[1,3],:temp[2,3],:temp[1,4]