计算机网络技术毕业设计（论文）宿舍管理系统论文(易语言).doc

《计算机网络技术毕业设计（论文）宿舍管理系统论文(易语言).doc》由会员分享，可在线阅读，更多相关《计算机网络技术毕业设计（论文）宿舍管理系统论文(易语言).doc（29页珍藏版）》请在三一办公上搜索。

1、玉溪农业职业技术学院计科系毕业论文（设计）任务书 论文题目_ _或 设计题目_学院 玉溪农业职业技术学院专业名称 计算机网络技术 班级 姓名 指导教师 年月日独 创 性 声 明本人声明所呈交的毕业论文（设计）是我个人进行的研究工作及取得的研究成果。尽我所知，除了文中特别加以标注和致谢的地方外，论文（设计）中不包含其他人已经发表或撰写过的研究成果，与我一同工作的同事对本研究所做的任何贡献均已在毕业论文（设计）中作了明确的说明并表示了谢意。学生签名： 时间： 年 月 日关于论文（设计）使用授权的说明本人完全了解玉溪农业职业技术学院计算机科学系毕业论（设计）工作条例( 2010年 7月修订)对：“成

2、绩为优秀毕业论文（设计），系部将有权选取部分论文（设计）全文汇编成集或者在网上公开发布。如因著作权发生纠纷，由学生本人负责”完全认可，并同意玉溪农业职业技术学院计算机科学系可以以不同方式在不同媒体上发表、传播毕业论文（设计）的全部或部分内容。玉溪农业职业技术学院计算机科学系有权保留送交论文（设计）的复印件和磁盘，允许论文（设计）被查阅和借阅，可以采用影印、缩印或扫描等复制手段保存、汇编论文（设计）。学生签名： 时间： 年 月 摘 要我的毕业论文题目为宿舍管理系统，主要内容是根据系统开发的各个阶段对宿舍管理工作业务进行开发。全文共分为前言、开发环境及工具介绍、需求分析、系统设计、系统实施等几章。

3、详细阐述了需求分析、系统设计的技术及其应用。在需求分析阶段介绍了宿舍管理的业务流程及其缺点，论证了开发的必要性，以及新系统的设计目标。在系统设计阶段建立起了系统框架，数据组织结构，规划了物理配置方案，进行了数据库设计。在实施阶段介绍了部分程序界面，编写了程序代码。作为计算机应用的一部分，使用计算机对宿舍信息进行管理，具有手工管理无法比拟的优点。例如：检索迅速、查找方便、可靠性高、存储量大、保密性好、寿命长等。这些优点能够极大地提高宿舍信息管理的效率，也是学校的科学化、正规化管理与现代化接轨的重要条件。关键字：管理信息系统、系统开发、宿舍、易语言目录摘 要3目录4前 言5一、 开发环境及工具介绍

4、61.1 易语言简介61.2 易语言的特点7二、 需求分析92.1 学院整体概况92.2 宿舍管理概况92.3 目前主要存在问题92.4 建立宿舍管理信息系统的目标10三 、系统设计103.1 系统初步设计103.1.1 系统设计思想103.1.2 宿舍管理系统业务流程图103.2 系统详细设计113.2.1 功能模块设计113.2.2数据库设计123.2.3输入、输出设计14四、系统的实施154.1 程序代码154.1.1 登录界面代码：154.1.2 主程序部分代码：174.2部分程序界面25五、总结29致谢29参考文献29前 言随着本世纪以来科学技术的突飞猛进和社会生产力的迅速发展，人们

5、进行信息交流的深度与广度不断增加，信息量积聚增长，传统的信息处理与决策的方法和手段已不能适应社会的需要，信息的重要性和信息处理问题的紧迫性空前提高了。信息资源的占有与利用水平，是一个国家或企业的综合实力与竞争能力的重要标志。目前人口不到30%的发达国家占有90%以上的信息资源。因此，积极开发和有效利用信息资源，是强国富民的战略措施。在现代高校宿舍管理系统中，由于高校扩招，学生人数剧增，传统的管理方法已经不适合高校的管理的需要，以前使用的手工管理登记的方法已经落后，因此需要一个功能完善，操作简便，便于管理数据的管理信息系统。本学生宿舍管理信息系统强化了管理职能，涵盖了学生管理，离校信息管理以及宿

