用Excel設(shè)計(jì)標(biāo)準(zhǔn)化試卷的自動(dòng)判卷系統(tǒng)

1、計(jì) 算 機(jī) 與 現(xiàn) 代 化2012 年第 1 期總第 197 期jisuanji yu xiandaihua文章編號(hào): 1006-2475( 2012) 01-0199-04用設(shè)計(jì)標(biāo)準(zhǔn)化試卷的自動(dòng)判卷系統(tǒng)excel花，張偉娜李( 中國(guó)傳媒大學(xué)計(jì)算機(jī)與網(wǎng)絡(luò)中心，北京 100024)摘要: 在日常的教學(xué)過(guò)程中，各種測(cè)驗(yàn)、考試，必不可少，因而高效地進(jìn)行判卷對(duì)減輕教師的工作量有非常重要的意義。使用專業(yè)的無(wú)紙化考試系統(tǒng)，不僅投入多，且不一定適合自己的教學(xué)。本文根據(jù)通用的標(biāo)準(zhǔn)化試卷的判卷需求，利用 ex- cel 的數(shù)據(jù)處理、數(shù)據(jù)管理和數(shù)據(jù)安全功能，設(shè)計(jì)無(wú)紙化考試的標(biāo)準(zhǔn)化試卷模板，將 excel 作為開(kāi)發(fā)

2、平臺(tái)，用 vba 語(yǔ)言實(shí) 現(xiàn)標(biāo)準(zhǔn)化試卷的自動(dòng)判卷功能，從而提高判卷效率，減少教師的工作量。該系統(tǒng)操作簡(jiǎn)單、使用安全、高效，在教學(xué)中很 有實(shí)用價(jià)值。關(guān)鍵詞: excel;vba;標(biāo)準(zhǔn)化試卷; 自動(dòng)判卷文獻(xiàn)標(biāo)識(shí)碼: a中圖分類號(hào): tp317 1doi: 10 3969 / j issn 1006-2475 2012 01 053design of automatic grading system for standardized examination papers by excelli hua，zhang wei-na( computer and network center，communic

3、ation university of china，beijing 100024，china)abstract: in the daily teaching process，many kinds of tests and examinations are indispensable，so grading efficiently is impor-tant for reducing teachers workload professional paperless examination system not only needs invest more resources，but also no

4、t suits our own all teaching needs based on the need of general grading standardized paper and using excel features of data processing，data management and data security etc，this paper designs standardized paperless examination template and using excel as a development platform，automatic grading syst

5、em of standard examination paper is implemented by vba langue auto- matic grading system not only improves teacherswork efficiency，but also reduces the workload of teachers obviously as the system is simple，safe and efficient，there are important practical values in teaching applicationskey words: ex

6、cel; vba; standardized examination papers; automatic grading題為主，試卷一般由試題和答題兩個(gè)文件組成。在實(shí)際操作中，可將試卷打包發(fā)布，要求學(xué)生提交答題文 件，教師判卷后可以將答題文件反饋給學(xué)生。但由于 有些學(xué)生操作馬虎或不熟練，很容易出現(xiàn)答題時(shí)輸入 的答案不規(guī)范丟分或?qū)W生答題時(shí)破壞了卷面無(wú)法進(jìn) 行統(tǒng)計(jì)等問(wèn)題。因此，設(shè)計(jì)的自動(dòng)判卷系統(tǒng)不僅要使 得標(biāo)準(zhǔn)化試卷的制作既簡(jiǎn)單、又方便修改，還需要規(guī)引言0隨著網(wǎng)絡(luò)和計(jì)算機(jī)技術(shù)的發(fā)展，教學(xué)中使用無(wú)紙化的作業(yè)或試卷越來(lái)越普遍，但若沒(méi)有專業(yè)的判卷系 統(tǒng)，判卷工作量將非常大。excel 是功能非常強(qiáng)大的

