学生成绩录入系统中自动填表功能的设计与实现

庄严

摘 要： 本文阐述应用Visual basic6.0、 ACCESS（数据库）、 SQL（查询语言）等技术开发学生成绩管理系统的过程，包括用户管理、信息录入、查询、添加及删除等功能，主要在使用Word对象后，直接对Word文档中的表格进行读取及修改，使系统更方便地输入输出数据，操作更简单容易。

关键词：学生成绩管理 学生成绩查询 自动填表功能

1.概述

新世纪以高科技为核心，知识经济将占主导地位，国家的综合国力和国际竞争力将越来越取决于科学技术创新水平。教育作为知识创新、传播和应用的基础，培养和输送人才的摇篮，已经成为经济发展和社会进步的基础。本系统在VB的基础上与Word对象相结合，在传统输入输出的基础上加入直接从Word文档读取的功能，使系统不再单一化，更方便快捷地对学生成绩进行管理。如果本系统被学校所采用，则将改变以前靠手工管理学生成绩的状况，塑造良好的办学形象，提高工作效率。

2.系统目标

根据现有的软硬件及科学的管理系统开发方案，建立学生成绩管理系统，实现对学生成绩管理的自动化。这要求系统操作直观、方便、实用、安全，提供详细的学生成绩信息；能够随时查阅在籍学生的成绩。因此，本系统应用VB设计主窗体，可以添加用户，读取、修改和查询数据库内容，并在VB中应用Word对象与SQL 语句从系统中直接读取Word文档中的相应内容，并存入由ACCESS创建的数据库中，从而实现对学生成绩的管理，利用本系统也可生成相应的Word文档。

3.问题识别

（1）功能需求

输入功能：可以输入学生的成绩信息；可以读取Word文档。

修改功能：可以修改学生的成绩信息；可以修改Word文档。

查看功能：可以查看学生的成绩情况。

输出功能：可以生成相应的Word文档。

（2）性能需求

要求系统能够具有快速而又强大的统计功能，并有较强的安全性。

（3）环境要求

用户要在WINDOWS下完成所有操作。

（4）用户界面需求

软件与用户界面的友好性使用户方便、有效、愉快地使用本系统。

4.自动填充功能的实现

在学生信息录入、添加及删除功能中，可以实现从Word文档中录入的功能。具体方法为：定义一个Word类型的application类型的对象，让该对象与用户选择的具体Word文档连接，在程序中操作Word文档中的行或列，并对其中写入信息实现限制、判别和检查等功能。同时利用ADO数据控件可以把Word中输入的数据或从用户界面上输入的数据加入到数据库中，或反方向地操作，实现Word文档和用用户界面及数据库的一致关联。给不同用户留下不同接口，并保证数据的一致性，主要代码如下：

Dim wdapp As New Word.Application

Dim wddoc As Document

Set wddoc = wdapp.Documents.Open（Form4.CD1.FileName）

m = wddoc.Tables（1）.Cell（i， 1）

n = wddoc.Tables（1）.Cell（i， 2）

s = wddoc.Tables（1）.Cell（i， 7）

x = wddoc.Tables（1）.Cell（i， 8）

Adodc1.Recordset.AddNew

Adodc1.Recordset.Fields（″班级″） = Left（m， 7）

Adodc1.Recordset.Fields（″学号″） = Left（m， 9）

Adodc1.Recordset.Fields（″姓名″） = Left（n， 9）

Adodc1.Recordset.Fields（″成绩″） = Left（s， 2）

Adodc1.Recordset.Fields（″专业″） = Text1.Text

Adodc1.Recordset.Fields（″学分″） = Text3.Text

Adodc1.Recordset.Fields（″类别″） = Combo1.Text

Adodc1.Recordset.Fields（″学时″） = Text4.Text

Adodc1.Recordset.Fields（″备注″） = ″″

Adodc1.Recordset.Fields（″备注″） = x

Adodc1.Recordset.Update

Adodc1.RecordSource = ″select * from student ″

Adodc1.Refresh

′wddoc.Close

wdapp.Quit ′退出Word软件′

Adodc1.Refresh

参考文献：

[1]刘炳文.Visual Basic 程序设计教程[M].清华大学出版社，2012：1-2.

[2]张尧学，史美林.计算机操作系统教程[M].清华大学出版社，2000：124-127.

[3]钱雪忠.新编Visual Basic 程序设计实用教程[M].机械工业出版社，2004：289-291.