6、舍调整管理等主要功能，特别是对学生宿舍管理工作进行了提炼和概括，使学生管理工作日益规范化、制度化和科学化。学生宿舍信息系统的使用，大大减少了学院后勤管理者的重复劳动，将是其一大得力助手。 一、 开发环境及工具介绍1.1 易语言简介易语言是由大连大有吴涛易语言软件有限责任公司自主研发的国产化汉语编程软件。是2005年国家火炬计划项目之一，是一种全中文全可视跨平台的编程语言环境。易语言一经推出就受到各方的关注，中国科学院院士张效祥将军亲到易语言公司考查，易语言的推出受到了社会各界广大编程爱好者的一致好评。易语言以其易学易用性，以及普通人也能学会编程序的优势出现。中国科学院院士张效祥将军参观易语言公

7、司时亲笔题下：“易难为易”四个大字，肯定了易语言的易学易用性。易语言具有全中文支持：无需跨越英语门槛，不必去学习几万个英文单词，仅用中文就可以编程，让小学生也能编程。易语言实现了全可视化编程：支持所见即所得程序界面设计和程序流程编码。易语言提供中文语句快速录入技术：提供多种内嵌专用输入法，彻底解决了中文编程中语句输入速度慢的问题，小学生利用首拼与全拼就可以轻松输入程序代码，并且系统提供自动容错，对南方音及多音字容错处理。易语言的代码即文档：自动规范强制代码格式转换，任何人编写的任何程序源代码格式均统一。易语言提供参数引导技术：方便程序语句参数录入，减少程序中出现差错的可能。易语言中无定义类关键

8、字：所有程序定义部分均采用表格填表方式，用户无需记忆此类关键字及其使用格式。易语言的命令格式统一：所有程序语句调用格式完全一致，不似英文编程中繁杂的复合语法书写。易语言随时对语法格式自动检查：自动检查并提示所输入语句的语法格式是否正确，且可自动添加各类名称。易语言提供全程提示与帮助：鼠标停留立即显示相关项目提示。编程时提示语法格式，调试时提示变量当前内容，随时按下F1键可得到与当前主题相关详细帮助等。易语言提供名称自动管理：用户修改任一名称定义，其它所有包含该名称的程序代码均自动修正。易语言的集成化开发环境美观大方：她集界面设计、代码编写、调试分析、编译打包等于一体。 易语言不仅易学易用，而且

9、功能强大实用，现已具有数十个各种应用范围支持库、上百个数据类型和界面组件、近万条支持命令，支持现今所有数据库，功能丝毫不比其它同类产品差。 易语言具有我国全自主知识产权，易语言系统全部自行设计开发。自有编译器，所编译目的程序运行速度快，且没有安全隐患。自带小型数据库，减少开发项目投入成本，且容易学习。跨操作系统平台编程，同时支持Windows和Linux程序开发。具有中文本地化支持，支持中文格式日期和时间处理、汉字发音处理、全半角字符处理、人民币金额处理、农历日期转换等。 易语言的设计理念与国际接轨，和其它编程语言互溶互通，学习掌握易语言对掌握其它编程语言具有桥梁作用。如：编程理念互通，支持完

10、全面向对象的程序开发技术和面向事件的程序驱动技术。功能调用互通。可以和其它编程语言之间相互调用功能模块。充分利用已有资源，支持OCX组件、TypeLib类型库、操作系统API、JAVA类等。易语言提供多语言支持。现已有简繁中文、英文等多种语言版本。 易语言于2004年9月通过了由大连市科技局组织的中国科学院院士张效祥将军及中国科学院高庆狮院士为首的专家鉴定组鉴定，鉴定委员会经过认真讨论后认为：一、易语言是一个自主开发，适合国情，不同层次不同专业的人员易学易用的汉语编程环境。二、易语言汉语编程环境由核心层、扩展层、环境层和应用层组成。核心层的易语言及其编译器构成了基础编程平台；扩展层提供了专业编

11、程人员的开发运行平台；环境层提供了用户集成开发环境；应用层支持用户创建本行业、领域的开发平台的框架。三易语言汉语编程环境是一个支持基于汉语字、词编程的、全可视化的、跨主流操作系统平台的编程环境；拥有简、繁汉语以及英语等多语种版本；能与常用的编程语言互相调用；具有充分利用API，COM、DLL、OCX组件，各种主流数据库，各种实用程序等多种资源的接口和支撑工具。鉴定委员会一致认为：易语言汉语编程环境的研制成功，是我国在基础软件领域取得的一项重要成果。该项成果技术上居于国内领先水平。鉴定委员会一致同意通过鉴定。1.2 易语言的特点1全可视化一般的可视化编程语言，仅支持图形用户界面的可视化设计操作，