7、電子表格軟件，它不僅提供了豐富的函數(shù)、強(qiáng)大的數(shù) 據(jù)管理功能，還支持 vba 語(yǔ)言開(kāi)發(fā)應(yīng)用程序，可以使 重復(fù)的工作自動(dòng)完成。本文設(shè)計(jì)的自動(dòng)判卷系統(tǒng)通 過(guò)將 excel 與 vba 結(jié)合起來(lái)，實(shí)現(xiàn)了無(wú)紙化考試中標(biāo) 準(zhǔn)化試卷的制作及自動(dòng)判卷功能，極大地提高了工作 效率。范學(xué)生的操作，杜絕學(xué)生因誤操作出現(xiàn)丟分的現(xiàn)象。用 excel 設(shè)計(jì)的自動(dòng)判卷系統(tǒng)需滿足如下要求:( 1) 保 護(hù) 答 題 卷 面，如 題 號(hào)、統(tǒng) 計(jì) 中 使 用 的 公 式等。( 2) 限制學(xué)生答題的位置并要求答題規(guī)范，例如 答案必須在相應(yīng)題號(hào)的“答案”一列中輸入，單選題答案須為字母 a、b、c、d 之一; 判斷題答案須為 t需求分析

8、標(biāo)準(zhǔn)化的試題題型大多以選擇題、判斷題和填空1收稿日期: 2011-09-28作者簡(jiǎn)介: 李花( 1972-) ，女( 朝鮮族) ，吉林龍井人，中國(guó)傳媒大學(xué)計(jì)算機(jī)與網(wǎng)絡(luò)中心講師，碩士，研究方向: 多媒體技術(shù); 張偉 娜( 1978-) ，女，山西運(yùn)城人，講師，碩士，研究方向: 計(jì)算機(jī)應(yīng)用。( 3) 在教師判卷時(shí)，需顯示正確與否，并統(tǒng)計(jì)答將顯示答案的正確與 否，如果答案正確顯示符號(hào) “”; 否則顯示符號(hào)“ ”。題結(jié)果。不僅統(tǒng)計(jì)出不同題型的錯(cuò)誤個(gè)數(shù)，還要根據(jù)不同題型的分?jǐn)?shù)，顯示出最終得分。( 4) 為了保證數(shù)據(jù)安全，標(biāo)準(zhǔn)答案要和答題卷分 開(kāi)存放。( 5) 完成批量判卷，對(duì)打開(kāi)的多個(gè)答題文件能夠完成批

9、量判卷。本文以 office 2007 為開(kāi)發(fā)平臺(tái)，設(shè)計(jì)標(biāo)準(zhǔn)化試 卷的判卷系統(tǒng)，包括試題、答題和標(biāo)準(zhǔn)答案的模板，以便每次使用時(shí)直接從模板生成新的試題、答題和標(biāo)準(zhǔn)答案文件。圖 2 答題卷模板創(chuàng)建不同題型數(shù)據(jù)表格后，通過(guò) excel 功能限制輸入答案的位置以及答案選項(xiàng)，并產(chǎn)生動(dòng)態(tài)邊框線。以“單選題”數(shù)據(jù)表格為例，一般每一種題型數(shù)量不超過(guò) 100 道題，則具體操作方法如下:( 1) 利用數(shù)據(jù)有效性規(guī)則，限制答案選項(xiàng)。選擇判卷系統(tǒng)的設(shè)計(jì)判卷系統(tǒng)需要設(shè)計(jì)試題、答題和標(biāo)準(zhǔn)答案 3 個(gè)模 板，其中關(guān)鍵是答題和標(biāo)準(zhǔn)答案模板的設(shè)計(jì)。2 1 試題模板的設(shè)計(jì)新建 word 文檔，保存為 word 模板，擴(kuò)展名為 d

10、otx。設(shè)計(jì)者可在 word 文檔中自行設(shè)置字體、段落、 編號(hào)等格式，并寫清試題類型以及答案書(shū)寫的要求。 根據(jù)設(shè)計(jì)的模板創(chuàng)建的試題文件，可以參考圖 1。2b3: b102 區(qū)域，在數(shù)據(jù)有效性設(shè)置的“有效性條件”中選擇“允許”選項(xiàng)為“序列”，“來(lái)源”中輸入“a，b，c，d”，并取消選擇“提供下拉箭頭”，此功能使得學(xué)生輸入答案時(shí)必須輸入 a、b、c、d 四個(gè)字母之一。( 2) 取消對(duì)“答案”一列的保護(hù)。選擇 b3: b102區(qū)域，在“設(shè)置單元格格式”對(duì)話框的“保護(hù)”標(biāo)簽中 取消“鎖定”，此功能使得當(dāng) sheet1 工作表被設(shè)置為 保護(hù)時(shí)，學(xué)生只能編輯“答案”一列。( 3) 利用條件格式，設(shè)置動(dòng)態(tài)邊

