计算机毕业论文

1、济宁医学院信息科学技术系毕业设计(论文)摘 要随着计算机技术的发展，各行各业中计算机都已经普及，尤其是在学校，考试跟学生的关系是非常密切的，考试的出题也是一个比较麻烦的问题，要花费大量的时间和精力，教师出题工作量大，劳动强度高，而且试题的保存也比较占地方，而且试题多了也显得乱，基于以上这几点考虑，为了解决考试试题的多样性、随机性和上述一些问题，教师拥有一套试题库管理管理系统是非常必要的。该试题库管理系统就可以摒弃传统试题的手工整理的麻烦，而且可以减少出题的精力和时间。这个试题库管理系统是基于windows平台，采用了visual basic 6.0编程和sql server数据库技术。此系统包

2、含试题管理、试卷管理、课程管理、用户管理和帮助这五大功能。为了实系统这些功能，我建立了数据库exam，该数据库共中共包含users(用户表)，class(课程表),titles(题型表),exams(试题表),papaers(试卷表),questionp(试卷题目表)这几个表。能够实现的主要功能有录入试题，查询试题，修改试题，修改/添加/删除用户，课程添加/删除，题型添加/删除，修改密码，自动组卷等。另外根据用户的权限不同，可以访问不同的模块。其中系统管理员可以管理各个用户，而科目教师只能管理所授科目的所有信息不能越权操作。【关键字】试题库试卷管理试题库管理系统abstractalong wi

3、th the computer technology development, in all the various trades and occupations the computer all already popularized, in the school, took a test with students relations was extremely close in particular, the test set the topic of a composition also is a quite troublesome question, had to spend the

4、 massive time and the energy, the teacher sets the topic of a composition the work load to be big, the labor intensity was high, moreover the test question preservation also compared occupies the place, moreover the test question many has also appeared chaotically, based on above these consideration

5、s, in order to solve the test test question multiplicity, randomness and the above some questions, the teacher had a set to try the question bank management system management system is extremely essential. should try the question bank management system management system to be possible to abandon the

6、 traditional test question the manual reorganization trouble, moreover may reduce the energy and the time which sets the topic of a composition.this tries the question bank management system management system is based on the windows platform, has used visual the basic 6.0 programming and sql the ser

7、ver data bank technology. this system contains the test question management, the examination paper management, the curriculum manages, the user manages and helps these five big functions. for real system these functions, i have established database exam, this database altogether chinese communist pa

8、rty contains users (user table), class (class schedule),titles (topic table),exams (test question table),papaers (examination paper table),questionp (examination paper topic table) these tables. can realize the main function has the input test question, inquires the test question, revises the test q

9、uestion, the revision/increase/the deletion user, the curriculum increases/deletion, topic increase/deletion, revision password, automatic group volume and so on. moreover the basis users jurisdiction is different, may visit the different module. the in which system manager may manage each user, but

10、 the subject teacher only can the administration center give the subject all informations not to be able to exceed authority to operate.【keywords】the question bank the examination paper management question bank management system 目 录摘 要1abstract2第一章 前 言4第二章 系统分析52.1 可行性分析52.2 需求分析52.3设计工具简介6第三章 系统设计8

11、31模块图及系统总流程83.1.1登陆模块93.1.2试题管理模块103.1.3题型设置模块113.1.4查询试题模块113.1.5试卷管理模块123.1.6课程设置模块133.1.7用户管理模块143.1.8帮助模块143.2数据库的分析与设计14结束语16致谢16参考文献16附程序源码17 第一章 前 言考试在我国古代就已经有了很大的发展，早在1300年以前就有了科举制度。但这种考试不规范、不严密，不能客观、准确地评估一个人的能力水平。第二次世界大战结束后，考试在社会生活中的地位进一步提高， 资格证书考试也就应运而生。这种考试次数频繁，命题工作量大，并且对考试的测量学特性要求更加严格，不少

12、考生要求结果相互可比，因此，建立高质量、大容量的现代化题库成为必要。目前，经济发达国家已经建立了完善的考试专业机构。各机构也都根据自己所承担的职能建立起了大型题库。传统的考试出题总是教师考前集中出题、集中组卷，这样很难保证试卷的质量，进而不能准确反映学生的学习效果。为促进教学手段的现代化，提高教学质量，减轻教师在出题、组卷和成绩分析中的工作量，本系统在vb编程环境下开发了这套能实现试题管理软件。试题库系统作为教学手段现代化的重要组成部分，与数据库相结合，发挥着很大的作用。该软件在windows xp操作系统下，采用visual basic语言开发而成，具有windows风格，其主要特点如下：1