12、而易语言除了支持此类可视化操作，还支持程序流程的即时可视化呈视，极大地减少了程序录入错误。即：用户在编写程序的过程中，可以即时看到当前程序的运行流程及路线，有助于培养编程思路，提高解决编程问题的能力。2全中文 作为一款由中国人自己开发的编程语言，易语言在中文处理方面有良好的支持。用户在编写程序的过程中，可以不接触任何英文。根本不懂英文的人使用中文编写代码也没有任何障碍。（1）中文名称的快速录入。易语言内置四种名称输入法：首拼、全拼、双拼、英文。三种拼音输入法均全面支持南方音。使用这些输入法能够极大地提高中文代码的输入速度。直接使用系统提供的输入法，如五笔字型、智能ABC、紫光拼音、自然码等，同

13、样可以进行程序的输入。（2）程序全部以中文方式显示，运算符号全部显示为对应的中文符号（），日期时间以中文格式呈现（年月日时分秒），以便于中文用户理解、阅读程序。（3）适合中国人的语言、思维习惯。对其它计算机编程语言的学习，总会感到某种限制，首先是语言环境的限制，有很多专业的术语字面上很难理解它的含义，而以中文编写出的程序代码，符合中国人的语法习惯和逻辑思维，可以做到见文思义，更加适合中国人使用。在以后复查程序时可以非常直观地分析；给其他人源代码学习时也会非常简单，相互交流变得更加容易。 易语言更提供了中文格式日期时间处理、汉字发音处理、全半角字符处理、人民币金额处理等功能支持。3全编译与跨平台

14、 易语言拥有自己独立的高质量编译器，中文源代码被直接编译为目的机器的CPU指令，高效且不存在任何速度瓶颈和安全隐患。 易语言现已同时支持Windows和Linux程序开发，不再依赖特定的操作系统。4可扩充支持库 易语言由基本系统和运行支持库两部分组成，两者之间通过使用易语言自行定义的接口技术进行协作。运行支持库内提供了易语言的所有语言要素，如：命令、窗口和报表单元数据类型、普通数据类型、常量等等。可以通过安装外部支持库来扩充易语言基本系统。运行支持库还可以被随意增减、抽换或升级，基本系统对运行支持库提供了详细的版本控制。本技术给用户带来的最大好处是：（1）用户可以根据行业或自身需要定制易语言；

15、（2）由于运行支持库的不断增多、升级，易语言的功能将被迅速扩充；（3）由于运行支持库可以仅包含声明而不包含实际的运行支持代码，并且可以随时被更新或抽换，这样可使人们通过国际互连网与服务器进行远程易语言交流（例如复杂型电子商务、远程控制等等）成为可能，这也是以后易语言互联网版本的发展方向。5数据库支持 易语言相对其它编程语言的优势还在于易语言拥有自己的易数据库，并且用中文命令操作易数据库，简单方便。同时，易语言对外部数据库也有着非常好的支持，通过简单的组件和命令就可以实现易语言与各类数据库的连接，如Oracle、MySQL、SQL Server、Access等等。6OCX组件、类型库（TypeL

16、ib）、API与COM对象 易语言可直接在程序中引用多种现有编程资源，极大的扩充了易语言的功能，并可对这些英文资源进行汉化处理，从而能够保持全中文的特点，让用户不用学习英文也能充分使用这些英文资源。7与其它编程语言相互融合、互相补充 易语言支持当今先进的编程理念，例如面向对象编程、事件消息处理机制等，了解、学习和掌握易语言对掌握其它编程语言具有桥梁作用，同时，易语言可以和其它编程语言以标准Win32 DLL方式互相调用，保障了多种编程语言协同开发的需要。8即时编译并自动规范语句格式的录入方式 在输入程序过程中，每条程序语句录入后，当光标离开该行，则对该行立即进行初步分析编译。如果该行输入正确，