11、框線。選擇 a3:c102 數(shù)據(jù)表格區(qū)域，在“條件格式”的“新建規(guī)則”對(duì) 話框中選擇規(guī)則類型為“使用公式確定要設(shè)置格式的單元格”，在編輯框中輸入“ = $“”，并a3 設(shè)置“外邊框”格式。此“條件格式”的作用在于不管將來(lái)單選題題量如何增加或減少，只要輸入了單選題 題號(hào)，將會(huì)自動(dòng)生成表格線，只要?jiǎng)h除了題號(hào)，表格線將自動(dòng)被刪除。同樣的方式，在“判斷題”和“填空題”數(shù)據(jù)表格 中取消“答案”一列的保護(hù)并設(shè)置動(dòng)態(tài)邊框線，在“判 斷題”數(shù)據(jù)表格的“答案”一列中還需要使用數(shù)據(jù)有效性規(guī)則限制輸入項(xiàng)為 t 或 f 之一。在“統(tǒng)計(jì)表”數(shù)據(jù)表格內(nèi)，輸入公式統(tǒng)計(jì)不同題型的錯(cuò)誤個(gè)數(shù)以及得分。如統(tǒng)計(jì)“單選題錯(cuò)誤個(gè)數(shù)”時(shí)，

12、在 n2 單元格內(nèi)輸入公 式: “ = countif ( c: c，“ ”) ”，在統(tǒng)計(jì)“得分”時(shí)，在 n9 單元格內(nèi)輸入公式: “ = n8-n2*n3-n4* n5-n6* n7”。圖 1 試卷模板答題模板文件的設(shè)計(jì)新建 excel 文件，保存為 excel 模板，擴(kuò)展名為所有的表格創(chuàng)建完之后，保存模板文件。標(biāo)準(zhǔn)答案模板文件的設(shè)計(jì)創(chuàng)建 excel 文件，保存為啟用宏的模板文件，擴(kuò)2 22 3xltx。隱藏 sheet2 和 sheet3 工作表，只顯示 sheet1 工作表，并隱藏網(wǎng)格線。在 sheet1 工作表內(nèi)創(chuàng)建不同 試題類型的數(shù)據(jù)表格以及“成績(jī)統(tǒng)計(jì)表”表格，如圖 2所示。每一個(gè)試

13、題類型的數(shù)據(jù)表格由“題號(hào)”、“答展名為 xltm。選擇 sheet1 工作表，創(chuàng)建“單選題”、“判斷題”和“填空題”的數(shù)據(jù)表格，這些數(shù)據(jù)表格只包含“題號(hào)”和“答案”兩列，并利用“條件格式”設(shè)置 動(dòng)態(tài)邊框線。2012 年第 1 期李花等: 用 excel 設(shè)計(jì)標(biāo)準(zhǔn)化試卷的自動(dòng)判卷系統(tǒng)201為了進(jìn)行自動(dòng)判卷，在 sheet1 工作表內(nèi)插入“開(kāi)發(fā)工具”選項(xiàng)卡的 activex 控件中的命令按鈕，在“屬 性窗口”中設(shè)置 caption 屬性為“自動(dòng)判卷”，雙擊此 命令按鈕，在 click 事件代碼中輸入 vba 代碼完成自 動(dòng)批卷。這段代碼主要完成如下功能:( 1) 從已打開(kāi)的工作簿文件中，選取要判卷

14、的答題文件。( 2) 取消對(duì)答題文件中 sheet1 工作表的保護(hù)。( 3) 比較標(biāo)準(zhǔn)答案和答題文件中的答案，完成判 卷。單選題和判斷題的判卷很簡(jiǎn)單，因?yàn)檫@種題型只 有唯一的答案，但填空題的情況稍微復(fù)雜一些。因?yàn)橛行┨羁疹}有可能出現(xiàn)多個(gè)可能的答案。舉個(gè)例子 來(lái)說(shuō)，計(jì)算機(jī)信息技術(shù)基礎(chǔ)中有這樣一道填空題，dim fileopencount，i as integerfileopencount = workbooks countinputbox ( 請(qǐng)輸入解除工作表保護(hù) sheetpassword =密碼! )for i = 1 to fileopencountworkbooks( i) activa