13、、图形化界面、可操作性强、通用性强：界面和菜单显而易见，所以即使是计算机基础很差的用户经过简单的培训后，也能很快地熟练操作。2、安全性：试题库管理系统必须要有极其强大的安全性。本系统会在内部设制权限来控制用户的操作。提高整个系统的安全性。3、通过其录入模块录入试题后，即可形成本课程的试题库系统，而且系统还具有自动组卷功能、试题查询等功能，从而可以实现教考分离。4、强大的提示性功能：该系统将具有较强的纠错能力，当运行时，用户操作错误时会提出相当的的警示，能自动保护系统避免系统出错。第二章 系统分析如今是信息化的时代，学校、企事业单位的电脑特别是pc机已相当普及，对试题进行电脑化管理已具备了足够的

14、硬件条件，本系统是在电脑中进行试题管理的一种软件，提供友好的界面，结合数据库技术，具有易学、易懂、易操作的优点，本软件的开发一定能得到广大用户的欢迎。考试是检查学生对知识掌握程度的一种考核，试题的管理，特别是学校对试题的管理不能停留在普通试卷存档上，无纸化的试题管理才能适应当今的发展潮流，具有试题更新方便、组卷快的特点。本系统的开发的目的就是要对试题进行集中、有序、有效的管理。2.1 可行性分析随着现代教育事业的发展，教学手段现代化问题显得越来越重要。试题库的管理，特别是学校的试题库具有量大、种类多的特点，常规管理有工作量大、查询困难、不易更新的缺点，试题库管理系统可对试题实行科学的管理，利用

15、现代电脑功能强大、运算速度快的优点，对试题进行集中、有序、有效的管理，更新方便、查询快捷、组卷灵活，大大降低了劳动强度，需用密码登录系统，具有一定的安全性。可行性研究主要集中在四个方面：（1）经济可行性（2）技术可行性（3）法律可行性（4）技术可行性由于时间的限制，虽然还存在在着一些问题，但是也有其优点：1、图形化界面、菜单栏，工具栏清晰地展现系统的功能。2、系统安全性：试题库管理系统必须要有极其强大的安全性。3、高效性：试题库管理系统应该具有的强大适应能力和简便实现能力。系统运行的高效性是我们追求的目标之一。4、本系统开发成本低，风险小。2.2 需求分析(一)在考试过程中，教师工作存在以下问

16、题：1、必须事先找好要出的试题、并且是最好的试题。有时教师在教学过程中，发现了很好的试题，只好记在书上或本子上，这是很容易忘记的事，等到要再用的时候，才发现试题不知放到哪了；2、找好试题之后，整理试题也是一项要花费大量时间的问题；3、整理好试题后，要把试题输入到计算机中，以进行打印。当教师想把上次或以前的某些试题再放到试卷中时，必须再重新输入一次，给工作带来了许多时间的浪费；4、还有一个问题，当下次出试卷时，很难找到以前试卷的原样。（二）功能分析（1）数据的录入：把系统中所需要的信息录入进去，包括，用户信息的录入，题型的录入，课程的录入，试题的录入等。（2）数据的查询：根据已有的条件查询需求的

17、信息,本系统的查询主要是试题的查询，可以根据试题号，试题的难易程度，试题的题型来查询。（3）数据的修改和删除：包括题型、试题、课程的修改删除等。（4）用户的管理：用户的增加、删除及密码修改。2.3设计工具简介visual basicvisual basic是创建windows应用程序最快捷、最容易的工具。visual basic提供了一整套简化快速应用程序开发的工具集。visual指的是创建图形用户界面（gui）所使用的方法。不用编写许多行代码来描述界面元素的外形和位置，你只需简单地在屏幕上添加一个预先创建的对象即可。假如你已使用过像画笔（paint）之类的画图程序，你就已经有了创建有效的用户

18、界面所必需的大部分技巧。无论你是要创建个人还是工作组的小型实用程序或者企业级大型系统，visual basic都有能满足你要求的工具。其数据访问的特性可以创建数据库、前端应用程序和应用于大多数流行数据库格式的可伸缩服务端组件。activex技术允许你使用由其他应用程序所提供的功能，如由word字处理程序、excel电子表格和其他windows应用程序提供的功能。visual basic的因特网功能，使你可以通过因特网很容易从你的应用程序访问文档和其他应用程序，或创建因特网服务器应用程序。对于visual basic来说，它的主要优点是很容易理解，许多编程工作都很容易完成，基本上隐藏了windo

