【正文】 ●雙擊“下一題”按鈕，進入代碼編輯窗口，輸入下面的代碼： Private Sub cmdNext_Click() If IsChange Then CheckSave CurrentQ = CurrentQ + IIf(CurrentQ TotalQ，1，0) = (CurrentQ 1) = (CurrentQ TotalQ)2022 級信息與計算科學(xué)專業(yè)畢業(yè)論文27 CheckEmptyEnd Sub●返回，雙擊“上一題”按鈕，在代碼編輯窗口中輸入下面代碼：Private Sub cmdPrev_Click() If IsC。此外， “上一題 ”、 “下一題”、 “增加題目” 、 “關(guān)閉”等按鈕都要檢測當(dāng)前題目是否需要保存。在窗體級定義了一個變量，用于存放題目是否被修改。選定的文件名將被存入 CommonDialog 控件的 FileName 屬性中。然后就選擇一個合適的顏色。它可以類似 Word 的編輯方法和現(xiàn)實效果。圖 19　題庫管理界面(1)題庫窗口的設(shè)計新建一窗體，然后在上面添加各控件如圖 。在考試系統(tǒng)中，題庫管理使用了統(tǒng)一的界面，如圖 所示。代碼見附錄 1。從窗體設(shè)計上，考試科目號使用了兩個 TextBox 控件，中間用“—” 分割，每個 TextBox 存放 3 個字符?！裨黾涌颇啃畔⒃黾涌颇啃畔ⅰ⑿薷目颇啃畔⒂糜谠黾雍托薷目荚嚨目颇啃畔?，如圖 所示?！駝h除科目功能首先判斷考試可以是否有效，如果已經(jīng)處于“無效” 狀態(tài)，再判斷維護參照完整性的，已注冊但沒有完成考試的考生的人數(shù)是否滿足小于等于 0，如果小于等于 0，才可以刪除。2022 級信息與計算科學(xué)專業(yè)畢業(yè)論文25圖 17　考試管理界面●科目管理窗口的設(shè)計在詳細新顯示區(qū)完成的功能是顯示在科目列表中選定科目的詳細信息，也就是要求在 ListBox 中要響應(yīng) Click 事件。設(shè)置方式：新建一個窗體，在控件工具箱的 ListBox 控件，然后在窗體拖動，形成一個 lishBox 控件，命名為 lstSbj。在代碼編輯窗口中輸入下面代碼：Private Sub cmdChgPasswd_Click() vbModal End Sub 實現(xiàn)考試和題庫管理 實現(xiàn)考試管理模塊考試管理用于管理考試的科目和題庫的題目。在編輯窗口中輸入下面的所需代碼。圖 16　修改管理員密碼界面編寫代碼，雙擊修改密碼窗體中的“確定” 按鈕，輸入所需代碼。再雙擊“工程管理器 ”窗口中的 “DeclareVir”，再出現(xiàn)的代碼編輯窗口的開口加入一行：Global IsLocked As Boolean接下來回到主窗體的窗體編輯窗口，雙擊窗體空白出，在 Form_Load()過程中添加計算機等級考試系統(tǒng)的設(shè)計和實現(xiàn)24一行：IsLocked = False在代碼編輯窗口中上方的兩個下拉列表框中分別選擇“Form”和“Unload”并輸入相應(yīng)代碼。(3)完成鎖定功能與主程序的掛接●把鎖定功能整合到程序中在主窗體界面編輯窗口主雙擊“鎖定考試系統(tǒng)“ 按鈕，在編輯窗口中，輸入相應(yīng)代碼。圖 15　考試鎖定界面在 Label 控件和 CommandButton 的 Caption 屬性中輸入如圖 所示文字， 且把文本框中的“ 名稱” 屬性設(shè)置為 “txtUnlock”，并刪除 Text 屬性中的文字，接下來將文本框的“PasswordChar”屬性設(shè)置為 “*”。(1)使用 PictureBox 實現(xiàn)鎖定功能●繪制 PictureBox 控件方法與前面設(shè)置 picInfo 類同。 系統(tǒng)鎖定功能系統(tǒng)鎖定功能時用于在不使用管理系統(tǒng)的時候，將功能鎖定。把“l(fā)blData”控件移動到“ 日期：”的 Lable 控件右側(cè)。Timer 控件的作用就是當(dāng)產(chǎn)生一定的時間間隔（由 Interval 屬性決定，單位時 ms） ，并到達規(guī)定的時間后，就會執(zhí)行 Timer 事件中的語句。由于這些 Label 控件在編寫程序代碼時并不會使用，所有沒有設(shè)置它們的“名稱” 屬性。(3)繪制 PicInfo 中的控件首先選擇控件工具箱中的 Label 控件，在 PictureBox 中拖動，繪制出一個 Label 控件；接下來按照同樣的方法在繪制 6 個；然后選擇控件工具箱的 Timer 控件，在PicInfo 容器中任意拖動，釋放鼠標后，就會在拖動的位置上出現(xiàn)一個時鐘樣子的控件。現(xiàn)在的 PictureBox 是具有凹陷效果的，在考試系統(tǒng)中，這兩個使用平面效果更為合適。(2)設(shè)置 PictureBox 的屬性由于這里創(chuàng)建的兩個 PictureBox 要在程序代碼中使用，為了使控件在程序代碼的書寫中更容易識別，使用了標準的對象命名方法為這兩個 PictureBox 設(shè)置“ 名稱”屬性。前者用于顯示日期、時間、考試人數(shù)的內(nèi)容屬于同一個整體；而后者則是由于鎖定狀態(tài)的信息提示和密碼輸入框不僅屬于同一個整體，而且在操作時要整體進行動作，所以在這個區(qū)域中的控件放置到一個 PictureBox 中能使得程序的編寫更加簡單。它不僅可以用于顯示圖片（這也是它最初的功能） ，也可以象 Frame 一樣作為其它控件的容器。按照圖 依次修改設(shè)置按鈕的“Caption”屬性。首先選擇控件工具箱的命令按鈕工具，在第一個 Frame 中拖動，形成一個按鈕，按照同樣的方法，在第一個 Frame 中放置 3 個按鈕，第二 Frame 中放置 3 個按鈕，第三個 Frame 中放置 4 個按鈕控件。只是將它們的“Caption”屬性設(shè)置為相應(yīng)文字。接下來就修改控件的屬性，對于這 3 個控件。首先單擊開發(fā)環(huán)境左側(cè)的控件工具的 Frame 工具，再在窗體上按住鼠標左鍵，然后拖出一個矩形框，最后釋放鼠標即可。運行的窗體，如圖 所示。2022 級信息與計算科學(xué)專業(yè)畢業(yè)論文21●設(shè)置功能按鈕作為程序主窗體，它應(yīng)該包括應(yīng)用程序中用于的全部功能。首先在長體屬性窗口中，設(shè)置當(dāng)前的操作對象為“frmMain”。在這里設(shè)置的值為：Height=6150 ，Width=8505 ，作用是為了是窗體在不同的分辨率下都能保持一樣的大小。首先確定已經(jīng)選擇了當(dāng)前的窗體（可以通過屬性窗口上方的對象列表查看當(dāng)前的操作對象） 。在“數(shù)據(jù)源名 ”中輸入數(shù)據(jù)庫源的名稱 “ExamSystem”，然后單擊“ 選擇”按鈕，在彈出“選擇數(shù)據(jù)庫 ”對話框中選擇考試系統(tǒng)數(shù)據(jù)庫文件所在的文件夾，然后選定“”文件，并單擊“ 確定” 按鈕，返回到 “ODBC Microsoft Access 安裝” 對話框，單擊確定，再連續(xù)單擊“ 確定” 按鈕退出 ODBC 管理器，這樣就完成了數(shù)據(jù)源的創(chuàng)建。這時出現(xiàn)“ODBC Microsoft Access”安裝對話框。(1)打開數(shù)據(jù)源管理器在 Windows XP 操作系統(tǒng)中，選擇“ 開始”→“ 控制版面”→“管理工具”→“ODBC 數(shù)據(jù)源(32 位)” 選項，即可打開 “Microsoft ODBC 數(shù)據(jù)源”對話框。 創(chuàng)建數(shù)據(jù)源ODBC(Open DataBase Conenction，開放數(shù)據(jù)庫連接 )數(shù)據(jù)源可以用來訪問多種數(shù)據(jù)庫管理系統(tǒng)的數(shù)據(jù)。當(dāng)提示保存模塊時，保持Visual Basic 默認值即可。在主窗口中雙擊窗體的空白區(qū)域，進入代碼編輯窗體。打開數(shù)據(jù)庫連接 IsLocked = FalseEnd Sub這樣就完成了一個初始化系統(tǒng)的函數(shù)。打開數(shù)據(jù)庫連接，設(shè)置初始變量 DataPath = amp。在這個模塊的代碼編輯窗體中，輸入下面的代碼：Sub InitProgrm() 39。在工程管理器窗口中選擇這個模塊，參照前面的方法，在屬性窗口中，將它的“名稱” 屬性修改為“DeclarVir:”。由于庫文件只會加載到當(dāng)前的工程中，所以另外一個工程中也增加這個庫文件。 引用 ADO 庫文件ADO 庫在默認情況下，是不加載到 Visual Basic 工程中的，所以手動增加了這個庫。在 Visual Basic 中，可以通過很多方式連接數(shù)據(jù)庫，比較常用的包括：DAO(Data Access Object，數(shù)據(jù)訪問對象) 、ADO、數(shù)據(jù)控件和 ODBC API。這樣，客戶端的程序框架也就創(chuàng)建完成了。 這時 Visual Basic 會在工程管理窗口中添加一個名為“工程 1”的工程，這個新工程會與之前建立的服務(wù)端工程并列在工程管理器窗口中。這個工作實際上是創(chuàng)建了兩個文件：一個Visual Basic 工程文件，另一個是窗體文件。在 Visual Basic 開發(fā)環(huán)境右側(cè)“ 屬性 ”口中單擊“(名稱)” 目，然后輸入“frmMain” 。舉例來說，對于VisualBasic 開發(fā)應(yīng)用程序時，采用 vbpExamServer，其中 vbp 表示這是一個 Visual Basic 工程（ Visual Basic Project） ，ExamServer 表示是考試系統(tǒng)服務(wù)端程序。 比較好的命名方法，是使用一套標準、在整個開發(fā)過程中都遵循的命名方案。在這個對話框中選擇“ 標準 EXE”選項，然后點擊“確定” 按鈕，就創(chuàng)建了一個新的Visual Basic 工程。開發(fā)環(huán)境中是空的，沒有任何內(nèi)容。這個對話框用于簡化新建和打開工程的操作。計算機等級考試系統(tǒng)的設(shè)計和實現(xiàn)185 系統(tǒng)的實現(xiàn) 計算機等級考試系統(tǒng)應(yīng)用程序框架 服務(wù)端管理程序框架(1)創(chuàng)建工程首先選擇了“ 開始”→“程序”→“Microsoft Visual Basic 中文版”選項，進入 Visual Basic 的集成開發(fā)環(huán)境。在“用戶與組權(quán)限 ”對話框中，讀者可以為已經(jīng)建立的用戶和組設(shè)置權(quán)限了，這些權(quán)限包括：是否允許插入、刪除、修改、更新、讀取數(shù)據(jù)，是否允許管理數(shù)據(jù)庫等。在“用戶與組帳戶 ”對話框中，可以建立、刪除、管理用戶和組，并且可以更改用戶和登陸密碼。在出現(xiàn)的“設(shè)置數(shù)據(jù)庫密碼” 窗口中輸入密碼，然后在 “驗證”文本框中重復(fù)輸入一遍密碼，最有單擊“ 確定” 。然后關(guān)閉這個窗口，Access XP 會自動保存輸入的數(shù)據(jù)。在這個表中，創(chuàng)建的 3 個字段就列在表的第一行中，依次輸入需要的數(shù)據(jù)，如圖 所示。按照同樣的方法創(chuàng)建其它關(guān)系。這時 Access XP 中會出現(xiàn)“編輯關(guān)系”窗口。Access XP 會自動根據(jù)主鍵創(chuàng)建一些默認關(guān)系，這時可以用鼠標單擊每一條關(guān)系線，然后按鍵盤上的“Delete”鍵，Access XP 會詢問用法是否確定刪除，單擊是即可。這時會在“關(guān)系”窗口中看到所有已經(jīng)添加的表。計算機等級考試系統(tǒng)的設(shè)計和實現(xiàn)16圖 12　數(shù)據(jù)關(guān)系表選擇“表”選項卡，在其列表中選擇第一個表，然后單擊“添加”按鈕，重復(fù)執(zhí)行這個過程，直到所有的表都添加到“關(guān)系” 窗口中。創(chuàng)建關(guān)系的過程為：單擊工具欄上的關(guān)系按鈕，這時 Access XP 會出現(xiàn)編輯關(guān)系對話框。在設(shè)計的考試系統(tǒng)數(shù)據(jù)庫中，除了系統(tǒng)信息表(SysInfo)外，其它的各個表之間都是有聯(lián)系的，這些表之間就是靠關(guān)系來描述它們的聯(lián)系的，如 所示。在上面設(shè)計的數(shù)據(jù)庫的各個表中，每一個表都記錄了一個特定的內(nèi)容范圍，但是這些內(nèi)容之間也是有關(guān)聯(lián)的。6 個表創(chuàng)建完的界面如圖 所示。2022 級信息與計算科學(xué)專業(yè)畢業(yè)論文15單擊保存按鈕，在出現(xiàn)的“另存為” 對話框中，輸入表的名稱 “StudentInfo”，然后單擊“確定”。設(shè)置主鍵是用鼠標右鍵單擊字段列表中的 SID 行，在出現(xiàn)的菜單中選擇“主鍵” 選項。按同樣的方法，依次輸入所有的字段，并設(shè)置相關(guān)屬性。單擊“文本”右側(cè)的下拉按鈕，Access XP 彈出數(shù)據(jù)類型列表，可以從這個列表中選擇相應(yīng)的數(shù)據(jù)類型，對于這個字段也可以不選擇。這里只以創(chuàng)建考生信息表為例。在 Access 工作界面右側(cè)的任務(wù)窗格中直接單擊“空數(shù)據(jù)庫”項目，這時 Access XP 中會出現(xiàn)“文件新建數(shù)據(jù)庫”對話框，輸入數(shù)據(jù)庫文件的名稱，然后單擊“ 創(chuàng)建”按鈕。這兩個記錄標記就使用 QMarked 和 QFinished 表示。圖 10　考卷表結(jié)構(gòu)圖這個表沒有一個字段可以唯一確定一條記錄，所以也不需要設(shè)置主鍵。(6)考卷表(Paper)考卷表是在考生完成考試注冊后，記錄考生的考卷題目的表。另外，題庫表通過 QID 字段唯一確定考試題目，所以這個字段將作為題庫表的主計算機等級考試系統(tǒng)的設(shè)計和實現(xiàn)14鍵。在生成考生試卷時，如果該考生使用了這道題目，這個字段的值就會加 1。在題庫表中，應(yīng)該包括考試的題目編號、題目、標準答案、類型等信息，題庫表結(jié)構(gòu)如圖 所示。在設(shè)計這個表時，沒有設(shè)置主鍵。圖 7　考試注冊信息表結(jié)構(gòu)圖(4)系統(tǒng)信息表(SysInfo)系統(tǒng)信息表用于存放一些維持系統(tǒng)正常運行的所必須的數(shù)據(jù)，比如管理員密碼、當(dāng)前考試的人數(shù)等，系統(tǒng)信息表結(jié)構(gòu)如圖 所示。使用試卷編號可以確定考試的注冊信息，它的生成規(guī)則是：Exam_[準考證號碼]_[科目編號]_[考試日期]上面的斜體字的部分將在程序運行時，以實際的編號代替。當(dāng)考生成功地注冊了一個考試后，此值會自動設(shè)置 0；而當(dāng)考生完成考試時（不論是否通過考試） ，此值會置 1；此值為2 時說明考生進行這個科目的考試；如果考試沒有在考試日期指定的時間內(nèi)考試，此值為 4；在考試注冊信息表中，由于在進行注冊信息查詢時，很少會根據(jù)試卷編號（試卷2022 級信息與計算科學(xué)專業(yè)畢業(yè)論文13編號唯一確定時）查詢，所以它沒有設(shè)置主鍵。這里把考生準考證號碼作為主鍵。注