15、tefilename = activeworkbook nameif ( ( filename 標(biāo)準(zhǔn)答案 xlsm)and ( filename personal xlsb) ) then和個(gè)人宏工作簿文件判卷時(shí)排除標(biāo)準(zhǔn)答案文件msgbox ( 對(duì)文件進(jìn)行批 改?，vbokcancel，yesorno =filename)if ( yesorno = vbok) thenapplication screenupdating = falsesheets( sheet1) protect password: = sheetpassword，con-“一個(gè)完整的計(jì)算機(jī)系統(tǒng)由() 和() 組成?！边@t

16、ents: = false解除工作表保護(hù)一道題兩個(gè)填空的答案是“硬件系統(tǒng)”和“軟件系統(tǒng)”，也可以是“軟件系統(tǒng)”和“硬件系統(tǒng)”，也就是說(shuō) 兩個(gè)填空題的答案是并列的、無(wú)關(guān)順序的。若有這樣的題，在標(biāo)準(zhǔn)答案文件中輸入答案時(shí)要求答案項(xiàng)和答案項(xiàng)之間必須用頓號(hào)隔開(kāi)。若此題的題號(hào)為 1，則相 應(yīng)的兩個(gè)填空的題號(hào)可以給出 1 _1 和 1 _2，對(duì)應(yīng)的第 一個(gè)答案位置上輸入“硬件系統(tǒng)、軟件系統(tǒng)”，而在第二個(gè)答案位置上可以為空，表示答案來(lái)自于前一個(gè)非 空的單元格，也可以輸入相同的答案“硬件系統(tǒng)、軟 件系統(tǒng)”。根據(jù)此模板產(chǎn)生的標(biāo)準(zhǔn)答案文件，如圖 3 所示。 ( 此處省略選擇題和判斷題判卷代碼)tempx = 3 o

17、ptionanswer = while ( not isempty( sheets ( sheet1) cells ( tempx，9 ) value) )判斷填空題題號(hào)是否為空f(shuō)illanswer = sheets( sheet1) cells( tempx，10) value取得相應(yīng)題號(hào)的答案windows( 標(biāo)準(zhǔn)答案 xlsm) activatefillrightanswer = sheets ( sheet1) cells ( tempx，8 ) value取得相應(yīng)題號(hào)的正確答案rightorwrong = 判卷結(jié)果startpoint = 1if ( fillrightanswer

18、= ) then fillrightanswer = optionanswer end ifendpoint = instr( startpoint，fillrightanswer，、)if ( endpoint = 0) thenif ( fillanswer = fillrightanswer) thenrightorwrongelse= rightorwrong = end ifelseif ( replace( optionanswer，、，1) = ) then optionanswer = fillrightanswerelsefillrightanswer = optionans

