1、1高职院校成绩分析评价系统研究摘要：考试成绩分析是高职院校教学管理中一项重要的环节。虽然各高职院校都有自己的教务管理系统，但是该系统中的成绩管理子系统并不能满足教师分析评价成绩的实际需要。从教师分析评价成绩的实际需要出发，研究设计了一个方便实用的成绩分析评价工具，更好地实现，成绩分析评价的各大功能。所研究的成绩分析评价系统采用 Excel 软件平台+VBA 语言进行开发设计，包括数据准备、成绩分析和成绩评价三大模块，分别通过三个窗口来实现，各功能通过窗口上的各功能控件实现。通过研究，该系统顺利运行。该系统将成为教师分析评价成绩的实用小工具。 关键词：系统工程；成绩分析评价系统；正态分布；难度；
2、区分度 中图分类号： F49 文献标识码：A 文章编号：1672.3198（2013）03.0169.03 0 引言 高职院校培养的是高素质技能型专门人才，更偏重于学生技能的培养，考试形式也趋于多样化，除了传统的卷面考试外，有论文的形式，调查报告的形式，实际操作的形式等。但不管采用什么样的考试形式，考试依然是高职院校教育过程中的一个重要环节，每一门课程也都会产2生一个考试成绩。考试成绩一方面是衡量教学质量的一个重要因素，可以用来衡量教师的教学效果；另一方面也是衡量学生学习状况的重要工具，是学生评优、评奖学金的主要依据。每到学期末，老师就要忙于对学生考试成绩进行分析评价，虽然我院有教务管理系统，
3、但是该系统对成绩的分析是基于总评成绩，且没有对成绩的评价功能，教务部门则要求老师要对学生的期末考试成绩进行分析评价。所以每学期末教师进行成绩分析的工作量很大，且进行评价时随意性较大，缺乏客观的标准。因此我萌生出研究一个方便实用的成绩分析评价系统的想法，以减轻教师分析成绩的工作量，降低教师评价成绩的随意性。 1 相关概念研究 该系统分为成绩分析和成绩评价两个部分，采用定量分析的方法，从正态分布状况、难度、区分度三个方面进行评价。下面分别阐述本系统涉及的一些重要概念。 1.1 标准差 这是反映成绩差异情况的一个统计指标。 整个系统由三大模块组成：数据准备、成绩分析和成绩评价。 数据准备模块的功能是
4、在 Excel 中准备好成绩的原始数据。成绩的分析评价是针对某一个班级的某一门课程进行，因此在数据准备模块设置了课程名称录入和班级名称录入功能，为后面分析评价成绩时选择课程和班级做准备。在该模块中，系统能根据用户输入的课程名称和班级名称，自动生成课程成绩表，让用户完善原始的成绩信息。 成绩分析模块主要实现根据用户选择的课程和班级，对相应的成绩3进行分析，生成成绩分析表，自动计算得到各分析指标，给出按成绩排名的名次及生成相应的图表三大功能。 成绩评价模块主要实现根据用户选择的课程和班级进行正态分布、难度、区分度三个方面的评价。 2.4 操作界面设计 各操作界面设计如下图所示。 3 部分关键代码
5、3.1 成绩分析 3.1.1 生成成绩分析表关键代码 P = Application.WorksheetFunction.CountA（Range（“C1：C200“） ） - 1 h = Application.Max（C2：C200） l = Application.Min（C2：C200） a = Application.Average（C2：C200） a = Format（a， “0.00“） s = Application.StDevP（C2：C200） s = Format（s， “0.00“） Range（“H4：N4“）.Select ActiveCell.FormulaR1
6、C1 = “实考“ & P & “人，最高“ & h & “分，最低“ & l & “分，平均“ & a & “分，标准差“ & s & “分“ 这部分代码是通过设置变量，从而实现让系统根据选择的课程和班级给出相应的分析指标。 43.1.2 生成图表的关键代码 Range（“J8：J12“）.Select n = Application.WorksheetFunction.CountA（Range（“a1：a60000“） ） Selection.FormulaArray = “=FREQUENCY（R-6C-7：R200C-7，RC-4：R3C-4）“ Range（“J13“）.Select
7、 ActiveCell.FormulaR1C1 = “=SUM（R-5C：R-1C）“ Range（“K8“）.Select ActiveCell.FormulaR1C1 = “=RC-1/R13C10“ Range（“K8“）.Select Selection.NumberFormatLocal = “0.00%“ Selection.AutoFill Destination：=Range（“K8：K12“） ， Type：=xlFillDefault Range（“K8：K12“）.Select Range（“K13“）.Select ActiveCell.FormulaR1C1 = “=
8、SUM（R-5C：R-1C）“ 这部分程序是用来实现计算成绩分布表中各分数段人数和比率的。 Range（“J7：K12“）.Select Charts.Add ActiveChart.ApplyCustomType ChartType：=xlBuiltIn， TypeName：=“两轴线-柱图“ 5ActiveChart.SetSourceData Source：=Sheets（ComboBox3.Text & ComboBox1.Text & “课程成绩分析表“）.Range（“J7：K12“） _ PlotBy：=xlColumns ActiveChart.SeriesCollection
9、（1）.XValues = Array（“60 以下“， “60-69“， “70-79“， “80-89“， “90 以上“） ActiveChart.Location Where：=xlLocationAsObject， Name：=ComboBox3.Text & ComboBox1.Text & “课程成绩分析表“ 这部分程序是用来实现成绩分布图的自动生成的。成绩分布图的美化程序可以通过录制宏功能得到，由于这张工作表中只有这一张图，将通过录制宏功能得到的程序中的图的名称改为“1”就可以了。 3.2 成绩评价 3.2.1 正态分布评价的关键代码 Range（“D6：F6“）.Select
10、 Dim zRange As Range Set zRange = Worksheets（ComboBox4.Text & ComboBox2.Text & “课程成绩评价表“）.Range（“A2：A200“） ActiveCell.FormulaR1C1 = WorksheetFunction.Skew（zRange） Range（“H6：J6“）.Select ActiveCell.FormulaR1C1 = WorksheetFunction.Kurt（zRange） Range（“D6：F6，H6：J6“）.Select Selection.NumberFormatLocal = “
11、0.00_ “ 这部分程序用来实现自动计算出选定的课程成绩的偏度值和峰度值，6并将这两个值填写到评价表的相应位置中。然后系统根据用户所选择的课程成绩的偏度值和峰度值，及合理的偏度值、峰度值范围，从分布偏度和峰度两个角度给出相应的正态分布评价。 3.2.2 难度评价的关键代码 Range（“D17“）.Select Dim dRange As Range Set dRange = Worksheets（ComboBox4.Text & ComboBox2.Text & “课程成绩评价表“）.Range（“A2：A200“） d = 1 - WorksheetFunction.Average（dR
12、ange） / 100 ActiveCell.FormulaR1C1 = d Range（“D17“）.Select Selection.NumberFormatLocal = “0.00_ “ 上面这部分程序用来实现难度系数的计算，然后系统自动对比难度系数与难度系数临界值，实现难度的评价。 3.2.3 区分度评价的关键代码 Worksheets（ComboBox4.Text & ComboBox2.Text & “课程成绩评价表“）.Activate Columns（“A：A“）.Select Selection.Sort Key1：=Range（“A2“） ， Order1：=xlDesc
13、ending， Header：=xlGuess， _ OrderCustom：=1， MatchCase：=False， Orientation：=xlTopToBottom， _ 7SortMethod ：=xlPinYin， DataOption1：=xlSortNormal Range（“D24“）.Select n = Range（“a65536“）.End（xlUp）.Row N1 = n - 1 Q = WorksheetFunction.RoundDown（N1 * 0.27， 0） Q1 = Q + 1 Q2 = n - Q + 1 Dim fRange As Range Se
14、t fRange = Worksheets（ComboBox4.Text & ComboBox2.Text & “课程成绩评价表“）.Range（“A2：A“ & Q1） f = WorksheetFunction.Average（fRange） Dim bRange As Range Set bRange = Worksheets（ComboBox4.Text & ComboBox2.Text & “课程成绩评价表“）.Range（“A“ & Q2 & “：A“ & n） b = WorksheetFunction.Average（bRange） c = f / 100 - b / 100
15、ActiveCell.FormulaR1C1 = c Range（“D24“）.Select Selection.NumberFormatLocal = “0.00_ “ 上面这部分程序用来实现区分度指数的计算，然后系统自动对比区分度指数临界值，实现区分度评价。 4 应用和验证 8以会计 1003 班统计学基础课程的成绩分析评价为例。首先打开学生成绩分析评价系统，进入首页界面。然后点击数据准备按钮，打开数据准备窗口。在输入课程名称的文本框内，输入“统计学基础” ， 点击确定按钮。系统自动创建课程名称工作表，并将输入的课程名称保存在 A1单元格。在输入班级名称的文本框内，输入“会计 1003”，
16、 点击确定按钮。系统自动创建班级名称工作表，并将输入的班级名称保存在 A1 单元格。点击创建课程成绩表按钮，系统自动创建会计 1003 统计学基础课程成绩表工作表，第一行已自动输入“学号” 、 “姓名”和“成绩” 。光标自动定位于 A2 单元格。将该班该课程的相关信息完善后，打开成绩分析窗口，点击请选择课程后面的下拉小三角，选择“统计学基础” ，点击请选择班级后面的下拉小三角，选择“会计 1003”。点击生成绩分析表，系统自动生成会计 1003 统计学基础成绩分析表，并计算出相关分析指标。点击“按成绩排名” 按钮，系统在成绩分析工作表的 D 生成按成绩排名的名次。点击“生成图表”按钮，系统在成
17、绩分析表中自动生成成绩分析情况表和成绩分析情况图。所有分析工作完成后，最终可以得到图 9 所示结果。 打开成绩评价窗口，点击请选择课程后面的下拉小三角，选择“统计学基础” ，点击请选择班级后面的下拉小三角，选择“会计 1003”。点击正态分布评价按钮，系统自动生成成绩评价工作表及成绩评价表，将相应课程成绩复制到 A 列，并给出正态分布评价的相关指标数值及评价结论。点击难度评价按钮，系统自动计算难度系数，并给出难度评价。点击区分度评价按钮，系统自动计算区分度指数，并给出区分度评价。9所有评价工作完成后，最终可以得到图 10 所示结果。 5 总结与展望 虽然目前很多学者对成绩分析系统进行了研究，但
18、是涉及成绩评价环节的较少；符合高职院校成绩分析评价要求，能让高职院校的老师直接使用的就更少。就是高职院校本身的教务管理系统中的成绩管理子系统也不能完全满足老师分析评价成绩的实际需要。老师需要在系统中导出的成绩的基础上进行再次的处理，才能得到相关的分析指标。对于成绩评价，老师们基本上都是靠主观进行，缺乏科学合理的依据。经过测试，该系统可以顺利运行，可以自动生成实考人数、最低分、最高分、平均分、标准差等分析指标，生成成绩分布图表，并从正态分布、难度、区分度三个方面对成绩进行评价。但是，由于自己知识、资料、开发经验等限制，系统还不尽完善，仅能满足老师的基本需要，成绩评价部分只是对整份试卷的难度和区分度进行了评价，没有涉及到试题的评价，评价指标也较为简单。系统的许多功能还需要不断地完善和改进。下一步我将根据老师的使用情况，对系统加以改进，进一步与教务系统进行融合，使该系统真正成为老师得心应手的小工具。 参考文献 1盛骤.概率论与数理统计M.北京：高等教育出版社，2008. 2沈有乾.教育统计学M.福建：福建教育出版社，2007. 3郭熙汉，何穗，赵东方.教学评价与测量M.武汉：武汉大学出版社，2008. 4孙荣平.高校成绩分析信息系统的构建与实现D.哈尔滨：哈尔10滨工程大学，2006. 5韩小良.ExcelVBA 从入门到精通M.北京：中国铁道出版社，2006.