19、ws api和com组件结构的内涵。其缺点是visual basic从来没有实现真正意义上的面向对象，所以大型应用程序很难分解和维护。另外，因为vb的语法继承于basic的早期版本(basic主要是为了让初学者更容易理解，而不是为了编写大型商业应用程序)，所以不能真正成为结构化或面向对象的编程语言。sql servermicrosft sql server,是基于客户端/服务器模式的新一代大型关系型数据库管理系统。它在电子商务、数据他库和数据库解决方案等应用中起着重要的核心作用，为企业的数据管理提供强大的支持，对数据为患 的数据提供有效的管理，并采用有效的措施实现数据的完整性及数据的安全性。管

20、理课程登陆主界面试题管理试卷管理题型设置课程管理用户管理帮助录入试题试题查询自动组卷编辑试题删除用户添加用户修改密码关于第三章 系统设计31模块图及系统总流程开始用户登录退出程序读取用户类型1、 管理自己和用户信息2、 管理所有用户的信息3、 管理课程信息1、管理自己的用户信息2、管理自己课程的题型3、管理自己课程的试题4、管理自己课程的试卷功能结构图 系统总流程本系统统包括以下六大模块，即登陆、试题管理模块，试卷模块，课程管理模块，查询模块，帮助和用户管理模块。3.1.1登陆模块：考虑到试题库系统的的安全性，每个用户都有自己的密码，用户只有输入正确密码，才能进入本系统的主菜单界面。而在主界面

21、中，用户可以根据自己的权限选择系统所提供的功能。而系统管理员还可以添加、删除修改用户，查看、删除和增加各种题型和科目。设计构思系统运行时，首先是一个简单明了的登陆界面。用户需要输入“用户名”，“密码”，系统将所填写的资料与exam数据库里的用户表资料核对，经核对正确以后，考生才能进入主界面，否则退出登陆。登陆界面登陆后，就是主菜单界面。用户可以根据需要来选择主菜单所提供的功能。系统主界面截取图如下：3.1.2试题管理模块：此菜单具有以下子菜单：“录入试题”、“编辑试题”、“查询试题”、“题型设置”。（）“录入试题”：即添加新的试题，该菜单和“编辑试题”菜单单击后链接到一个界面。设计构思：系统设

22、置了两个combo控件，可以选择题型及题型的难易程度，另外试题的题号是继上一题目自动递增的。还有设置了两个richtextbox控件用于录入题目和试题的答案。还有一个datagrid控件和一个adodc控件可以即时显示刚添加的试题，能做到浏览方便，而且也便于修改试题和删除试题时能清晰地看清每个题的题目、答案、录入人员，题号等相关信息。界面如下：（）“编辑试题”：包括修改试题和删除试题，可以对刚才用“添加试题”按钮加入的试题进行修正和删除。设计构思：（1）“修改试题”：通过双击datagrid控件的一行，使该行的相关信息（题型，难易程度，题目，答案）进入到各信息对应的地方处于可编辑状态进行编辑。

23、编辑后再占击“修改试题“按钮保存对刚才试题的修改。（2）删除试题：在datagrid中选中要修改行，点击“删除试题”即可。单击后，该行即从datagrid中消失，同时更改exams表，使相对应的记录删除。3.1.3题型设置模块：该模块包括“添加”、“删除”、“修改题型”三个子功能。界面如下图所示：进入此模块系统会自动记录用户登录时的科目（如语文），也就是说，用户只能设置所教课程（语文）的题型，不能越权设置。设计构思：“添加题型”后，新增的题型会在list1中显示，另外还要在titles表中添加新题型。“修改题型”后会将修改后的题型保存。“删除题型”，需要在list中删除，同时从titles表中

24、删除。“返回”即是关闭该窗口3.1.4查询试题模块：该模块可以根据已知条件，查询试题题目和答案。设计构思：此处设置了三个查询条件：试题类型，难易程度和试题题号。属于单选按钮option，查询出结果后即时在datagrid控件中显示，同时设置两个richtextbox控件，处于非编辑状态，鼠标选项中datagrid中的某一行时，该行的详细信息会在richtextbox中显示，此功能复杂之处在于涉及到exam表，titles表,classes表三个表，sql句中需要进行必要的关联。界面中显示的信息只能查看，不能修改，如果要修改需要在上面介绍的“编辑试题”菜单中进行。该模块的流程图如下：查询课程号难