17、则该行的拼音简写会变成对应的汉字变量名或组件名，并呈现统一的字体间距和格式，因此任何人所编写的任何程序其格式都完全一致，这对于应用程序的协作开发、交流和维护非常有利。9系统内置的自动名称管理器能够对用户所定义的各类名称进行跟踪管理 例如：假设程序中现存在一个名为“刷新内容”的子程序，而且在很多地方都调用了该子程序。现在用户根据需要想把该子程序更改为另外一个名称，在传统的编程语言中，用户更改子程序名称后，要搜寻整个应用程序，逐一找到使用了该子程序的地方，把名称相应地改变过来。在易语言中，用户只需更改该子程序名称，程序中其它所有使用了该子程序的地方，其名称都将被自动更改过来。10贯穿全程的即时且全

18、面的信息帮助 用户在进行任何操作的过程中，随时按F1帮助键，均能够在状态行上或提示夹中获得有关当前操作位置的详细相关信息。例如：用户将光标移动到某程序行上，然后按下F1键，马上就能够得到此程序行上所有命令的定义、参数、使用方法、所录属的支持库等信息。二、 需求分析2.1 学院整体概况随着大学招生规模的扩大，学校的各级教务部门都明显感觉到学籍与课程管理工作的压力越来越大，引入现代化的计算机管理方式势在必行。某学院共有学生宿舍楼五栋，分为两栋公寓，三栋普通宿舍，每学年开学需调换宿舍，每月需收水电费。学院希望开发一套本学院的宿舍管理系统，以提高学院宿舍的管理水平。2.2 宿舍管理概况目前学院宿舍管理

19、的方法是在每个新生入学后要填写学生住宿信息（学生住宿登记表），同时还有学生调整宿舍信息记录、学生离校信息、住宿费用以及每月水电费用等，需要纯手工登记。后勤部门的主要工作是：（1） 登记以及修改入住学生信息；（2） 登记调整宿舍记录；（3） 登记毕业生离校信息，并计算在校期间住宿费用（包括调整宿舍后费用）；宿舍管理人员的主要工作是：（1） 登记公物信息；（2） 登记维修记录，收取维修费用；（3） 登记、收取并打印每月水电费；2.3 目前主要存在问题（1）手工登记工作量大、易出错；（2）各种记录，文件数量大，不便与查询、统计、分析；（3）每年有大量新生入学，毕业生毕业，记录和文件更新困难；（4）文

20、件量大，修改查询困难，且修改易出现不一致问题，造成管理混乱。2.4 建立宿舍管理信息系统的目标建立宿舍管理信息系统的目的就是要通过建立现代化的计算机管理方式，对各种记录、文件在数据库中统一管理，减少出错的几率，提高查询速度，方便统计、分析。使记录、文件中的数据更新、修改一致，避免不一致带来的管理上的混乱和麻烦。建立此系统要达到减轻工作人员的负担、提高管理工作的效率，避免管理混乱，降低办公费用和管理成本的目标。三 、系统设计3.1 系统初步设计3.1.1 系统设计思想学生宿舍管理系统的主要工作是学生宿舍基本信息的录入；分为学生添加、调整、退宿舍和缴费；宿舍住宿费用和水电费的收取；公物登记和公物维

21、修记录的登记和费用收取；宿舍、学生信息的查询。3.1.2 宿舍管理系统业务流程图（1） 宿舍管理系统关联图（2） 宿舍管理系统流程图(3) 系统流程图3.2 系统详细设计3.2.1 功能模块设计通过对用户需求和系统设计思想的分析，大致分为几个功能模块：学生信息模块、宿舍信息模块、宿舍调整模块、水电收费模块、离校信息模块等。（1）学生信息模块 添加、查询、修改学生信息，包括一些学生的基本信息等。（2）宿舍信息模块查询宿舍信息，入住人员、宿舍公物登记、维修登记、水电费登记等。（3）宿舍调整模块添加、查看宿舍调整信息，并包括学生的基本信息等。（4）水电费收费模块登记水电表底数现数，自动结算本月水电费

22、（5）维修记录模块记录维修信息，并结算费用。（6）离校信息模块登记、查询、修改学生离校信息，并结算住宿费用，可打印宿舍调整情况。 3.2.2 数据库设计系统数据库将采用易语言自带的易数据库，其操作简便、保密性较强，便于连接。根据设计思想，数据库将设计为8张数据库表，分别为：管理员帐号密码、学生信息、公物信息、维修信息、水电费、宿舍调整、离校信息、住宿标准。(1)管理员帐号密码表：字段名字段类型长度说明用户名文本型10管理员用户名密码文本型20管理员密码备注备注型200备注(2)学生信息表：字段名字段类型长度说明学号整数型11学生学号姓名文本型10学生姓名性别文本型5学生性别身份证号码整数型18