19、werend ifrightanswerlen = len( fillrightanswer)doendpoint = instr( startpoint，fillrightanswer，、)if ( endpoint = 0) then endpoint = rightanswerlenmidrightanswer = mid ( fillrightanswer，startpoint，end-圖 3 標(biāo)準(zhǔn)答案相應(yīng)地，自動(dòng)判卷的具體代碼如下:private sub commandbutton1_click( ) dim filename，sheetpassword as string dim

20、tempx as integerdim singleanswer as stringdim trueorfalseanswer as stringdim fillanswer，fillrightanswer，midrightanswer，rightor-wrong，optionanswer as string變量dim startpoint，endpoint，rightanswerlen as integer填空題判卷有關(guān)的整型變量dim yesorno as string和填空題判卷有關(guān)的字符串和else收卷保存。教師打開(kāi)標(biāo)準(zhǔn)答案文件，并將學(xué)生答題文= mid ( fillrightansw

21、er，startpoint，end-midrightanswerpoint - startpoint)end if件依次打開(kāi)。單擊標(biāo)準(zhǔn)答案文件的“自動(dòng)判卷”按鈕，輸入解除工作表密碼，就可以選擇答題文件完成 判卷，判卷結(jié)果如圖 4 所示。if ( fillanswer= midrightanswer) thenrightorwrong = optionanswer = replace ( fillrightanswer， midrightan- swer，)exit doelsestartpoint = endpoint + 1end ifloop until ( startpoint righ

22、tanswerlen)圖 4 判卷結(jié)果excel 判卷系統(tǒng)的優(yōu)點(diǎn)本文設(shè)計(jì)的 excel 自動(dòng)判卷系統(tǒng)雖然沒(méi)有其他 專業(yè)考試系統(tǒng)的隨機(jī)抽題、發(fā)布、收卷等功能，但優(yōu)點(diǎn) 也很突出。( 1) 經(jīng)濟(jì)實(shí)用。只需要 office 軟件和網(wǎng)絡(luò)平臺(tái)就可以實(shí)現(xiàn)，不需 要投入資金另外購(gòu)買軟件和售后服務(wù)，也不需要維護(hù)費(fèi)、服務(wù)費(fèi)等。( 2) 制作速度快，修改方便。根據(jù)自動(dòng)判卷系統(tǒng)模板生成試題、答題、標(biāo)準(zhǔn)答 案文件既簡(jiǎn)單又快速，并且可以根據(jù)不同的教學(xué)需求 方便、直觀地進(jìn)行修改。比如選擇題既有一分題也有 兩分題時(shí)，重新設(shè)計(jì)答題模板的“統(tǒng)計(jì)表”即可。( 3) 安全性高。本系統(tǒng)中將標(biāo)準(zhǔn)答案和答題卷分開(kāi)保存，而且在 答題文件中使

23、用數(shù)據(jù)有效性規(guī)則、單元格和工作表保護(hù)等設(shè)置避免出現(xiàn)學(xué)生的誤操作。( 4) 判卷速度快，成績(jī)反饋也方便。一份答題文件從打開(kāi)到判卷結(jié)束統(tǒng)計(jì)出結(jié)果，不 過(guò)短短幾秒，效率非常高。答題文件可以完整地保存 下來(lái)，以便學(xué)生查閱。4if ( startpoint rightanswerlen)thenrightorwrongend ifend if= windows( filename) activatesheets ( sheet1) cells ( tempx，11 ) value wrongtempx = tempx + 1wendwindows( filename) activate=rightor-

24、application screenupdatingend if end if next i end sub= true上述代碼在 excel 2007 環(huán)境下運(yùn)行通過(guò)。3 判卷系統(tǒng)的應(yīng)用3 1生成試卷根據(jù)試題模板和答題模板、標(biāo)準(zhǔn)答案模板生成新文件，其中根據(jù)標(biāo)準(zhǔn)答案模板產(chǎn)生的文件命名為“標(biāo)準(zhǔn)答案 xlsm”( 保存為啟用宏的工作簿文件，文件名 和源代碼有關(guān)) 。在試題文檔中輸入試題內(nèi)容，在標(biāo) 準(zhǔn)答案文件中輸入相應(yīng)的題號(hào)和每題答案，在答題文件中輸入題號(hào)和每一種題型的每道題分?jǐn)?shù)，也可將標(biāo)準(zhǔn)答案中的題號(hào)復(fù)制、選擇性粘貼到答題文件的題號(hào) 一列。答題文件中的 sheet1 工作表還需要設(shè)置保護(hù) 并輸入密

25、碼。結(jié)束語(yǔ)筆者設(shè)計(jì)的 excel 自動(dòng)判卷系統(tǒng)，在實(shí)踐中得到 了很好的驗(yàn)證。因制作簡(jiǎn)單、修改方便、效率高，得到 了很多教師的認(rèn)可。目前，在學(xué)校或企事業(yè)單位中 office 軟件非常普及，網(wǎng)絡(luò)平臺(tái)的應(yīng)用也很普遍。若 不考慮隨機(jī)抽題、組卷、在線控制等因素，自動(dòng)判卷系 統(tǒng)可輕松完成教學(xué)中的作業(yè)、考試、競(jìng)賽等任務(wù)，也可 以方便地應(yīng)用在企事業(yè)單位的客服測(cè)評(píng)、問(wèn)卷調(diào)查等5發(fā)布和判卷打包試題文件和答題文件，通過(guò)網(wǎng)絡(luò)平臺(tái)發(fā)布。 要求學(xué)生在答題文件中輸入答案，并將文件名更名為 自己的學(xué)號(hào)_專業(yè) xlsx 提交。這個(gè)過(guò)程并不難實(shí)現(xiàn)， 編寫一個(gè)批處理文件，可把打包文件發(fā)布到每臺(tái)機(jī)子 上，為了避免出現(xiàn)答題文件被復(fù)制等

