在Excel中基于VBA的高校体育成绩登陆系统的研究与设计

2023-03-02

目前, 全国普通高校大学生体育成绩的计算大多仍然采用50米、立定跳远和800米 (男生为1000米) 三项对比标准的素质评分方法, 而且多以手工操作的形式进行成绩的计算、统计;经过诸多调查, 这样的手工操作普遍存在因为工作量大、数字繁杂而出错的现象, 导致很多成绩管理方面教学事故的发生, 为此, 本文根据体育成绩具体计算方法, 设计体育成绩计算机登陆系统, 有效减轻了教师的工作强度, 在最大程度上避免了错误的发生。

1 设计思路

体育成绩的自动生成, 主要是将以往的人工查分过程转化为由计算机来自动完成, 因此仍需要将体育成绩查分表存储到电脑文件中, 作为成绩生成的标准。总体思路如下。

(1) 在Excel中建立一个模板文档, 名为“体育成绩自动计分表.xlt”。

(2) 在该EXCEL模板文档中, 用2个工作表来分别存放男生和女生的体育测试成绩的评分表, 两个工作表分别命名为“男生评分标准”和“女生评分标准”, 以供程序自动查询;并将此二个工作表隐藏起来。

(3) 在另外的工作表中输入学生实际测试的成绩, 然后通过VBA编写一个宏, 只要教师运行这个宏, 就可以完成实没成绩到分数的转换。

(4) 教师把上面建立的EXCEL模板复制到自己的电脑上, 根据这个模板来建立Excel工作簿, 然后在工作簿中输入初始数据, 就可以直接调用模板中的宏来完成分数的自动生成。

2 实现

(1) 在EXCEL中, 新建一模板文件, 保存为“体育成绩自动计分表.XLT”。

(2) 在模板文件中输入男女生评分标准, 各占一个工作表。图1所示为男生评分标准, 要求必须按得分的升序或降序排列, 以便后面程序自动查分。女生评分标准数据的排列类似于图1。确认评分标准数据输入无误后, 将“男生评分标准”和“女生评分标准”两个工作表隐藏, 以防教师在操作中误改了评分标准中的数据。

(3) 在模板文档中另取一工作表, 按图2的方式输入表头, 教师根据此模板建立的成绩表, 格式都与图2所示的一致。

(4) 在EXCEL中, 通过菜单“工具->宏->Visual Basic编辑器”进入VBA工作环境, 在VBA工作环境中创建一名为frmOptions的表单, 如图3所示。其功能是在自动生成成绩的时候, 指定成绩表的起始和结束行数。

然后为表单添加初始化代码和“计算”以及“结束”按钮的单击事件代码。

表单的初始化代码的功能是将除“男生评分标准”和“女生评分标准”两个工作表之外的其它工作表添加到班级集合中, 以便教师在自动生成成绩的时候可以图3所示的选项设置中选择班级。代码如下:

单击“计算”按钮要完成如下功能:从“男生评分标准”和“女生评分标准”表中读取参考标准的数据到相应的数组中, 然后根据教师在如图3所示的窗体中设置的起始和结束行号根据性别生成每个学生三项测试成绩的分数和三项的总分, 并填入工作表“体育成绩表”中相应的单元格内。代码如下:

计算学生每项测试结果对应的分数都有相应的自定义函数, 它们的计算过程相类似:根据某一项的测试成绩, 在相应的评分标准中去查找其对应的分值。下面是计算男生50米分数的自定义函数的代码:

通过EXCEL的菜单“工具->宏->宏”, 创建一个名为“计算成绩”的宏, 并为其指定代码如下:

至此, 模板建立完毕。

3 应用

将上面建立的模板复制到教师的电脑上, 前提要求教师机上安装有EXCEL软件。教师双击打开模板文件“体育成绩自动计分表.XLT”, 通过自定义工具栏和菜单栏, 建立如图4所示的菜单与项目栏按钮, 并将前面建立的名为“计算成绩”的宏同时指定给菜单和工具栏按钮, 然后保存文件, 保存文件类型先择“模板 (*.xlt) ”, 则该模板会自动保存到Microsoft Office的模板文件夹“Template”文件夹下 (图4) 。

以后教师用户只需要在自己电脑上的Excel中根据上面的模板建立文档, 导入学生信息和输入测试成绩后, 就可以通过自定义的菜单或工具栏自动完成成绩的生成;如果评分标准发生了更改, 只需要修改评分标准就可以了。

摘要：根据高校大学生体育成绩具体计算程序, 设计一种在Excel中基于VBA的计算机登陆系统, 实现了体育成绩计算、管理的方便、快捷、准确。

关键词：体育成绩,EXCEL,模板,VBA