23、学生身份证号码年级文本型10学生所在年级系部文本型10学生所在系部班级文本型10学生所在班级栋文本型10学生所在寝室栋号房间号整数型10学生所在房间号床位整数型5学生所在床位入住时间日期时间型14学生入住时间（3）公物信息表：字段名字段类型长度说明栋号文本型10寝室栋号房间号整数型10寝室房间号公物文本型5寝室公物（4）维修信息表：字段名字段类型长度说明栋号文本型10寝室栋号房间号整数型10寝室房间号公物文本型5所维修公物报修时间日期时间型14报修日期报修人文本型10报修人姓名联系电话整数型11报修人电话维修时间日期时间型14维修日期维修费用双精度小数型20维修费用是否缴费逻辑型2是否收费（5

24、）水电费表：字段名字段类型长度说明栋号文本型10寝室栋号房间号整数型10寝室房间号水表底数双精度小数型10水表原有数水表现数双精度小数型10水表现有数水费双精度小数型20水费电表底数双精度小数型10电表原有数电表底数双精度小数型10电表现有数电费双精度小数型20水费抄表日期日期时间型14抄表当天日期是否缴费逻辑型2是否收费（6）宿舍调整信息表：字段名字段类型长度说明学号整数型11学生学号姓名文本型10学生姓名年级文本型10学生所在年级系部文本型10学生所在系部班级文本型10学生所在年级原住宿舍文本型15学生原入住寝室原住时间日期时间型14学生原入住时间调出时间日期时间型14学生调出宿舍时间现住

25、宿舍文本型15学生调入宿舍床位整数型5学生现住宿舍床位现住时间日期时间型14学生现入住时间费用双精度小数型20学生原住宿舍费用（7）离校信息表：字段名字段类型长度说明学号整数型11学生学号姓名文本型10学生姓名年级文本型10学生所在年级系部文本型10学生所在系部班级文本型10学生所在年级是否离校逻辑型2是否已经离校住宿费用双精度小数型20在校期间住宿费用离校日期日期时间型14离校时间是否缴费逻辑型2是否已经收费（8）住宿标准表：字段名字段类型长度说明栋号文本型10寝室栋号费用双精度小数型20此栋号住宿标准3.2.3 输入、输出设计（1）输入设计正确性：保证数据的正确和账目的平衡关系，进行平衡验