25、易程度题型数据库信息显示“查询试题”界面如下:3.1.5试卷管理模块：此菜单设置了一项功能：自动组卷功能。设计构思：需要填入试卷名称，试卷标题，还需要选择题型以及每个题型的题量。此模块有两个地方难实现：（1）在添加题型时，在text处需要输入题量，需要统计出数据库中每一题型的总题量，输入的题量不能超过总题量。（2）在组卷时，需要利用随机函数选择试题，但是由于随机函数的随机性，就需要循环判断每一次选择的试题是否已经添加到试卷中，防止一个试题添加两次。添加完试题及试题的数量以后就可以点击“组卷”进行自动组卷，链接到另一个界面，设置一个richtextbox显示组卷完成的内容，以达到一目了然的效果，

26、另外，设计“保存试卷”按钮，可以将组的试卷存放在.txt文件中。界面如下：3.1.6课程设置模块：可以添加、删除、修改课程，这一模块只能由系统管理员使用。某一科目教师无权使用该功能。设计构思：在课程名处填写要添加的课程，描述不是必须的。在“添加题型”后，需要在list1中显示，另外还要对应地在后台classes表中添加新课程。“修改课程”后会将修改后的题型保存。“删除题型”，需要在list中删除，同时从classes表中删除。界面如下图所示：3.1.7用户管理模块：此模块具有“添加用户”，“删除用户”和“修改密码”三个功能。添加用户和删除用户只能由管理员使用。设计构思： 添加用户需要输入用户名

27、，密码，科目名称，以及用户的类型（系统管理员或科目管理员）添加后在list中显示，同时要在users表中添加新记录.删除用户要在list中删除，同时在users表中删除该记录。修改密码功能是每个用户都可以用的，只要用户名和旧密码输入正确，就可以更改新密码，所以具有一定的安全性。界面略。3.1.8帮助模块：目前只添加了“关于”下拉菜单。3.2数据库的分析与设计打开sql server企业管理器，新建一个数据库，名称为exam。建好空数据库后，再建立各张表:数据表名称数据表用途users（用户表）保存用户名，密码，用户权限等titles（题型表）保存题型名，题型所属的课程classes(课程表)保

