【正文】
單元格發(fā)生改變的時(shí)候會(huì)發(fā)生 RowColChange 事件,所以我們把備選答案的顯示放在該事件里做,代碼如下: Private Sub MSHFlexGrid1_RowColChange() Call InitSubjectAnswer End Sub Private Sub InitSubjectAnswer() If 1 Then = = select * from 題目明細(xì) where 題目編號(hào) =39。 5. 4 題庫(kù)內(nèi)容維護(hù)和備選答案維護(hù) 在前面的設(shè)計(jì)的時(shí)候我們已經(jīng) 知道餓了題庫(kù)內(nèi)容和備選答案正好是主表和子表的關(guān)系,所以有必要把這幾個(gè)模塊一起處理的。這里的代碼實(shí)現(xiàn)如下: 其中確定按鈕的代碼如下: Private Sub Command1_Click() Dim rst As Recordset On Error GoTo Proc_Exit If Len(Text1) 0 Then Set rst = New Recordset select * from 套號(hào) , pCN, adOpenStatic, adLockBatchOptimistic rst![套號(hào)名稱 ] = Text1 Text1 = End If Proc_Exit: If 0 Then If = 2147467259 Then MsgBox 套號(hào)名稱不能重復(fù) !, vbInformation Else MsgBox 發(fā)生意外錯(cuò)誤 ,錯(cuò)誤號(hào) : amp。 5. 2 VB 中的錯(cuò)誤處理 系統(tǒng)運(yùn)行難免有錯(cuò)誤,比如說系統(tǒng)的可使用內(nèi)容不夠了,即使我們的代碼沒有錯(cuò)誤,也將不能運(yùn)行,但是如果不能運(yùn)行就非法退出的話,我想對(duì)于客戶是不能接受的,至少也該來個(gè)系統(tǒng)內(nèi)存不足的提示,給客戶一些好的建議,我想客戶肯定會(huì)非常滿意的。在經(jīng)過了前面的鋪墊工作以后,這里實(shí)現(xiàn)起來思路就相對(duì)來說非常的清晰了。表的結(jié)構(gòu)如下: 字段名稱 字段類型 備注 ID 自動(dòng)編號(hào) 主關(guān)鍵字 題目編號(hào) 字符 題目編碼 字符 A,B,C,D 等等 備選答案 字符 備選答案的內(nèi)容 題目備注 字符 4. 3 套號(hào) 存儲(chǔ)套號(hào)的信息,自動(dòng)抽取的時(shí)候,就是從這個(gè)表里的 ID 來隨機(jī)抽取的,而題目主表里的套號(hào)也是來自該表的 ID,表結(jié)構(gòu)如下 : 字段名稱 字段類型 備注 ID 自動(dòng)編號(hào) 主關(guān)鍵字 套號(hào)名稱 字符 唯一索引 4. 4 題庫(kù)設(shè)置 在前面的功能設(shè)計(jì)中,我們知道本系統(tǒng)有兩種 抽題的模式,而系統(tǒng)采取的模式就是存在這張表中的。 ③ 考試答案保存 自動(dòng)保存考生做過的答案 ④ 顯示當(dāng)前的考生答題的位置,也就是做到哪一 道了,總共有多少題。 6 、 備選答案瀏覽 通過選擇題目來瀏覽它對(duì)應(yīng)的備選答案。 3. 1. 4 題庫(kù)內(nèi)容維護(hù) 對(duì)于一道選擇題來說,是分為題目描述和備選答案兩個(gè)部分的,這里的題庫(kù)內(nèi)容維護(hù),只的就是題目描述的維護(hù),當(dāng)然也包括題目的正確答案輸入和分值的輸入。 3 、 我精通 C++,但我發(fā)現(xiàn)要用它做許多復(fù)雜的報(bào)表是一件令人頭疼的事。它可以讓你像堆積木一樣建立一個(gè)功能強(qiáng)大的程序,而 無須寫大量的代碼。你可以在查詢中選擇、更新、插入或刪除資料,也可以用查詢來建立新表。 Access還提供 windows操作系統(tǒng)的高級(jí)應(yīng)用程序開發(fā)系統(tǒng)。網(wǎng)絡(luò)型的數(shù)據(jù)庫(kù)一般情況下使面向企業(yè)級(jí)的用戶,數(shù)據(jù)存儲(chǔ)比較的穩(wěn)定,而且安全,數(shù)據(jù)存儲(chǔ)的容量也非常的巨大。 Visual BASIC 改變了程序的機(jī)制,它沒有傳統(tǒng)意義上的主程序,而由 “ 事件 ” 來驅(qū)動(dòng)子程序的運(yùn)行。而這兩個(gè)公司的最有名的 RAD(快速開發(fā)工具 )為 Visual Basic 和Delphi。 3 、 考生考試模塊 該模塊是提供給考生考試使用的,包括答題和交卷等等功能。所謂考生考試數(shù)據(jù)集中管理是只一個(gè)考場(chǎng)里的考生數(shù)據(jù)最好是存放在一個(gè)地方,而不是存放于各自的考生計(jì)算機(jī)上。所以一定要防止學(xué)生進(jìn)行這種操作,即使是操作了,也該有相應(yīng)的錯(cuò)誤提示。這更加堅(jiān)定了我做這么個(gè)考試系統(tǒng)的決心。那么通過 inter 網(wǎng)進(jìn)行網(wǎng)絡(luò)考試如何呢?答案是可能的。所以現(xiàn)在全國(guó)比較流行的是使用無紙化考試系統(tǒng),每回考試只要使用軟盤等等存儲(chǔ)介質(zhì)帶題庫(kù)下來,在計(jì)算機(jī)上安裝一個(gè)考試客戶端(甚至有些就直接使用 windows 內(nèi)置的瀏覽器就可以了) ,就可以考試了。從最初的考試的時(shí)候,人工印刷試卷,到發(fā)考卷,然后收卷,然后改卷,然后發(fā)布成績(jī),整個(gè)流程相對(duì)的比較的復(fù)雜,而且涉及的人員較多,不容易協(xié)調(diào)。而現(xiàn)在傳統(tǒng)的考試模式已經(jīng)跟不上現(xiàn)在的發(fā)展,所以在這次畢業(yè)設(shè)計(jì)中,我準(zhǔn)備做一個(gè)考試系統(tǒng)。未來的科技發(fā)展還將產(chǎn)生新的重大飛躍。 本文 詳細(xì)闡述了系統(tǒng)分析、系統(tǒng)設(shè)計(jì)的方法及其內(nèi)容,對(duì)如何使用 VB 開發(fā)本系統(tǒng)作了較為詳細(xì)的介紹 。s name of teacher carries on the logging, having the different operation legal power. 【關(guān)鍵詞】計(jì)算機(jī)考試系統(tǒng) 系統(tǒng)功能 【 Keywords】 The puter examination system system function 目 錄 摘要 關(guān)鍵詞 前言 第一章 系統(tǒng)調(diào)查 3 第二章 系統(tǒng)分析 4 第三章 功能設(shè)計(jì) 9 第四章 數(shù)據(jù)庫(kù)設(shè)計(jì) 12 第五章 系統(tǒng)實(shí)現(xiàn) 15 第六章 總結(jié) 35 第七章 參考文獻(xiàn) 35 前 言 “ 科學(xué)技術(shù)是第一生產(chǎn)力 ” ,是鄧小平 同志 堅(jiān)持和發(fā)展馬克思 主義 關(guān)于生產(chǎn)力的理論,于 1988 年提出的精辟論斷。也沒有非常系統(tǒng)的使用過學(xué)習(xí)到的知識(shí),可以這么說我們的水平可能還沒有轉(zhuǎn)化為生產(chǎn)力。還是具有一定的使用價(jià)值的。根據(jù)計(jì)算機(jī)的特點(diǎn),我們?cè)擃愒囶}正好可以使用計(jì)算機(jī)進(jìn)行處理,于是在一套試題里,客觀題和主觀題同時(shí)存在的情況下,出現(xiàn)了另外一種考試的方法。而且一般情況下,該類考試系統(tǒng)都是使用隨機(jī)組卷,電腦隨機(jī)抽卷的,保證了公正性,即使是監(jiān)考老師也無法干預(yù)電腦的隨機(jī)抽卷。但是這種考試也有一些本身的問題,第一、客戶端是通過 inter 訪問服務(wù)器的,網(wǎng)絡(luò)速度和穩(wěn)定性方面就是個(gè)考驗(yàn)。所以操作界面一定要簡(jiǎn)單,操作方法也一定要簡(jiǎn)單。這表現(xiàn)在考試數(shù)據(jù)不容易丟失,不會(huì)出現(xiàn)一些寫入錯(cuò)誤等等?,F(xiàn)在考試系統(tǒng)的發(fā)展就是向網(wǎng)絡(luò)化發(fā)展,從最初的單機(jī),到局域網(wǎng),到 inter 網(wǎng)。 6 、 學(xué)生成績(jī)和分析模塊 對(duì)考生的成績(jī)進(jìn)行統(tǒng)計(jì)分析 ,比如及格人數(shù)是多少,通過率有多少等等。而用 Visual BASIC開發(fā)應(yīng)用程序,包括兩部分工作:一是設(shè)計(jì)用戶界面,二是編寫程序代碼。 總之, Visual BASIC是面向?qū)ο蟮摹⒔Y(jié)構(gòu)化的計(jì)算機(jī)語(yǔ)言。為了減少成本,而且對(duì)于一個(gè)考場(chǎng)的考生來說使用 Access 數(shù)據(jù)庫(kù)已經(jīng)足夠,而且減低了整個(gè)系統(tǒng)的造價(jià)。 表 用戶定義的存儲(chǔ)資料的對(duì)象。窗體通過運(yùn)行宏( macro)或 Visual Basic for Applicatinns( VBA)過程,來響應(yīng)大量的事件。模塊能直接響應(yīng)窗體或報(bào)表事件,也可以從應(yīng)用程序的任何地方被調(diào)用。 從上面的 VB和 Access的介紹后,我們知道如果使用這兩種軟件來開發(fā)是個(gè)比較不錯(cuò)的選擇,所以決定使用這兩個(gè)軟件進(jìn)行本次的開發(fā)和設(shè)計(jì)。 3 、 題目?jī)?nèi)容刪除 當(dāng)題目錄入錯(cuò)誤的時(shí)候,或者是該題目不再使用的時(shí)候,就使用該功能,但是當(dāng)該題目?jī)?nèi) 容下面已有備選答案設(shè)置的時(shí)候,本系統(tǒng)將不允許刪除該題目?jī)?nèi)容的 . 4 、 題庫(kù)內(nèi)容瀏覽 當(dāng)題目編輯完畢的時(shí)候 ,可以使用該功能對(duì)所有的題目進(jìn)行瀏覽。如果選擇了使用一套試題的模式,則從題庫(kù)里選擇一套。 2 、考生答題瀏覽 瀏覽該考生抽取的試題的具體內(nèi)容 3 、 考生成績(jī)?yōu)g覽 瀏覽該考生的每道題的對(duì)錯(cuò),還有得分情況。該表結(jié)構(gòu)如下 : 字段名稱 字段類型 備注 ID 自動(dòng)編號(hào) 主關(guān)鍵字 準(zhǔn)考證號(hào) 字符 唯一索引 考生姓名 字符 考試套號(hào) 數(shù)字 考生狀態(tài) 字符 未交卷、 已交卷 4. 6 考生答案 為了能夠了解考生的具體答題信息,并且在考生意外退出后能夠重新加載考生的信息,我們需要記錄該考生的答案。 ADO 設(shè)計(jì)為一種極為簡(jiǎn)單的格式,通過 ODBC 的方法同數(shù)據(jù)庫(kù)接口。 VB 的錯(cuò)誤代碼處理非常的簡(jiǎn)單,簡(jiǎn)單的來說,就是遇見錯(cuò)誤,忽略。 , vbInformation End If End If End Sub 在本段代碼里,我就運(yùn)用了錯(cuò)誤處理的代碼。 我們來了解一下這里的代碼實(shí)現(xiàn)了,為了充分發(fā)揮 VB 的 RAD 開發(fā)工具的優(yōu)勢(shì),我們這里采取了數(shù)據(jù)綁定來顯示數(shù)據(jù)和更新數(shù)據(jù),整個(gè)代碼就顯的非常的簡(jiǎn)單了: 首先我們?cè)诖绑w加載的時(shí)候,我們要加載界面的顯示內(nèi)容,我們可以在 Form 的 Load事件里進(jìn)行這 些初始化工作的。 39。 , vbInformation End If End If End Sub 備選答案的界面如下: 由于代碼類似,我這里就不在介紹了。If MsgBox(該考生已經(jīng)考過了 ,你要重新開始做嗎 ?, vbQuestion + vbYesNo) = vbNo Then GoTo Proc_Exit If rst![考生狀態(tài) ] = 已交卷 Then MsgBox 該考生已經(jīng)交卷了,將不能再次進(jìn)入考試 !, vbInformation Unload Me GoTo Proc_Exit End If 39。 pintSetNumber 39。 amp。 amp。 Set = For i = 1 To 1 sinSum = sinSum + Val((i, 1)) Next i 總得分 : amp。 第六章 總結(jié) 本次畢業(yè)設(shè)計(jì),雖然設(shè)計(jì)的東西相對(duì)的簡(jiǎn)單,而且由于時(shí)間和技術(shù)實(shí)現(xiàn)上面的原因很多的想法都沒有實(shí)現(xiàn),感覺非常的遺憾。 out of breath, the thumping of his own heart the only39。 but his stomach revolted at the thought of the raw flesh, and he did not know how he might build a fire, although Ignacio seemed to have done so the night before. Raw fish, even if he were able to c atch a fish, would be as bad, or worse, than raw monkey。t think I said anything. He tested the dark water with his foot and found that it was very cold. You gave a little gasp, I fancy. I heard it, and I said to myself, that39。t want to be looked at, doesn3