基于VBA操作ACCESS数据库的局域网考试系统编制.pdf

工程教育工程技术研究 第 8 卷 总第 140 期 2023 年 6 月摘要：文章利用 VBA 的简易开发工具，通过 ADO 控制 ACCESS 数据或 MySQL 等数据库，制作局域网考试系统。实际应用表明，该系统具有简洁、高效的特点，并能通过局域网完成在线考试，为教学评价提供了较好的支持和便捷。关键词：VBA；ACCESS；数据库；考试系统Abstract:Using VBAs simple development tools,ACCESS data or MySQL and other databases are controlled through ADO to create a local area network examination system.The practical application shows that the system has the characteristics of simplicity and high efficiency,and can complete the online examination through local area network,which provides good support and convenience for teaching evaluation.Key Words:VBA;ACCESS;database;examination system分类号：TP311.521 编制设计流程考试设计需求主要包括客观与主观题型，设计的数据规模一般，且涉及密码和删除数据功能，采用小型数据库 ACCESS 即可实现4-5。文章案例主要通过ADO 连接 ACCESS 数据库进行增加、修改、删除、查询，基本能解决绝大部分数据问题。设计流程如下：利用 ADO 控件完成连接 ACCESS数据库对数据库进行增、删、改、查操作设置数基于 VBA 操作 ACCESS 数据库的局域网考试系统编制林虹虹1，徐丽群2，吴汝明11.广州新华学院，广东 广州 5105202.广东工程职业技术学院，广东 广州 510520Preparation of Local Area Network Examination System Based on VBA Operation ACCESS DatabasLIN Honghong1,XU Liqun2,WU Ruming11.Guangzhou Xinhua University,Guangzhou 510520,Guangdong,China2.Guangdong Engineering Polytechnic,Guangzhou 510520,Guangdong,China047.DOI:10.19537/ki.2096-2789.2023.12.据库密码。ADO 的数据库连接语句如下：Provider=Microsoft.ACE.OLEDB.12.0;Jet OLEDB:-Database Password=hello123;Data Source=;该流程的主要功能代码如下。1.1 连接数据库设计 ACCESS 数据库为考试 data.accdb，其主要通过 ADO 控件连接数据库，代码如下。dpath=ThisWorkbook.Path&考试 Data.accdbconn.Open Provider=Microsoft.ACE.OLEDB.12.0;-Jet OLEDB:Database Password=123;Data Source=&dpath&Sheet1.Range(a2).CopyFromRecordset conn.Execute(sql)conn.Close1.2 数据增删改查询操作通过 SQL 的 dml 语句实现增、删、改、查。1.2.1 增加sql=insert into student values(&tj&,李四,#2022/9/10#,女,1.65)conn.Open Provider=Microsoft.ACE.OLEDB.12.0;-Jet OLEDB:Database Password=123;Data Source=&dpath&conn.Execute(sql)1.2.2 删除sql=delete*from student where 学号=&tj&conn.Open Provider=Microsoft.ACE.OLEDB.12.0;-Jet OLEDB:Database Password=123;Data Source=&作者简介：林虹虹，女，硕士，高级工程师，研究方向为计算机教育。146工程教育 2023 年 第 12 期 总第 140 期 工程技术研究dpath&conn.Execute(sql)1.2.3 保存更新sql=update student set 身高=1.98 where 学号=&tj&conn.Open Provider=Microsoft.ACE.OLEDB.12.0;-Jet OLEDB:Database Password=123;Data Source=&dpath&conn.Execute(sql)1.2.4 查询sql=select*from studentconn.Open Provider=Microsoft.ACE.OLEDB.12.0;-Jet OLEDB:Database Password=123;Data Source=&dpath&Sheet1.Range(a2).CopyFromRecordset conn.Exe-cute(sql)其中，&tj 为文本控制框，完成相应的文字输入查询工作，通过上述语句即可完成数据库的增加、删除、修改和基本查询操作。最后通过对数据进行密码校验，即可完成数据库密码连接工作。2 系统实现2.1 建立数据库在 Microsoft ACCESS 中建立一个数据库，并设置密码，再将数据库文件和 VBA 的考试系统中创建的工程文件放在同一目录下。准备好考生照片和考生数据Excel，新建 ACCESS 和表（考生信息、客观题、主观题），把数据复制或导入 ACCESS。2.2 连接加密的 ACCESS 数据库新建考试系统，共包含 6 张工作表：t1_ 考生登录表、t2_ 考生信息确认表、t3_ 客观题、t4_ 客观题抽题、t5 主观题、t6_ 主观题抽题，界面如图 1 所示。2.3 系统操作流程（1）考生输入准考证号，如果数据库里有，则进入 t2_ 考生信息确认表核对界面，否则给出提示。（2）核对界面显示考生的准考证号、姓名、科目及个人照片，如无误可进行正式考试，否则可返回考生登录界面。（3）点击 t2_ 考生信息确认表开始考试按钮，从数据库中随机抽取 10 道客观题和 4 道主观题，拷贝到t4_ 客观题抽题和 t6_ 主观题抽题，如图 2 所示。图 2 考试系统主观客观题（4）选择好单选答案后，考生的答案可以保存，回看时正常显示之前的答案，交卷前可以更改。做完客观题后，可以自动得出客观题得分，并在数据库中保存。随后进入主观题考试界面。（5）从 t4_ 客观题中读取主观题，考生在文本框中答题，不交卷关闭后重新打开还可以再答，提交后不可再作答。3 结束语采用有纸化考试或单元测试进行教学评价，已不太符合现在的信息化教学需求，快速简易的考试系统更易得到教学系统的认可。文章利用 VBA 的简易开发工具，通过 Excel 的 VBA 脚本及 ADO 操作 ACCESS 数据库，可以轻易完成考试系统的增删改查等工作，该系统方法具有简洁、高效的特点，为教学评价提供了较好的支持。参考文献1 李伟,金梁.基于WAMP 架构的Web 在线考试系统设计J.自动化技术与应用,2023,42(5):162-165.2 康长青,吴中博,胡春阳,等.OBE 理念下数据库系统课程的期末考试改革J.计算机教育,2023(1):100-104.3 张远平.基于评价数据可视化的“1+X”Web 前端考试系统J.信息技术与信息化,2023(3):147-152.4 翟乃强.语音合成技术在听力考试系统设计中的应用J.青岛远洋船员职业学院学报,2022,43(3):78-82.5 邢立峰,刘景涛,苏娜.OBE 理念下数据库技术课程案例库建设与实践研究J.现代农机,2023(1):101-104.图 1 考试系统工作表