28、存课程的课程号、课程名、课程描述questionp（试卷题目表）保存顺序的试题号，试卷号，数据库中的试题号exams（试题表）保存试题的号，试题所属的课程号、题目、答案、试题描述等papers（试卷表）保存试卷号、试卷名、试卷标题、试卷描述等数据库中各表的字段设置如下：users（用户表）：username（char,15,用户名）主键password（char,10,密码）usertype（smallint,2权限）classname (char30,课程名)classes（课程表）：classid(int4课程号）主键classname(char 30 课程名）des (text16描述）

29、titles（题型表）：classid (int 4课程号）主键titlename(char 20 题型名）主键exams（试题表）：examid（int4试题号）主键classid（int4课程号）titlename（char20题型名）question（text16问题）answer（text16答案）username（char15用户名）nanyi（char16难易程度）papers（试卷表）paperid（int4试卷号）关键字papername（char30试卷名）username（char15用户名）header（char60试卷标题）des（text16试卷描述）classnam

30、e（char30试卷的课程名）questionp（试卷题目表）：id(int4实际题号)paperid(int4试卷号)examid(int4试题号)结束语本系统以“实用”为基本指导思想，在数据库选择方面做了细致的研究和对比，在综合分析了各种数据库的优缺点和试题库的特点后选用了稳定实用的sql server数据库；在对试题库功能做了大量分析后，确定了本系统的数据结构；本系统界面友好，易于使用，通用性强；在自动组卷、试题查询和试题录入等功能的设计方面突出体现了其实用性。 同时，本系统的自动组卷模块设计尚需进一步完善，试卷预览也应进一步改善，应不断提高试卷显示功能，另外手工组卷，在初步分析阶段也列

31、在其中，但由于时间原因，在该系统中没做考虑。另外以后还可以考虑把“组卷内容直接打印形成word文档”功能加入其中，这样系统功能就可以做到非常完善。系统在设计过程中遇到不少难题。虽然，我们不是全都解决，更重要的是学会了书本上学不到的知识和方法。在此我要感谢那些在我们设计过程中给我们的提出了不少宝贵意见的老师和同学，有了他们的帮助才使此系统的功能逐渐完善，从而基本都能顺利使用。致谢现在我们的系统已基本完成，其中夹有我很多的艰辛也有快乐。在此我要对各位指导师老师：刘宝旨，王忠华，张丽，姚青，曹灿老师说声：“谢谢”。另外我还要感谢在这两个月的设计过程给过我帮助的同学们。参考文献、visual basi

32、c程序设计教程（第二版） 刘炳文 清华大学出版社、visual basic编程实例教程 袁帅 希望电子出版社、sql server实用教程 郑阿奇 电子工业出版社、管理信息系统 北京大学出版社、msdn microsoft 附程序源码1、 登陆界面private sub command1_click()dim mysql as string 存放sql语句if trim(text1.text) = then 用户名为空 msgbox 请输入用户名, vbokonly + 48, 警告 exit subend ifif trim(text2.text) = then 密码为空 msgbox 密码

33、不能为空, vbokonly + 48, 警告 exit subend ifmysql = select * from users where username= & text1.text & dim objconn as adodb.connection 声明connection对象set objconn = new adodb.connection 实例化dim connectionstring as string 指定数据库连接,指定连接字符串connectionstring = dsn=wang;objconn.open connectionstringdim objrs as ado

34、db.recordset 声明set objrs = new adodb.recordset 实例化objrs.open trim$(mysql), objconn, adopenkeyset, adlockoptimistic 前:上下移动指针,后:查询的记录放在objrs,可增删改等.if objrs.eof then msgbox 没有这个用户请重新输入, vbokonly + 48, 警告 text1.setfocuselse if trim(objrs.fields(1) = trim(text2.text) then 普通用户登陆系统，设置可使用的菜单和工具栏 username =

35、 text1.text if objrs.fields(2) = 1 then classname = objrs.fields(3) mdifrmmain.mnu_stgl.enabled = true mdifrmmain.mnu_sjgl.enabled = true mdifrmmain.mnu_kcgl.enabled = false mdifrmmain.mnu_yhgl.enabled = false else 管理员登陆，设置可使用的菜单并隐藏工具栏 mdifrmmain.mnu_stgl.enabled = false mdifrmmain.mnu_sjgl.enabled

36、= false mdifrmmain.mnu_kcgl.enabled = true mdifrmmain.mnu_yhgl.enabled = true mdifrmmain.toolbar1.visible = false end if mdifrmmain.show unload me else msgbox 密码错误,请重新输入!, vbokonly + 48, 警告 text1.text = text2.text = text2.setfocus end ifend ifset objconn = nothingset rst = nothingend subprivate sub

37、command2_click()unload meend sub2、录入试题界面public connectionstring as stringdim hao as string 存放课程号private sub command1_click() 添加试题dim max as integer 存放最大的试题号richtextbox1.setfocusif richtextbox1.text = or richtextbox2.text = then msgbox 请输入题目和答案！, vbokonly, 提示 exit subend ifconnectionstring = dsn=wang

38、dim tsql as stringdim ssql as stringdim objconn1 as adodb.connectiondim objrs1 as adodb.recordsetset objconn1 = new adodb.connectionset objrs1 = new adodb.recordsetobjconn1.open connectionstringssql = select max(examid) from exams objrs1.open trim(ssql), objconn1, adopenkeyset, adlockoptimisticmax =

39、 objrs1.fields(0)objrs1.closetsql = select * from examsobjrs1.open trim(tsql), objconn1, adopenkeyset, adlockoptimistic试题号，课程号，题型名，问题，答案，录入员，难易程度objrs1.addnewobjrs1.fields(0) = max + 1objrs1.fields(1) = haoobjrs1.fields(2) = trim(combo1.text)objrs1.fields(3) = trim(richtextbox1.text)objrs1.fields(4)

40、 = trim(richtextbox2.text)objrs1.fields(5) = trim(label2.caption)objrs1.fields(6) = trim(combo2.text)objrs1.updatemsgbox 试题添加成功!richtextbox1.text = richtextbox2.text = adodc1.refreshdatagrid1.columns(0).width = 500 更改datagrid中的列宽datagrid1.columns(1).width = 800datagrid1.columns(2).width = 800datagri

41、d1.columns(3).width = 800datagrid1.allowaddnew = false 不允许手动更新datagrid1.allowupdate = falsedatagrid1.allowdelete = falsedatagrid1.allowrowsizing = falseend subprivate sub command2_click() 修改试题if richtextbox1.text = then msgbox 请双击选择要修改的试题！, vbokonly, 提示 exit subend ifdim msql as stringdim objconnm a

42、s adodb.connection 声明objconnm :修改功能set objconnm = new adodb.connectionconnectionstring = dsn=wangobjconnm.open connectionstringdim objrsm as adodb.recordsetset objrsm = new adodb.recordset修改题目，答案，难易程度,不修改题型 msql = update exams set titlename= + combo1.text + ,question= + trim(richtextbox1.text) + ,an

43、swer= + richtextbox2.text + ,nanyi= + combo2.text + where examid= + datagrid1.columns(0).text + if msgbox(保存修改？, vbyesno, 提示) = vbyes then objconnm.execute msql richtextbox1.text = richtextbox2.text = adodc1.refresh exit sub end ifend subprivate sub command3_click()if msgbox(删除当前记录？, vbyesno, 提示) =

44、vbyes then adodc1.recordset.delete exit subend ifend subprivate sub command4_click()unload meend subprivate sub datagrid1_dblclick()combo1.text = trim(datagrid1.columns(1).text)combo2.text = trim(datagrid1.columns(3).text)richtextbox1.text = trim(datagrid1.columns(4).text)richtextbox2.text = trim(da

45、tagrid1.columns(5).text)end subprivate sub form_load()label2.caption = username 用户名和课程名label6.caption = classnamecombo2.additem 容易 加难易程度combo2.additem 较容易combo2.additem 较难combo2.additem 难combo2.text = 容易dim connectionstring as stringdim objconn as adodb.connectiondim objrs as adodb.recordsetset objc

46、onn = new adodb.connectionset objrs = new adodb.recordsetconnectionstring = dsn=wangobjconn.open connectionstringdim mysql as string 向combo1中加题型mysql = select titles.* from titles,classes where classes.classname= & _ trim(label6.caption) & and classes.classid=titles.classid objrs.open trim(mysql), o

47、bjconn, adopenkeyset, adlockoptimistichao = objrs.fields(0)combo1.text = trim(objrs.fields(1)while objrs.eof = false combo1.additem trim(objrs.fields(1) objrs.movenextwendadodc1.connectionstring = dsn=wang 设置连接字符串adodc1.commandtype = adcmdtext 设置命令类型，表示从表中返回所有行adodc1.recordsource = select examid as

48、题号,titlename as 题型,username as 录入员,nanyi as 难易程度,question as 题目,answer as 答案 from exams where classid= + hao 设置数据源adodc1.refresh 刷新控件datagrid1.columns(0).width = 500 更改datagrid中的列宽datagrid1.columns(1).width = 800datagrid1.columns(2).width = 800datagrid1.columns(3).width = 800datagrid1.allowaddnew =

49、false 不允许手动更新datagrid1.allowupdate = falsedatagrid1.allowdelete = falsedatagrid1.allowrowsizing = falseend sub3、自动出卷public connectionstring as stringdim hao as string 存放课程号private sub command1_click() 添加试题dim max as integer 存放最大的试题号richtextbox1.setfocusif richtextbox1.text = or richtextbox2.text = t

50、hen msgbox 请输入题目和答案！, vbokonly, 提示 exit subend ifconnectionstring = dsn=wangdim tsql as stringdim ssql as stringdim objconn1 as adodb.connectiondim objrs1 as adodb.recordsetset objconn1 = new adodb.connectionset objrs1 = new adodb.recordsetobjconn1.open connectionstringssql = select max(examid) from

51、 exams objrs1.open trim(ssql), objconn1, adopenkeyset, adlockoptimisticmax = objrs1.fields(0)objrs1.closetsql = select * from examsobjrs1.open trim(tsql), objconn1, adopenkeyset, adlockoptimistic试题号，课程号，题型名，问题，答案，录入员，难易程度objrs1.addnewobjrs1.fields(0) = max + 1objrs1.fields(1) = haoobjrs1.fields(2) =

52、 trim(combo1.text)objrs1.fields(3) = trim(richtextbox1.text)objrs1.fields(4) = trim(richtextbox2.text)objrs1.fields(5) = trim(label2.caption)objrs1.fields(6) = trim(combo2.text)objrs1.updatemsgbox 试题添加成功!richtextbox1.text = richtextbox2.text = adodc1.refresh datagrid1.columns(0).width = 500 更改datagrid中的列宽datagrid1.columns(1).width = 800datagrid1.columns(2).width = 800datagrid1.columns(3).width = 800data