学生信息系统论文 学生管理系统论文.doc

北京理工大学 毕业设计（论文）学生管理信息系统完成日期： 2010年5月15号_目 录摘要(中文)-（1）摘要(英文)-(2)前言-（3）第一章 绪言-（4）1.1 项目开发背景-（4）1.2 项目开发的意义-（4）第二章 visual basic 概述-（6）2.1 visual basic 语言的特点-（5）2.2 visual basic 系统几个程序应用中的常用名词-（5）第三章 系统分析-（7）3.1 系统的架构-（7）3.2 可行性分析-（7）3.3 现行业务系统的描述-（8）第四章 概要设计-（10）4.1 系统功能描述-(10)4.2 模块结构图-(11)4.3 数据库设计-(13)第五章 详细设计-（16）5.1 系统界面设计-（16）5.2 各功能的实现-(18)第六章 学生信息系统软件测试-（35）6.1 集成测试-（35）6.2 功能测试-（35）6.3 链接测试-(35)6.4 文档测试-(35)总结-（36）主要参考文献-（37）致谢-（38）摘 要随着信息技术在管理上越来越深入而广泛的应用，管理信息系统的实施在技术上已逐步成熟。管理信息系统是一个不断发展的新型学科，任何一个单位要生存要发展，要高效率地把内部活动有机地组织起来，就必须建立与自身特点相适应的管理信息系统。学生信息管理系统是典型的信息管理系统 (mis)，其开发主要包括后台数据库的建立和维护以及前端应用程序的开发两个方面。对于前者要求建立起数据一致性和完整性强、数据安全性好的库。而对于后者则要求应用程序功能完备，易使用等特点。经过分析，我们使用microsoft公司的visual basic开发工具，利用其提供的各种面向对象的开发工具，尤其是数据窗口这一能方便而简洁操纵数据库的智能化对象，首先在短时间内建立系统应用原型，然后，对初始原型系统进行需求迭代，不断修正和改进，直到形成用户满意的可行系统。关键字：控件、窗体、域、数据库、模块。abstractwith more and more widespread and profound application of information technology in management, the implement of management information system has become mature in technology step by step. managing information system is a new subject. enterprise needs existence and development, so enterprise activities should be organized efficiently and organically, which means tightening up the enterprise management and strengthening effective management of any resource (staff, finance, property, etc.) internal the enterprise, and also establishing a management information system fitting in with its own characteristics.student information management system is a typical management information system.its development include the establishment and maintenance of the database and background applications development front two.the request for the establishment of strong data consistency and integrity, good for the security of the data.for the latter request applications functions, such as easy to use features. after analysis, we use microsoft visual basic development tool companies, the use of its various object-oriented development tools, especially data that can be easily accessible and concise window manipulation database intelligent objects, the first prototype application system in a short time and then, computation of the initial prototype system needs to constantly revise and improve until the formation of a viable system of user satisfaction.key words: control、forms、domain、database、module.前 言随着学校的规模不断扩大，学生数量急剧增加，有关学生的各种信息量也成倍增长。面对庞大的信息量需要有学生管理系统来提高学生管理工作的效率。通过这样的系统可以做到信息的规范管理、科学统计和快速查询、修改、增加、删除等，从而减少管理方面的工作量。本系统主要用于学校学生信息管理，总体任务是实现学生信息关系的系统化、规范化和自动化，其主要任务是用计算机对学生各种信息进行日常管理，如查询、修改 、增加、删除，另外还考虑到学生选课，针对这些要求设计了学生信息管理系统本系统主要用于学校学生信息管理，总体任务是实现学生信息关系的系统化、规范化和自动化，其主要任务是用计算机对学生各种信息进行日常管理，如查询、修改 、增加、删除，另外还考虑到学生选课，针对这些要求设计了学生信息管理系统。本系统主要包括学生信息查询、教务信息维护和学生选课三部分。其功能主要有：有关学籍等信息的输入，包括输入学生基本信息、所在班级、所学课程和成绩等。学生信息的查询，包括查询学生基本信息、所在班级、已学课程和成绩等。学生信息的修改。班级管理信息的输入，包括输入班级设置、年级信息等。班级管理信息的查询。班级管理信息的修改。学生课程的设置和修改。第一章 绪言1.1 项目开发背景学生信息管理系统是一个教育单位不可缺少的部分。一个功能齐全、简单易用的信息管理系统不但能有效地减轻学校相关工作人员的工作负担，它的内容对于学校的决策者和管理者来说都至关重要。所以学生信息管理系统应该能够为用户提供充足的信息和快捷的查询手段。但一直以来人们使用传统人工的方式管理文件档案、统计和查询数据，这种管理方式存在着许多缺点,如:效率低、保密性差,人工的大量浪费；另外时间一长,将产生大量的文件和数据,这对于查找、更新和维护都带来了不少困难。随着科学技术的不断提高,计算机科学日渐成熟,其强大的功能已为人们深刻认识,它已进入人类社会的各个领域并发挥着来越重要的作用。1.2 项目开发的意义学校主要有总务处、政教处、教导处、培训处四大块。其中教导处的工作最为繁重，工作人员多，信息量大。除财务部门有专人及专用软件进行信息处理外，其它各类的数据处理都由班主任以及教导处工作人员人工完成。以上各类信息目前还处于手工或半手工的管理状态，效率低，可靠性差。配备电脑，但实际利用率不高，如果采用计算机进行以上各类信息的管理，必将大大提高工作效率，对学校各类信息的维护及了解起到积极的作用。另外随着计算机网络的持续发展，无论是工作、学习还是生活，将会越来越多地融入到流动的比特中，人们的工作节奏在不断加快，需要快捷的信息来源，并对此作出反应。因此，无论是从目前的现状来看，还是面向未来，一个功能完备的学校信息管理系统的开发都非常有必要。第二章visual basic 概述2.1 visual basic 语言的特点 visual basic 语言用其设计应用程序时具有两个基本特点：可视化设计和事件驱动编程。（1） 可视化设计：表现在vb在设计应用于程序界面时有“所见即所得”的处理功能。（2） 事件驱动编程：在设计应用程序时，把对象添加到窗体中，在用户与程序进行交互时，用户基本上是通过鼠标、键盘与应用程序进行交互的，那些对象就必须对鼠标和键盘操作所引发的事件做出响应，来执行一段应用程序。2.2 visual basic 系统几个在程序应用中的常用名词visual basic 系统除了一般高级语言所具有的一些名词术语外，还有几个系统常用的名词。其基本含义如下：(1) 视窗（form）视窗是进行人机交互的界面或接口，也叫窗体。vb系统的人机交互界面或接口，无论是在设计时或是在运行时，都是windows 系统的标准视窗。(2) 对象 (object)对象是vb系统内部提供给设计者可以直接使用的处理输出的控制工具。本程序所应用到的对象类型有标签框 (label box)，文本框 (text box)，命令按扭 (command button)，网格 (data grid)，ado控件 (adodc1)等。当把这些工具放置到用户界面对应的窗体上时，被称为对象或控件。用户可以通过设置对象的“属性”和“方法”，便于对象适应自己所设计应用程序的输入输出内容，对象的生成过程及结构都被封装起来。正确使用对象可以减少程序和开发时间，提高程序设计者的工作效率。(3) 属性 (properties)属性是vb系统提供的有关对象的参数或数据接口。用户通过适当地设置或改变对象的属性来确定对象的外观及性能特征，从而有效地使用系统提供的对象。比如，对象的名称、在屏幕上显示的位置、大小、颜色、接收或容纳的数据内容及数据的表现格式等。(4) 事件 (events)事件是指用户或操作者对计算机进行的某一操作（如击键、单击或移动鼠标等）的行为或系统状态发生的变化。vb系统常用事件来引导计算机执行一段程序。程序所用的键盘事件有keypress（按键）事件，keydown事件和keyup事件；鼠标事件有click（单击鼠标）事件，dbdlicd（双击鼠标）。(5) 方法 (method)方法主要是指对一个对象使用某种作用的过程。它是在程序执行的过程中要计算机执行的某种操作。其程序的方法有show（显示）方法，hide（隐藏）方法，refresh（刷新）方法。(6) 过程 (procedure)过程是指经过定义或说明的，或基于某一对象对应的事件所引发的程序段。(7) 模块 (module)模块是指一些运算量或过程进行声明或定义的一个集合。系统程序大体可分成四个模块：数据输入、根据查询、数据打印和通讯。 第三章 系统分析系统分析阶段是最主要的工作，在于明确系统的目标和用户对新系统的具体需求，同时以文件表达的方式详细而完整地描述需求的内容，即新系统将要“做什么”，并定义新系统的各项功能和性能。3.1系统的架构本系统开发使用的系统只是普通的pc机，操作系统为windows xp professional版本。开发软件采用visual basic来完成开发过程。3.2可行性分析3.2.1技术可行性学生信息，作为一个学校，就有一定的工作量存在，而学生信息，它的工作量可能是其它信息工作量的几倍，班级的增加、班级的查找、班级的修改；学生档案；课程管理；成绩管理；缴费管理；统计等等，每个信息的数据都在不断地变化着，如果采用人工的方式进行操作，那么，一天的工作量，足以让人觉得比较繁琐，吃不消。针对这样的情况，采用让数据的查询变得简单化，数据变的更让每个人都在任何时刻都可以了解到。学生信息管理系统是为本校开发的，本系统所采用的语言是visual basic，用microsoft access 2000数据库完成。该系统总体有四部分组成，包括学生信息查询、教务信息维护、学生选课及用户管理。通过本系统，把本校内部查询学生信息、教务信息、学生选课各个环节进行有效地计划、组织和控制。通过本校内部的信息，依据统一数据信息进行管理，把任何一块信息所产生的数据变动及时地反映给其它相关信息，做到数据共享。本系统主要信息流程为：教务信息维护接受学生的信息，学生信息查询根据教务信息维护的学生信息做出对所接收的信息合理性进行判断，并交于信息维护进行相应的修改，再把信息存入数据库中。学生选课是对学生进行相应选择自己相关的课程。最后进行打印。3.2.2 经济可行性 今天，计算机的价格已经十分低廉，性能却有着长足的进步，它已经被应用于许多领域。所以，学校教务管理系统所需的开发费用并不很昂贵，然而这套系统的成功投入使用可以大量节约人力，提高信息管理的质量，为学校教育质量的提高提供了保证。3.2.3 营运可行性 对于系统的运行环境要求不高，学校完全能够实现。开发的软件系统用户界面友好，简单易学，只需稍加培训，操作人员便能对系统功能做到一目了然，且系统的可移植强，所以说系统存在着营运可行性。3.2.4 软件系统的总目标采用本系统，能够使整个系统内部所有信息的工作简化，提高工作效益。由于采用统一的数据信息，使相关资料能够快速地查询所需的数据、资料及其它信息的，使信息快速高效运行。按照管理信息系统的原理和方法，采用成熟的信息技术和手段，支持学校对学生及教师情况的管理，提高学校各部门各对应的运行机制，提供管理决策支持功能，为提高学校的教育质量提供帮助，也为今后的发展提供了技术准备。3.3 现行业务系统的描述 在了解该校组织机构及职能的基础上，经过详细调查，了解该校对教务管理的业务流程，下面通过系统流程图中部分图形工具来描述管理业务活动。业务流程图符号说明，如图3. 1 ： (处理) (物或单据) (系统中人员)(数据流) (数据存储) (外部项)图3.1以下为业务流程图，如图3. 2学生判断数据类型基础数据交费数据档案数据成绩数据课程数据班级数据学生档案处理交费信息处理成绩信息处理课程信息处理班级信息处理交费表班级表学生表课程表成绩表数据判断班级数据班级表成绩表交费表课程表学生表学生信息管理系统教工查询结果查询处理图3.2第四章 概要设计41 系统功能描述本系统的主要任务是实现对学校教导处的学生信息管理、成绩管理、课程管理及相关查询。其主要功能包括：4.1.1、学生信息管理功能班级管理。提供给班主任进行本班学生的信息更新、删除。添加学生。以班级为单位，进行学生入库。其中分为单个添加和成批添加。单个添加学生供数量较少的学生信息入库；成批添加可以从现存的学生信息excel文件中成批录入到数据库中。删除学生。当学生毕业后，学生信息转移备份数据库中，系统的基本数据库中需要删除学生信息。该功能主要进行成批地删除学生信息，如连续学号区段的多位学生信息删除，整个班级的删除，所有学生信息的删除。新生管理。本部分的功能主要有新生导入、分班、及设置学号。新生导入实现从现存的excel新生名单中录入学生信息。分班功能实现按新生的报考专业、成绩及性别进行分班。设置学号实现自动为各班学生编发学号。学生信息备份。在学生信息删除前，将其按班级为单位保存到备份数据库。 4.1.2学生成绩管理功能分数录入。以班级为单位，录入各科目的期中、期末、总评成绩。总分及名次。计算指定班级学生的总分及名次。补考成绩录入。修改总评成绩，以决定最终补考人数。成绩备份。为指定班级及指定的学期数的学生成绩保存到备份数据库中。4.1.3、课程信息管理功能课程管理。提供本学期各年级各专业所开课程名称的录入、修改、删除。它是学生成绩管理的基础。用以保证数据库中一致性原则。4.1.4、查询功能学生信息查询。根据用户的要求，查询学生数据库的所有可能的信息，其中包括成绩查询。备份成绩查询。按班级为单位查询备份数据库的学生信息，补考情况。4.2 模块结构图结构图中是用一个矩形来表示模块的，模块的名称写在矩形的里面，模块结构图是用图形的方法表示一个系统的输入、输出功能，以及系统模块层次。模块结构图主要包括两方面内容：(1)模块分层图：表示自顶向下分解所得系统的模块层次结构。(2)ipo图(输入处理输出图)：用此图描述一个模块的输入、处理和输出内容。从数据流程图转换为模块结构图采用的是变换中心法。依据数据流程图的顶层图，转化得到系统的总体功能模块结构图。(如图4.1)图4.1在分解hipo图时，应采用自顶向下逐步扩展的方法，先分解综合性强、层次较少的模块结构，然后再根据需要一步一步扩充，因此，需要对第一轮的hipo图进行分解，直到每个单元功能模块都能明确它的作用，如添加功能、查询功能等，从而得到学生管理系统的hipo图。(如图4.2)打印统计档案统计打印班级统计打印成绩统计打印课程统计打印交费统计打印数据备份数据相关数据恢复学生交费增加交费管理学生交费查询学生信息管理系统学生考试违规管理成绩查询成绩管理成绩增加课程设置课程管理课程查询档案增加档案管理档案查询增加班级班级管理班级查询退出系统系统设置重新登录用户管理图4.243 数据库设计 431 库设计本系统涉及到的信息主要有5类：学生信息、成绩信息、教师信息、图书信息、后备信息。由于成绩信息和教师信息与学生信息关系密切，因此将这三类信息存放在同一数据库中，以提高多种信息同时读取的速度。按以上分析，将系统的数据库设计为两个： 一、学生数据库： 该数据库为中包含有以下各表：1、学生档案表：记录学生的基本信息，是进行学生及其它各类信息处理的基础。2、成绩表：记录学生的各科成绩。3、交费表：记录学生的交费情况。4、课程表：记录各专业各年级开课情况，在添加学生记录时，可根据该表的情况决定在成绩表添加学生记录的个数。二、后备数据库： 该数据库主要保存两类信息：学生信息、成绩信息。其数据表是按用户的要求在运行过程中动态建立的。 432 表设计 1、学生档案表结构：表4.1编号字段名称字段类型字段宽度1学号char152姓名char83性别char24出生年月date85联系电话char146家庭住址char507年级char208入学时间date509邮政编码char1010政治面貌char611籍贯char2012专业char2013民族char82、课程表结构： 表4.2编号字段名称字段类型字段宽度1课程名称char152年级char103专业char204教材char105任课老师char106课时int27考试性质char48课程性质char49上课地点char1010学期char143、成绩表结构：表4.3编号字段名称字段类型字段宽度1学号char152课程名称char153专业char204姓名char85分数long46班级char207考试科目char108考试地点char89课程性质char410考试时间date811学期char2012违规类型char2013备注备注默认4、交费表结构：表4.4编号字段名称字段类型字段宽度1学号char152专业char203姓名char84应交费用char105交费学期char206班级char207日期date88 欠费char105、班级表结构：表4.5编号字段名称字段类型字段宽度1年级char102专业char203人数long84辅导员char105备注备注默认第五章 详细设计根据系统的主要功能及上一章的总体设计，系统开发进入第二个阶段：详细设计。在这一阶段的工作中，主要任务有以下几项：1、根据原型化的开发原则，为系统的每个模块功能进行界面设计，作为进一步优化的基础。2、进行系统的流程分析，为模块的细化做好准备。3、对每个模块进行详细的算法设计。 51 系统界面设计5.1.1、登录及系统主窗口界面设计该部分界面主要包括登录窗口、系统主窗口。(1)、登录窗口界面： (2)系统主窗口本系统中使用到的数据表主要有班级表、成绩表、交费表、课程表、学生档案、用户资料，由这六个表，组成了名为信息的数据库（如图一）。其中学生档案是本系统主要的（图一）一张表，所有信息都是根据这张学生档案进行有关的操作，主要的字段有：学号、姓名、年级、专业、性别、出生年月、民族、籍贯、政治面貌、家庭地址、邮政编码、联系电话、入学时间、备注。其中日期的数据类型为日期/时间天型，其它的数据类型为文本型；成绩表中字段为：学号、姓名、年级、专业、学期、考试时间、考试科目、考试地点、课程性质、科目分数,违规类型,备注；课程表中字段为：专业、年级、学期、课程名称、教材、任课老师、课时、上课地点、课程性质、考试性质。数据库与vb的连接：打开控制面板，打开odbc数据源图标，选择“系统dsn”标签，点击“添加”按钮，在弹出的“创建新数据源”对话框中选择名称为“microsoft access drive（*.mdb）”，点击“完成”按钮，在odbc microsoft access 安装对话框中在数据源名中输入信息，在数据库这个框中， 单击“选择”按钮，在弹出的选择数据库这一对话框架中，在驱动器下拉列表框中选择本系统数据库所在驱动器，在目录中选择库所在的文件夹，在文件类型中选择选“access数据库（*.mdb）”，在数据库名中选择本系统的数据库，点击“确定”按钮即完成数据链接。 在vb中，用datagrid将库中的数据在界面中显示出来，本系统采用datagrid。在界面上右击adodc控制，在弹出的快捷菜单中选择属性，在属性对话框中，在“属性”这一标签中， 选中单选框“use odbc data source name”，并在下拉文本框中选择已经配置好的数据源名信息，再在“recordsoure”标签中，在commard text（sql）文本框中输入查询语句，如：select * from 学生档案。同时，将桌面的datagrid控件选中，在属性框中，将它的datasoure设为adodc。我们可以设置datagrid控件的外观：选中该控件，右击，在弹出的快捷菜单中选择“检索字段”，在弹出的对话框中单击“确定”，这时，表格中出现了表的字段。然后再右击，同样，在弹出的快捷菜单中选择“编辑”，我们就可以所在的表格的宽度进行调整。5.2各功能的实现课程管理：课程设置（如：界面如图二）（图二）运行程序后，进入课程管理模块，课程管理模块的第一块是课程设置，在这模块中可以把专业、年级、学期、课程名称、教材、任课老师、课时、上课地点、课程性质和考试性质等信息输入，以便使用。下面为其代码：private sub command1_click()dim zhuanye, nianji, kecheng, jiaocai, renkls, keshi, shangkedd, kechengxz, kaoshixz as stringzhuanye = text1.textnianji = text2.textxueqi = text3.textkecheng = text4.textjiaocai = text5.textrenkls = text6.textkeshi = text7.textshangkedd = text8.textkechengxz = combo1.textkaoshixz = combo2.textkaoshixz = label11.captionif trim(zhuanye) = or trim(nianji) = or trim(kecheng) = or trim(jiaocai) = or trim(renkls) = or trim(keshi) = or trim(shangkedd) = or trim(kechengxz) = or trim(kaoshixz) = then msgbox 基本课程设置资料不能为空,请填写完整！ combo1.text = combo2.text = exit subend ifmycon.open provider=microsoft.jet.oledb.4.0;data source=信息.mdb;myrs.open select * from 课程表 where 专业= & trim(text1.text) & and 年级= & trim(text2.text) & and 课程名称= & trim(text4.text) & , myconif myrs.eof = false then msgbox 该课程已经存在，请重新输入！ myrs.close mycon.close text1.setfocus exit subend ifmyrs.closemyrs.open 课程表, mycon, 3, 2myrs.addnew myrs.fields(专业) = text1.text myrs.fields(年级) = text2.text myrs.fields(学期) = text3.text myrs.fields(课程名称) = text4.text myrs.fields(教材) = text5.text myrs.fields(任课老师) = text6.text myrs.fields(课时) = text7.text myrs.fields(上课地点) = text8.text myrs.fields(课程性质) = combo1.text myrs.fields(考试性质) = label11.caption myrs.updatemyrs.closemycon.closemsgbox 添加成功!adodc1.recordsource = select * from 课程表 order by 专业frm_shezgrean.adodc1.refreshfrm_shezgrean.datagrid1.refreshtext1.text = text2.text = text3.text = text4.text = text5.text = text6.text = text7.text = text8.text = combo1.text = combo2.text = end subprivate sub command2_click()dim zhuanye, nianji, kecheng, jiaocai, renkls, keshi, shangkedd, kechengxz, kaoshixz as stringdim n as integerzhuanye = text1.textnianji = text2.textxueqi = dtpicker1.valuekecheng = text4.textjiaocai = text5.textrenkls = text6.textkeshi = text7.textshangkedd = text8.textkechengxz = combo1.textkaoshixz = combo2.textif trim(zhuanye) = or trim(nianji) = or trim(kecheng) = or trim(jiaocai) = or trim(renkls) = or trim(keshi) = or trim(shangkedd) = or trim(kechengxz) = or trim(kaoshixz) = then msgbox combo1.text = combo2.text = exit subend ifif mycon.state = 1 thenmycon.closeend ifmycon.open provider=microsoft.jet.oledb.4.0;data source=信息.mdb;myrs.open select * from 课程表 where 专业= & text1.text & , mycon, 3, 2n = msgbox(您确定要删除吗？, vbyesno, 提示)if n = 6 thenmyrs.deletemyrs.closemycon.closeend ifmsgbox 您确定要删除吗？, vbyesno, 提示adodc1.recordsource = select * from 课程表 order by 专业frm_shezgrean.adodc1.refreshfrm_shezgrean.datagrid1.refreshtext1.text = text2.text = text3.text = text4.text = text5.text = text6.text = text7.text = text8.text = combo1.text = combo2.text = end subprivate sub command3_click() unload meend subprivate sub datagrid1_click()frm_shezgrean.adodc1.recordsource = select * from 课程表 where 专业 = & trim(datagrid1.row) & text1.text = frm_shezgrean.adodc1.recordset.fields(专业)text2.text = frm_shezgrean.adodc1.recordset.fields(年级)text3.text = frm_shezgrean.adodc1.recordset.fields(学期)text4.text = frm_shezgrean.adodc1.recordset.fields(课程名称)text5.text = frm_shezgrean.adodc1.recordset.fields(教材)text6.text = frm_shezgrean.adodc1.recordset.fields(任课老师)text7.text = frm_shezgrean.adodc1.recordset.fields(课时)text8.text = frm_shezgrean.adodc1.recordset.fields(上课地点)combo1.text = frm_shezgrean.adodc1.recordset.fields(课程性质)combo2.text = frm_shezgrean.adodc1.recordset.fields(考试性质)command2.enabled = trueend subprivate sub form_load()temp1 = option1(0).captionvscroll1.value = year(date)text9 = vscroll1.valuecombo1.additem (必修)combo1.additem (选修)combo1.additem (自开)combo2.text = 考试combo2.enabled = falsecombo2.additem (考试)combo2.additem (查考)text1.text = text2.text = text3.text = text4.text = text5.text = text6.text = text7.text = text8.text = combo1.text = combo2.text = end subprivate sub option1_click(index as integer)temp1 = option1(index).captionend subprivate sub text9_change()text3 = text9.text + temp1end subprivate sub vscroll1_change()text9 = vscroll1.valueend sub课程管理：课程查询（如：界面如图三）（图三）当输入查询类别、运算符和条件后可以查找到所需要的课程设置，或按查询时间来查询，输入所要查找的时间段，就可查到所要的课程设置。代码如下：dim sqlstr as stringprivate sub command1_click()dim a as stringdim kccx1 as stringdim kccx2 as stringdim str1 as stringdim str2 as stringif option3.value = true thena = trim(combo2)select case a case = kccx1 = & combo1.text & & combo2.text & & trim(text1) & case like kccx1 = instr(1, & combo1.text & , & trim(text1.text) & )0 end select a = trim(combo4)select case a case = kccx2 = & combo3.text & & combo4.text & & trim(text2) & case like kccx2 = instr(1, & combo3.text & , & trim(text2.text) & )0 end select if option1.value = true then if kccx1 = then strtiaojian = select * from 课程表 where & kccx2 elseif kccx2 = then strtiaojian = select * from 课程表 where & kccx1 else strtiaoji