【正文】 icrosoft Access”安裝對話框。在這個對話框中，指定了考試.mdb 這個 Access 數(shù)據(jù)庫。在“數(shù)據(jù)源名 ”中輸入數(shù)據(jù)庫源的名稱 “ExamSystem”，然后單擊“ 選擇”按鈕，在彈出“選擇數(shù)據(jù)庫 ”對話框中選擇考試系統(tǒng)數(shù)據(jù)庫文件所在的文件夾，然后選定“”文件，并單擊“ 確定” 按鈕，返回到 “ODBC Microsoft Access 安裝” 對話框，單擊確定，再連續(xù)單擊“ 確定” 按鈕退出 ODBC 管理器，這樣就完成了數(shù)據(jù)源的創(chuàng)建。 服務端主程序的建立 統(tǒng)一功能模塊與主程序界面(1)設置窗體屬性●窗體的大小使用的修改窗體大小的方法是使用“屬性” 窗口。首先確定已經(jīng)選擇了當前的窗體（可以通過屬性窗口上方的對象列表查看當前的操作對象） 。修改“Height”和“Width” 屬性。在這里設置的值為：Height=6150 ，Width=8505 ，作用是為了是窗體在不同的分辨率下都能保持一樣的大小?！翊绑w的顯示特性服務器程序具有考試監(jiān)視器的功能，所以它的窗體內(nèi)容相對固定，基本上不需要調(diào)整窗體的大小，所以就把窗體設置為不能修改大小。首先在長體屬性窗口中，設置當前的操作對象為“frmMain”。接下來在屬性窗口中把“BorderStyle”屬性修改為 “3－Fixed Dialog”， “Caption”屬性修改為“管理計算機自動化考試系統(tǒng)—服務器” ， “StarUpRosition”屬性修改為“1 —所有者中心”，其它屬性沒有修改。●設置功能按鈕作為程序主窗體，它應該包括應用程序中用于的全部功能。所以，在設計程序的窗口時，應該把所有功能都包括進去了。運行的窗體，如圖 所示。圖 14　服務端管理界面設計過程如下：●繪制 Frame上面窗體中左側(cè)功能按鈕外面的一圈就是 Frame，F(xiàn)rame 是一種 Container，它可以用于盛放其它的控件，還可以對控件進行分組。首先單擊開發(fā)環(huán)境左側(cè)的控件工具的 Frame 工具，再在窗體上按住鼠標左鍵，然后拖出一個矩形框，最后釋放鼠標即可。同時重復同樣的過程 2 次，即可創(chuàng)建 3 個 Frame 控件。接下來就修改控件的屬性，對于這 3 個控件。他們的功能只是用作顯示，并不響應鼠標或鍵盤的事件，所以并沒有修改它的名稱“ 名稱” 屬性。只是將它們的“Caption”屬性設置為相應文字?！穹胖霉δ馨粹o在 Frame 控件里面放置了其它的控件。首先選擇控件工具箱的命令按鈕工具，在第一個 Frame 中拖動，形成一個按鈕，按照同樣的方法，在第一個 Frame 中放置 3 個按鈕，第二 Frame 中放置 3 個按鈕，第三個 Frame 中放置 4 個按鈕控件。.設置功能按鈕的屬性接下來，為這些按鈕設置了屬性。按照圖 依次修改設置按鈕的“Caption”屬性。 信息顯示的完成(1)繪制 PictureBoxPictureBox 也是一種容器。它不僅可以用于顯示圖片（這也是它最初的功能） ，也可以象 Frame 一樣作為其它控件的容器。在此考試系統(tǒng)界面中，將右上方的“狀態(tài)顯示區(qū)” 和右下方的 “鎖定提示區(qū)”，分別設置兩個 PictureBox 的目的是不同的。前者用于顯示日期、時間、考試人數(shù)的內(nèi)容屬于同一個整體；而后者則是由于鎖定狀態(tài)的信息提示和密碼輸入框不僅屬于同一個整體，而且在操作時要整體進行動作，所以在這個區(qū)域中的控件放置到一個 PictureBox 中能使得程序的編寫更加簡單。首先在控件工具箱單擊按鈕 PictureBox 控件按鈕，然后在窗體上按下鼠標左鍵并拖動，形成一個矩形，然后釋放鼠標，就可以創(chuàng)建一個 PictureBox。(2)設置 PictureBox 的屬性由于這里創(chuàng)建的兩個 PictureBox 要在程序代碼中使用，為了使控件在程序代碼的書寫中更容易識別，使用了標準的對象命名方法為這兩個 PictureBox 設置“ 名稱”屬性。將顯示系統(tǒng)狀態(tài)信息的 PictureBox 的“名稱” 屬性設置為“picInfo”.首先用鼠標選中PictureBox 控件，接著在“屬性” 窗口中選擇“名稱”屬性，然后清除原來的“Picture1”，輸入新的名稱”picInfo”?，F(xiàn)在的 PictureBox 是具有凹陷效果的，在考試系統(tǒng)中，這兩個使用平面效果更為合適。所以設置了 PictureBox 的“Border Style”(邊框樣式)屬性，只要單擊選中PictureBox 控件，在屬性窗口中選擇“Border Style”(邊框樣式)屬性，單擊“Border Style”項目右側(cè)的下拉按鈕，選擇其中的”0None” 。(3)繪制 PicInfo 中的控件首先選擇控件工具箱中的 Label 控件，在 PictureBox 中拖動，繪制出一個 Label 控件；接下來按照同樣的方法在繪制 6 個；然后選擇控件工具箱的 Timer 控件，在PicInfo 容器中任意拖動，釋放鼠標后，就會在拖動的位置上出現(xiàn)一個時鐘樣子的控件。接下來設置這些 Label 控件的 “Caption”屬性，將其中的 4 個 Label 控件分別設置為“當前考試信息： ”、 “日期：”、 “時間：” 、 “正在參加考試的人數(shù)： ”。由于這些 Label 控件在編寫程序代碼時并不會使用，所有沒有設置它們的“名稱” 屬性。然后又設置了Timer 控件的屬性：首先選中 Timer 控件，在“屬性” 窗口中設置它的屬性，將“ 名稱”屬性設置為“tmrMain” ， “Enabled”屬性設置為 “True”， “Interval”屬性設置為“300” 。Timer 控件的作用就是當產(chǎn)生一定的時間間隔（由 Interval 屬性決定，單位時 ms） ，并到達規(guī)定的時間后，就會執(zhí)行 Timer 事件中的語句。剩下的 3 個控件，分別設置它們的“名稱”屬性分別為“l(fā)blData”、 “l(fā)blTime”、 “l(fā)blNum”。把“l(fā)blData”控件移動到“ 日期：”的 Lable 控件右側(cè)。按照同樣的辦法，把 “l(fā)blTime”放置在“時間：” 控件右側(cè)，把“l(fā)blNum”放置在“ 正在參加考試人數(shù)：”控件右側(cè)。 系統(tǒng)鎖定功能系統(tǒng)鎖定功能時用于在不使用管理系統(tǒng)的時候，將功能鎖定。鎖定后的管理系統(tǒng)將無法完成任何功能，包括退出系統(tǒng)。(1)使用 PictureBox 實現(xiàn)鎖定功能●繪制 PictureBox 控件方法與前面設置 picInfo 類同?！窭L制 picLockSys 中的控件用同樣的方法，在 picLockSys 容器右下方中，繪制 2 個 Label 控件、1 個 TextBox控件和 1 個 CommandButton 控件，界面如圖 所示。圖 15　考試鎖定界面在 Label 控件和 CommandButton 的 Caption 屬性中輸入如圖 所示文字， 且把文本框中的“ 名稱” 屬性設置為 “txtUnlock”，并刪除 Text 屬性中的文字，接下來將文本框的“PasswordChar”屬性設置為 “*”。(2)編寫解鎖功能的代碼解鎖實際上時鎖定的逆操作，在鎖定系統(tǒng)時，關閉了全部功能按鈕的點擊功能，并且使系統(tǒng)無法關閉；解鎖時，首先要恢復按鈕的點擊功能，然后使系統(tǒng)可以關閉就可以了。(3)完成鎖定功能與主程序的掛接●把鎖定功能整合到程序中在主窗體界面編輯窗口主雙擊“鎖定考試系統(tǒng)“ 按鈕，在編輯窗口中，輸入相應代碼。這樣，窗體的掛接基本上完成了。再雙擊“工程管理器 ”窗口中的 “DeclareVir”，再出現(xiàn)的代碼編輯窗口的開口加入一行：Global IsLocked As Boolean接下來回到主窗體的窗體編輯窗口，雙擊窗體空白出，在 Form_Load()過程中添加一行：IsLocked = False在代碼編輯窗口中上方的兩個下拉列表框中分別選擇“Form”和“Unload”并輸入相應代碼。●系統(tǒng)密碼的修改系統(tǒng)密碼函數(shù)用于修改管理員密碼新建一個窗體命名為“frmChgPasswd”，并放置相關控件，如圖 所示修改。圖 16　修改管理員密碼界面編寫代碼，雙擊修改密碼窗體中的“確定” 按鈕，輸入所需代碼?；氐酱绑w編輯狀態(tài)，雙擊“解鎖” 按鈕。在編輯窗口中輸入下面的所需代碼。在主窗體編輯窗口中，雙擊“修改管理員密碼” 按鈕，進入代碼編輯窗口。在代碼編輯窗口中輸入下面代碼：Private Sub cmdChgPasswd_Click() vbModal End Sub 實現(xiàn)考試和題庫管理 實現(xiàn)考試管理模塊考試管理用于管理考試的科目和題庫的題目。如圖 所示。設置方式：新建一個窗體，在控件工具箱的 ListBox 控件，然后在窗體拖動，形成一個 lishBox 控件，命名為 lstSbj。在 lishBox 控件上方設置 4 個 Label 控件，下方設置7 個 label 控件，7 個 TextBox 控件，7 個 CommandButton 控件，如圖 所示。圖 17　考試管理界面●科目管理窗口的設計在詳細新顯示區(qū)完成的功能是顯示在科目列表中選定科目的詳細信息，也就是要求在 ListBox 中要響應 Click 事件。在 ListBox 的 Click 事件中，除了要完成詳細信息的顯示，還完成了按鈕“ 有效 (Enanbled)”屬性的設置?！駝h除科目功能首先判斷考試可以是否有效，如果已經(jīng)處于“無效” 狀態(tài)，再判斷維護參照完整性的，已注冊但沒有完成考試的考生的人數(shù)是否滿足小于等于 0，如果小于等于 0，才可以刪除?！裨O置科目的狀態(tài)考試科目有兩種狀態(tài)：“ 有效 ”和“無效”，考試科目管理窗體上采用了 2 個功能按鈕“啟用科目”和“ 禁用科目”?！裨黾涌颇啃畔⒃黾涌颇啃畔?、修改科目信息用于增加和修改考試的科目信息，如圖 所示。在增加考試科目對話框中，涉及到科目編號的問題，這個科目編號是由兩個 3 位的隨機數(shù)字符串構(gòu)成，兩個字符串中用“—” 分割。從窗體設計上，考試科目號使用了兩個 TextBox 控件，中間用“—” 分割，每個 TextBox 存放 3 個字符。使用“生成科目號”按鈕可以自動生成這兩個 3 位數(shù)字符串。代碼見附錄 1。圖 18　增加考試科目界面 實現(xiàn)題庫的管理題庫管理功能用于管理某一個考試科目中的題目信息。在考試系統(tǒng)中，題庫管理使用了統(tǒng)一的界面，如圖 所示。題目中還使用了 Rich Text 格式的文本，不僅可以設置字體、字號及顏色，而且還能插入圖片，并且題目也可以使用 Word 等高級的編輯器進行編輯，只需要簡單的復制粘貼即可。圖 19　題庫管理界面(1)題庫窗口的設計新建一窗體，然后在上面添加各控件如圖 ?！馬ich Text 文本編輯功能Rich Text 是多格式文本的編輯。它可以類似 Word 的編輯方法和現(xiàn)實效果。(2)字體顏色的修改通過 SelColor 屬性設置來完成，但是需要添加 CommonDialog 控件，通過這個控件的 Color 屬性，可以調(diào)出選擇顏色對話框。然后就選擇一個合適的顏色?！癫迦雸D片實現(xiàn)插入圖片仍然使用了 CommonDialog 控件，這次調(diào)用了 ShowOpen 方法。選定的文件名將被存入 CommonDialog 控件的 FileName 屬性中。(3)集成增加和修改功能在窗體界面中，增加和修改的功能都已經(jīng)集成到同一個界面中了。在窗體級定義了一個變量，用于存放題目是否被修改。題目內(nèi)容輸入、類型選擇、答案輸入，都相應默認事件，且如果題目被修改，這個變量的值將被設置為 True。此外， “上一題 ”、 “下一題”、 “增加題目” 、 “關閉”等按鈕都要檢測當前題目是否需要保存。如果需要保存，則彈出的對話框詢問用戶是否保存題目?！耠p擊“下一題”按鈕，進入代碼編輯窗口，輸入下面的代碼： Private Sub cmdNext_Click() If IsChange Then CheckSave CurrentQ = CurrentQ + IIf(CurrentQ TotalQ，1，0) = (CurrentQ 1) = (CurrentQ TotalQ) CheckEmptyEnd Sub●返回，雙擊“上一題”按鈕，在代碼編輯窗口中輸入下面代碼：Private Sub cmdPrev_Click() If IsChange Then CheckSave CurrentQ = Current IIf(CurrentQ 1，1，0) = (CurrentQ 1) = (CurrentQ TotalQ) CheckEmpty End Sub用同樣方法，設置“ 增加題目 ”、 “關閉”按鈕代碼。在代碼編輯窗口中，輸入代碼見附錄 2。 生成考卷在考生完成注冊以后，系統(tǒng)會自動為考生生成考卷，生成的試卷會放在 Paper 表中。生成試卷時使用了產(chǎn)生不重復隨機數(shù)的算法，在所有有效的題目中，不重復地生成題目。生成試卷的過程仍然采用了用 Function...End Function 定義的函數(shù)，并且使用了Boolean 類型的返回值，代碼見附錄 3。 考試系統(tǒng)客戶端的建立 驗證考生準考證號碼為了防止代考現(xiàn)象的發(fā)生，在開始前必須輸入考生的準考證號碼來驗證考生的身份，創(chuàng)建窗體運行如圖 所示。圖 20　驗證考生準考證號碼界面 考試的歡迎和提示信息考試的歡迎和提示信息窗體用于向考生發(fā)布將要開始的考試的相關信息