【導(dǎo)讀】計(jì)算機(jī)等級(jí)考試系統(tǒng)的設(shè)計(jì)和實(shí)現(xiàn)。提交論文日期：20xx年5月22日。論文答辯日期：20xx年6月10日。20xx級(jí)信息與計(jì)算科學(xué)專業(yè)畢業(yè)論文(設(shè)計(jì))

　　

【正文】 中，輸入下面代碼： Global onExam As New Dim IsLocked As Boolean 用同樣的方法再建立一個(gè)模塊，命名為 “GlobalFunction”。在這個(gè)模塊的代碼編輯窗體中，輸入下面的代碼： Sub InitProgrm() 39。初始化系統(tǒng) 39。打開數(shù)據(jù)庫(kù)連接，設(shè)置初始變量 DataPath = amp。 \Data\ DSN=ExamSystem， ， 39。打開數(shù)據(jù)庫(kù)連接 IsLocked = False End Sub 這樣就完成了一個(gè)初始化系統(tǒng)的函數(shù)。 下面將它與主程序掛接。在主窗口中雙擊窗體的空白區(qū)域，進(jìn)入代碼編輯窗體。增加下面的一行： InitProg 20xx 級(jí)信息與計(jì)算科學(xué)專業(yè)畢業(yè)論文 19 保存工程后，就完成了 Visual Basic 和數(shù)據(jù)庫(kù)的連接。當(dāng)提示保存模塊時(shí)，保持 Visual Basic 默認(rèn)值即可。 與上面的方法類似，為工程 “vbpExamClient”也建立與數(shù)據(jù)庫(kù)的連接。 創(chuàng)建數(shù)據(jù)源 ODBC(Open DataBase Conenction，開放數(shù)據(jù)庫(kù)連接 )數(shù)據(jù)源可以用來(lái)訪問多種數(shù)據(jù)庫(kù)管理系統(tǒng)的數(shù)據(jù)。為了在數(shù)據(jù)庫(kù)中使用 ADO 技術(shù)，必須首先創(chuàng)建數(shù)據(jù)源。 (1)打開數(shù)據(jù)源管理器 在 Windows XP 操作系統(tǒng)中，選擇 “開始 ”→“ 控制版面 ”→“ 管理工具 ”→“ODBC 數(shù)據(jù)源 (32 位 )”選項(xiàng)，即可打開 “Microsoft ODBC 數(shù)據(jù)源 ”對(duì)話框。 (2)建立 ODBC DSN 數(shù)據(jù)源 在 “Microsoft ODBC 管理器 ”對(duì)話框中，選定 “用戶 DSN”選項(xiàng)卡，然后單擊 “添加 ”按鈕，出現(xiàn) “創(chuàng)建新數(shù)據(jù)源向?qū)?duì)話框 ”，因?yàn)槭褂玫氖?Microsoft Access 數(shù)據(jù)庫(kù)，則在驅(qū)動(dòng)程序列表中選擇了 “Microsoft Access Driver(*.mdb)”選項(xiàng)，然后單擊 “完成 ”按鈕。 這時(shí)出現(xiàn) “ODBC Microsoft Access”安裝對(duì)話框。在這個(gè)對(duì)話框中，指定了考試 .mdb這個(gè) Access 數(shù)據(jù)庫(kù)。 在 “數(shù)據(jù)源名 ”中輸入數(shù)據(jù)庫(kù)源的名稱 “ExamSystem”，然后單擊 “選擇 ”按鈕，在彈出“選擇數(shù)據(jù)庫(kù) ”對(duì)話框中選擇考試系統(tǒng)數(shù)據(jù)庫(kù)文件所在的文件 夾，然后選定 “考試 .mab”文件，并單擊 “確定 ”按鈕，返回到 “ODBC Microsoft Access 安裝 ”對(duì)話框，單擊確定，再連續(xù)單擊 “確定 ”按鈕退出 ODBC 管理器，這樣就完成了數(shù)據(jù)源的創(chuàng)建。 服務(wù)端主程序的建立 統(tǒng)一功能模塊與主程序界面 (1)設(shè)置窗體屬性 ●窗體的大小 使用的修改窗體大小的方法是使用 “屬性 ”窗口。首先確定已經(jīng)選擇了當(dāng)前的窗體（可以通過屬性窗口上方的對(duì)象列表查看當(dāng)前的操作對(duì)象）。 修改 “Height”和 “Width”屬性。在這里設(shè)置的值為： Height=6150， Width=8505，作用是為了是窗體在不同的分辨率下都能保持一樣的大小。 ●窗體的顯示特性 服務(wù)器程序具有考試監(jiān)視器的功能，所以它的窗體內(nèi)容相對(duì)固定，基本上不需要調(diào)整窗體的大小，所以就把窗體設(shè)置為不能修改大小。 首先在長(zhǎng)體屬性窗口中，設(shè)置當(dāng)前的操作對(duì)象為 “frmMain”。接下來(lái)在屬性窗口中把 “BorderStyle”屬性修改為 “3－ Fixed Dialog”， “Caption”屬性修改為 “管理計(jì)算機(jī)自動(dòng)化考試系統(tǒng) —服務(wù)器 ”， “StarUpRosition”屬性修改為 “1—所有者中心 ”，其它屬性沒有修改。 ●設(shè)置功能按鈕 楊過 ： 計(jì)算機(jī)等級(jí)考試系統(tǒng)的設(shè)計(jì)和實(shí)現(xiàn) 20 作為程序主窗體，它應(yīng)該包括應(yīng)用程序中用于的全部功能。所以，在設(shè)計(jì)程序的窗 口時(shí)，應(yīng)該把所有功能都包括進(jìn)去了。運(yùn)行的窗體，如圖 所示。 圖 14 服務(wù)端管理界面 設(shè)計(jì)過程如下： ●繪制 Frame 上面窗體中左側(cè)功能按鈕外面的一圈就是 Frame， Frame 是一種 Container，它可以用于盛放其它的控件，還可以對(duì)控件進(jìn)行分組。 首先單擊開發(fā)環(huán)境左側(cè)的控件工具的 Frame 工具，再在窗體上按住鼠標(biāo)左鍵，然后拖出一個(gè)矩形框，最后釋放鼠標(biāo)即可。 同時(shí)重復(fù)同 樣的過程 2 次，即可創(chuàng)建 3 個(gè) Frame 控件。 接下來(lái)就修改控件的屬性，對(duì)于這 3 個(gè)控件。他們的功能只是用作顯示，并不響應(yīng)鼠標(biāo)或鍵盤的事件，所以并沒有修改它的名稱 “名稱 ”屬性。只是將它們的 “Caption”屬性設(shè)置為相應(yīng)文字。 ●放置功能按鈕 在 Frame 控件里面放置了其它的控件。 首先選擇控件工具箱的命令按鈕工具，在第一個(gè) Frame 中拖動(dòng)，形成一個(gè)按鈕，按照同樣的方法，在第一個(gè) Frame 中放置 3 個(gè)按鈕，第二 Frame 中放置 3 個(gè)按鈕，第三個(gè)Frame 中放置 4 個(gè)按鈕控件。 .設(shè)置功能按鈕的屬性 接下來(lái)，為這些按鈕 設(shè)置了屬性。按照?qǐng)D 依次修改設(shè)置按鈕的 “Caption”屬性。 信息顯示的完成 (1)繪制 PictureBox PictureBox 也是一種容器。它不僅可以用于顯示圖片（這也是它最初的功能），也可以象 Frame 一樣作為其它控件的容器。 在此考試系統(tǒng)界面中，將右上方的 “狀態(tài)顯示區(qū) ”和右下方的 “鎖定提示區(qū) ”，分別設(shè)置兩個(gè) PictureBox 的目的是不同的。前者用于顯示日期、時(shí)間、考試人數(shù)的內(nèi)容屬于同20xx 級(jí)信息與計(jì)算科學(xué)專業(yè)畢業(yè)論文 21 一個(gè)整體；而后者則是由于鎖定狀態(tài)的信息提示和密碼輸入框不僅屬于同一個(gè)整體，而且在操作時(shí)要整體進(jìn)行動(dòng)作 ，所以在這個(gè)區(qū)域中的控件放置到一個(gè) PictureBox 中能使得程序的編寫更加簡(jiǎn)單。 首先在控件工具箱單擊按鈕 PictureBox 控件按鈕，然后在窗體上按下鼠標(biāo)左鍵并拖動(dòng)，形成一個(gè)矩形，然后釋放鼠標(biāo)，就可以創(chuàng)建一個(gè) PictureBox。 (2)設(shè)置 PictureBox 的屬性 由于這里創(chuàng)建的兩個(gè) PictureBox 要在程序代碼中使用，為了使控件在程序代碼的書寫中更容易識(shí)別，使用了標(biāo)準(zhǔn)的對(duì)象命名方法為這兩個(gè) PictureBox 設(shè)置 “名稱 ”屬性。 將顯示系統(tǒng)狀態(tài)信息的 PictureBox 的 “名稱 ”屬性設(shè)置為 “picInfo”.首先用鼠標(biāo)選中PictureBox 控件，接著在 “屬性 ”窗口中選擇 “名稱 ”屬性，然后清除原來(lái)的 “Picture1”，輸入新的名稱 ”picInfo”。 現(xiàn)在的 PictureBox 是具有凹陷效果的，在考試系統(tǒng)中，這兩個(gè)使用平面效果更為合適。所以設(shè)置了 PictureBox 的 “Border Style”(邊框樣式 )屬性，只要單擊選中 PictureBox控件，在屬性窗口中選擇 “Border Style”(邊框樣式 )屬性，單擊 “Border Style”項(xiàng)目右側(cè)的下拉按鈕，選擇其中的 ”0None”。 (3)繪制 PicInfo 中的控件 首先選擇控件工具箱中的 Label 控件，在 PictureBox 中拖動(dòng)，繪制出一個(gè) Label 控件；接下來(lái)按照同樣的方法在繪制 6 個(gè)；然后選擇控件工具箱的 Timer 控件，在 PicInfo容器中任意拖動(dòng)，釋放鼠標(biāo)后，就會(huì)在拖動(dòng)的位置上出現(xiàn)一個(gè)時(shí)鐘樣子的控件。 接下來(lái)設(shè)置這些 Label 控件的 “Caption”屬性，將其中的 4 個(gè) Label 控件分別設(shè)置為“當(dāng)前考試信息： ”、 “日期： ”、 “時(shí)間： ”、 “正在參加考試的人數(shù)： ”。由于這些 Label控件在編寫程序代碼時(shí)并不會(huì)使用，所有沒有設(shè)置它們的 “名 稱 ”屬性。然后又設(shè)置了Timer 控件的屬性：首先選中 Timer 控件，在 “屬性 ”窗口中設(shè)置它的屬性，將 “名稱 ”屬性設(shè)置為 “tmrMain”， “Enabled”屬性設(shè)置為 “True”， “Interval”屬性設(shè)置為 “300”。 Timer 控件的作用就是當(dāng)產(chǎn)生一定的時(shí)間間隔（由 Interval屬性決定，單位時(shí) ms），并到達(dá)規(guī)定的時(shí)間后，就會(huì)執(zhí)行 Timer 事件中的語(yǔ)句。剩下的 3 個(gè)控件，分別設(shè)置它們的 “名稱 ”屬性分別為 “l(fā)blData”、 “l(fā)blTime”、 “l(fā)blNum”。把 “l(fā)blData”控件移動(dòng)到 “日期： ”的 Lable 控件右側(cè)。按照同樣的辦法，把 “l(fā)blTime”放置在 “時(shí)間： ”控件右側(cè)，把 “l(fā)blNum”放置在 “正在參加考試人數(shù)： ”控件右側(cè)。 系統(tǒng)鎖定功能 系統(tǒng)鎖定功能時(shí)用于在不使用管理系統(tǒng)的時(shí)候，將功能鎖定。鎖定后的管理系統(tǒng)將無(wú)法完成任何功能，包括退出系統(tǒng)。 (1)使用 PictureBox 實(shí)現(xiàn)鎖定功能 ●繪制 PictureBox 控件 方法與前面設(shè)置 picInfo 類同。 楊過 ： 計(jì)算機(jī)等級(jí)考試系統(tǒng)的設(shè)計(jì)和實(shí)現(xiàn) 22 ●繪制 picLockSys 中的控件 用同樣的方法，在 picLockSys 容器右下方中，繪制 2 個(gè) Label 控件、 1 個(gè) TextBox控件和 1 個(gè) CommandButton 控件，界面如圖 所示。 圖 15 考試鎖定界面 在 Label控件和 CommandButton 的 Caption 屬性中輸入如圖 所示文字， 且把文本框中的 “名稱 ”屬性設(shè)置為 “txtUnlock”，并刪除 Text 屬性中的文字，接下來(lái)將文本框的“PasswordChar”屬性設(shè)置為 “*”。 (2)編寫解鎖功能的代碼 解鎖實(shí)際上時(shí)鎖定的逆操作，在鎖定系統(tǒng)時(shí)，關(guān)閉了全部功能按鈕的點(diǎn)擊功能，并且使系統(tǒng)無(wú)法關(guān)閉；解鎖時(shí)，首先要恢復(fù)按鈕的 點(diǎn)擊功能，然后使系統(tǒng)可以關(guān)閉就可以了。 (3)完成鎖定功能與主程序的掛接 ●把鎖定功能整合到程序中 在主窗體界面編輯窗口主雙擊 “鎖定考試系統(tǒng) “按鈕，在編輯窗口中，輸入相應(yīng)代碼。這樣，窗體的掛接基本上完成了。 再雙擊 “工程管理器 ”窗口中的 “DeclareVir”，再出現(xiàn)的代碼編輯窗口的開口加入一行： Global IsLocked As Boolean 接下來(lái)回到主窗體的窗體編輯窗口，雙擊窗體空白出，在 Form_Load()過程中添加一行： IsLocked = False 在代碼編輯窗口中上方的兩個(gè)下拉列表 框中分別選擇 “Form”和 “Unload”并輸入相應(yīng)代碼。 ●系統(tǒng)密碼的修改 系統(tǒng)密碼函數(shù)用于修改管理員密碼新建一個(gè)窗體命名為 “frmChgPasswd”，并放置相關(guān)控件，如圖 所示修改。 20xx 級(jí)信息與計(jì)算科學(xué)專業(yè)畢業(yè)論文 23 圖 16 修改管理員密碼界面 編寫代碼，雙擊修改密碼窗體中的 “確定 ”按鈕，輸入所需代碼。 回到窗體編輯狀態(tài)，雙擊 “解鎖 ”按鈕。在編輯窗口中輸入下面的所需代碼。 在主窗體編輯窗口中，雙擊 “修改管理員密碼 ” 按鈕，進(jìn)入代碼編輯窗口。在代碼編輯窗口中輸入下面代碼： Private Sub cmdChgPasswd_Click() vbModal End Sub 實(shí)現(xiàn)考試和題庫(kù)管理 實(shí)現(xiàn)考試管理模塊 考試管理用于管理考試的科目和題庫(kù)的題目。如圖 所示。 設(shè)置方式：新建一個(gè)窗體，在控件工具箱的 ListBox 控件，然后在窗體拖動(dòng)，形成一個(gè) lishBox 控件，命名為 lstSbj。在 lishBox 控件上方設(shè)置 4 個(gè) Label 控件，下方設(shè)置 7個(gè) label控件， 7 個(gè) TextBox 控件， 7 個(gè) CommandButton 控件，如圖 所示。 圖 17 考試管理界面 楊過 ： 計(jì)算機(jī)等級(jí)考試系統(tǒng)的設(shè)計(jì)和實(shí)現(xiàn) 24 ●科目管理窗口的設(shè)計(jì) 在詳細(xì)新顯示區(qū)完成的功能是顯示在科目列表中選定科目的詳細(xì)信息，也就是要求在 ListBox 中要響應(yīng) Click 事件。在 ListBox 的 Click 事件中，除了要完成詳細(xì)信息的顯示，還完成了按鈕 “有效 (Enanbled)”屬性的設(shè)置。 ●刪除科目功能 首先判斷考試可以是否有效，如果已經(jīng)處于 “無(wú)效 ”狀態(tài)，再判斷維護(hù)參照完整性的，已注冊(cè)但沒有完成考試的考生的人數(shù)是否滿足小于等于 0，如果小于等于 0，才可以刪除。 ●設(shè)置科目的狀態(tài) 考試 科目有兩種狀態(tài)： “有效 ”和 “無(wú)效 ”，考試科目管理窗體上采用了 2 個(gè)功能按鈕“啟用科目 ”和 “禁用科目 ”。 ●增加科目信息 增加科目信息、修改科目信息用于增加和修改考試的科目信息，如圖 所示。 在增加考試科目對(duì)話框中，涉及到科目編號(hào)的問題，這個(gè)科目編號(hào)是由兩個(gè) 3 位的隨機(jī)數(shù)字符串構(gòu)成，兩個(gè)字符串中用 “—”分割。從窗體設(shè)計(jì)上，考試科目號(hào)使用了兩個(gè)TextBox 控件，中間用 “—”分割，每個(gè) TextBox 存放 3 個(gè)字符。使用 “生成科目號(hào) ”按鈕可以自動(dòng)生成這兩個(gè) 3 位數(shù)字符串。代碼見附錄 1。 圖 18 增加考試科目界面 實(shí)現(xiàn)題庫(kù)的管理 題庫(kù)管理功能用于管理某一個(gè)考試科目中的題目信息。在考試系統(tǒng)中，題庫(kù)管理使用了統(tǒng)一的界面，如圖 所示。題目中還使用了 Rich Text 格式的文本，不僅可以設(shè)置字體、字號(hào)及顏色，而且還能插入圖片，并且題目也可以使用 Word 等高級(jí)的編輯器進(jìn)行編輯，只需要簡(jiǎn)單