26、算，输入字段的有效性进行检验。有超额、过期、重复数据等不合理情况下有提示信息。安全性：对数据库加密，管理员密码掩盖显示。唯一性：数据保证唯一性，一次录入不再重复录入。可操作性：操作方便，容易上手，使非计算机人员较为方便的使用本系统。（2）输出设计1信息的全面性，提供手工条件下的各种信息，还要有手工条件下无法提供的统计信息。2响应速度。提供进度栏显示工作的进度。3可靠性，准确性4界面简单，布局合理5格式采用统一标准，颜色，考虑规范化。四、系统的实施4.1 程序代码4.1.1 登录界面代码：（1）登录窗口创建：如果 (文件是否存在 (取运行目录 () “管理员.edb”) 真) 打开 (取运行目录

27、 () “管理员.edb”, , , , , , ) .如果 (取记录数 () 0) 初始化 () .否则 .判断循环首 (记录数 取记录数 () 用户名框.加入项目 (读 (1), ) 记录数 记录数 1 跳过 () .判断循环尾 () 用户名框.现行选中项 0 密码框.获取焦点 () .如果结束 关闭 (取运行目录 () “管理员.edb”).否则 信息框 (“打开管理员数据失败!”, 0, ) 初始化 ()（2）登录窗口初始化：.如果真 (管理用户名.内容 “” 或 管理密码.内容 “”) 信息框 (“请输入用户名和密码后再单击 按钮！”, 0 48 0, “友情提示”) 管理用户名.获

28、取焦点 () 返回 ().如果真结束.如果真 (打开 (取运行目录 () “管理员.edb”, , , , , , ) 加空记录 () 写 (1, 管理用户名.内容) 写 (2, 管理密码.内容) 写 (3, 管理备注.内容) 关闭 (取运行目录 () “管理员.edb”) _管理员设置_被选择 () 信息框 (“添加成功！”, 0, ) 连续赋值 (“”, 管理用户名.内容, 管理密码.内容, 管理备注.内容) 登陆窗口.可视 真 销毁 () _登陆窗口_创建完毕 () 返回 ().如果真结束信息框 (“添加失败！”, 0, )（3）登录窗口密码验证：.如果真 (用户名框.内容 “”) 信息

29、框 (“请选择用户名！”, 0, ) 返回 ().如果真结束.如果真 (密码框.内容 “”) 信息框 (“请输入密码！”, 0, ) 返回 ().如果真结束.如果 (文件是否存在 (取运行目录 () “管理员.edb”) 真) .如果真 (打开 (取运行目录 () “管理员.edb”, , , , , , ) .如果真 (查找 (读 (“用户名”) 用户名框.取项目文本 (用户名框.现行选中项) A 读 (“密码”) .判断开始 (密码框.内容 A) 淡出窗口 (登陆窗口.取窗口句柄 (), 15) 淡入窗口 (_启动窗口.取窗口句柄 (), 10) _启动窗口.可视 真 _启动窗口.状态条1

30、.置文本 (0, “当前管理员：” 读 (1) 关闭 () 销毁 () .默认 信息框 (“密码错误！”, 0, ) 关闭 () .判断结束 .如果真结束 .如果真结束返回 ()4.1.2 主程序部分代码：（1）创建数据库：如果真 (文件是否存在 (取运行目录 () “管理员.edb”) 假) 管理员 1.名称 “用户名” 管理员 1.类型 #文本型 管理员 1.最大文本长度 10 管理员 2.名称 “密码” 管理员 2.类型 #文本型 管理员 2.最大文本长度 20 管理员 3.名称 “备注” 管理员 3.类型 #备注型 管理员 3.最大文本长度 200 .如果真 (创建 (“管理员.edb

31、”, 管理员) 关闭 (取运行目录 () “管理员.edb”)（2）学生入住登记：.如果真 (添加学号.内容 “”) 信息框 (“请输入学号！”, 0, ).如果真结束.如果真 (添加姓名.内容 “”) 信息框 (“请输入姓名！”, 0, ).如果真结束.如果真 (添加身份证.内容 “”) 信息框 (“请输入身份证号码！”, 0, ).如果真结束.如果真 (添加年级.内容 “”) 信息框 (“请输入年级！”, 0, ).如果真结束.如果真 (添加系部.内容 “”) 信息框 (“请输入系部！”, 0, ).如果真结束.如果真 (添加班级.内容 “”) 信息框 (“请输入班级！”, 0, ).如果

32、真结束.如果真 (添加栋号.内容 “”) 信息框 (“请输入栋号！”, 0, ).如果真结束.如果真 (添加房间号.内容 “”) 信息框 (“请输入房间号！”, 0, ).如果真结束.如果真 (添加床位.内容 “”) 信息框 (“请输入床位号！”, 0, ) 返回 ().如果真结束.如果真 (打开 (取运行目录 () “/学生信息.edb”, , , , , , ) .如果 (查找 (读 (“栋”) 添加栋号.内容 且 读 (“房间号”) 添加房间号.内容 且 读 (“床位”) 添加床位.内容) 真) 信息框 (“此床位已有学生！”, 0, ) 关闭 () 返回 () .否则 .如果结束 加空

33、记录 () 写 (1, 添加学号.内容) 写 (2, 添加姓名.内容) .判断开始 (组合框1.现行选中项 0) 写 (3, “男”) .默认 写 (3, “女”) .判断结束 写 (4, 添加身份证.内容) 写 (5, 添加年级.内容) 写 (6, 添加系部.内容) 写 (7, 添加班级.内容) 写 (8, 添加栋号.内容) 写 (9, 添加房间号.内容) 写 (10, 添加床位.内容) 写 (11, 到文本 (取年份 (日期框1.今天) 写 (12, 到文本 (取月份 (日期框1.今天) 写 (13, 到文本 (取日 (日期框1.今天) 关闭 () 连续赋值 (“”, 添加学号.内容, 添

34、加姓名.内容, 添加身份证.内容, 添加年级.内容, 添加班级.内容, 添加栋号.内容, 添加房间号.内容, 添加床位.内容, 添加系部.内容) 信息框 (“添加成功！”, 0, ) .如果真 (信息框 (“是否继续添加？”, #是否钮, ) #是钮) _启动窗口._学生信息_被选择 () 学生信息添加.获取焦点 () 添加学号.获取焦点 () 返回 () .如果真结束 销毁 () _启动窗口._学生信息_被选择 () 返回 ().如果真结束信息框 (“添加失败！”, 0, )（3）公物登记：.如果真 (打开 (取运行目录 () “公物信息.edb”, , , , , , ) 加空记录 ()

35、.判断开始 (公物登记_栋号.内容 “”) 写 (“栋号”, 公物登记_栋号.内容) .默认 信息框 (“请输入栋号!”, 0, ) 关闭 () 返回 () .判断结束 .判断开始 (公物登记_栋号.内容 “”) 写 (“房间号”, 公物登记_房间号.内容) .默认 信息框 (“请输入房间号!”, 0, ) 关闭 () 返回 () .判断结束 写 (“门”, 门数量.内容) 写 (“床”, 床数量.内容) 写 (“灯”, 灯数量.内容) 写 (“衣柜”, 衣柜数量.内容) 写 (“书桌”, 书桌数量.内容) 写 (“滑门”, 滑门数量.内容) 写 (“脸盆架”, 脸盆架数量.内容) 写 (“饮

36、水机”, 饮水机数量.内容) 写 (“洗簌盆”, 洗簌盆数量.内容) 写 (“水龙头”, 水龙头数量.内容) 写 (“晾衣架”, 晾衣架数量.内容) 信息框 (“登记成功!”, 0, )关闭 ()（4）维修登记：.判断开始 (报修人.内容 “”) 信息框 (“请填写报修人!”, 0, ).判断 (报修人电话.内容 “”) 信息框 (“请填写报修人联系电话!”, 0, ).判断 (维修费用.内容 “”) 信息框 (“请填写维修费用!”, 0, ).判断 (单选框1.选中 假 且 单选框2.选中 假) 信息框 (“请选择是否缴费!”, 0, ) 返回 ().默认 .如果真 (打开 (取运行目录 (

37、) “维修信息.edb”, , , , , , ) 加空记录 () 写 (“栋号”, 树型框1.取项目文本 (树型框1.取父项目 (树型框1.现行选中项) 写 (“房间号”, 树型框1.取项目文本 (树型框1.现行选中项) 写 (“公物”, 组合框1.取项目文本 (组合框1.现行选中项) 写 (“报修时间”, 时间到文本 (日期框1.今天, #日期部分) 写 (“报修人”, 报修人.内容) 写 (“联系电话”, 报修人电话.内容) 写 (“维修时间”, 时间到文本 (日期框2.今天, #日期部分) 写 (“维修费用”, 维修费用.内容) .判断开始 (单选框1.选中 真) 写 (“是否缴费”,

38、 “是”) .判断 (单选框2.选中 真) 写 (“是否缴费”, “否”) .默认 .判断结束 关闭 () 信息框 (“登记成功”, 0, ) .如果真结束（5）寝室调整：.如果真 (打开 (取运行目录 () “住宿标准.edb”, , , , , , ) .如果 (查找 (读 (“栋号”) 原住栋号标签.标题) 住宿费用1 读 (“费用”) 关闭 () .否则 信息框 (“住宿标准有误，请核对！”, 0, ) 关闭 () 载入 (住宿标准设置, , 假) 销毁 () 返回 () .如果结束 .如果真 (打开 (取运行目录 () “/学生信息.edb”, , , , , , ) .如果 (查找

39、 (读 (“栋”) 调整栋号.内容 且 读 (“房间号”) 现住房间号.内容 且 读 (“床位”) 调整床位号.内容) 真) 信息框 (“此床位已有学生！”, 0, ) 关闭 () 返回 () .否则 关闭 () .如果真 (打开 (取运行目录 () “宿舍调整.edb”, , , , , , ) 加空记录 () 写 (“床位”, 调整床位号.内容) 写 (“学号”, 学号标签.标题) 写 (“姓名”, 姓名标签.标题) 写 (“原住栋号”, 原住栋号标签.标题) 写 (“原住房间号”, 原住房间号标签.标题) 写 (“年级”, 年级) 写 (“系部”, 系部) 写 (“班级”, 班级) 写 (5, 入住年.标题) 写 (6, 入住月.标题) 写 (7, 入住日.标题) 写 (8, 到文本 (取年份 (日期框1.今天) 写 (9, 到文本 (取月份 (日期框1.今天) 写 (10, 到文本 (取日 (日期框1.今天) 写 (11, 调