26、現(xiàn)象，可斷開(kāi)網(wǎng)3 2工作中。使用 excel 自動(dòng)判卷系統(tǒng)非常經(jīng)濟(jì)、有效，因此該系統(tǒng)具有很好的推廣價(jià)值。( 下轉(zhuǎn)第 206 頁(yè))計(jì)算機(jī)與 現(xiàn) 代 化2012 年第 1 期2062李海昌 網(wǎng)絡(luò)電視的現(xiàn)狀和前景eb / ol http: / / wwwdoc88 com / p-99694682960 html，2010-11-29劉學(xué)峰，陳晨 網(wǎng)絡(luò)電視: 跨界發(fā)展的挑戰(zhàn)j 網(wǎng)絡(luò)傳 播，2011( 1) : 38-40朱陳潔，葉德建 面向嵌入式機(jī)頂盒終端的 p2p 網(wǎng)絡(luò)電34視直播系統(tǒng)的設(shè)計(jì)與實(shí)現(xiàn)j 中國(guó)圖象圖形學(xué)報(bào)，2007，12( 10) : 1706-1709華清遠(yuǎn)見(jiàn)嵌入式培訓(xùn)中心 嵌入式

27、linux 應(yīng)用程序開(kāi)發(fā) 標(biāo)準(zhǔn)教程( 第 2 版) m 北京: 人民郵電出版社，2009 韋東山 嵌入式 linux 應(yīng)用開(kāi)發(fā)完全手冊(cè)m 北京: 人 民郵電出版社，2008shdx / zs / cz / jg /002 / a /2008，機(jī)頂盒與 iptv 業(yè)務(wù)運(yùn) 營(yíng)平臺(tái)接口技術(shù)規(guī)范 v2 2schristopher hallinan embedded linux primer: a practicalreal-world approachm prentice hall，2006webkit the webkit open source projecteb / ol http: / /ww

28、w webkit org / ，2011-02-0656圖 4 運(yùn)行效果圖用戶在此頁(yè)面上可以進(jìn)行一些操作。結(jié)束語(yǔ)本文詳細(xì)分析了 iptv 方面的相關(guān)知識(shí)，對(duì)其中7389的一個(gè)功能如 epg 所使用的重要技術(shù) webkit 進(jìn)行了闡述和分析，并對(duì) webkit 引擎作了一些改進(jìn)，且成 功地將 其 移 植 到 arm11 上。 實(shí) 驗(yàn) 結(jié) 果 顯 示 基 于 webkit 的嵌入式瀏覽器是非常優(yōu)越的，并且其為開(kāi) 源代碼，可移植性和兼容性也相當(dāng)不錯(cuò)，因此通過(guò)改 進(jìn)的嵌入式瀏覽器有著廣泛的應(yīng)用前景。以后相當(dāng) 長(zhǎng)的一段時(shí)間，筆者將進(jìn)一步研究基于 webkit 的嵌 入式 linux iptv 機(jī)頂盒瀏覽

29、器，并進(jìn)行實(shí)驗(yàn)驗(yàn)證，將 其盡早轉(zhuǎn)化為用戶滿意的產(chǎn)品。10 趙經(jīng)緯，周余，王自強(qiáng)，等 基于 webkit 的嵌入式瀏覽器的研 究 與 實(shí) 現(xiàn)j 電 子 測(cè) 量 技 術(shù)，2009，34 ( 3 ) :135-13811 侯 炯 webkit 分 析 報(bào) 告r 中興通訊股份有限公 司，200812 侯炯 webkit 分析報(bào)告 r 中興通訊股份有限公 司，200913 姜江 webkit-webkit for androideb / ol http: / / www jjos org / android /2010 /05 /10 /312 _ webkit-webkit-for-an- droid html，