VF宿舍系统实验报告

数据库语言实验报告学院专业班级学号姓名教师场A耳2009西安理工大学宿舍管理系统的设计与实现一、引言宿舍管理信息的手工登录与查询，是一项非常繁重而枯燥的劳动， 耗费许多人才和物力，而且会因人的情绪烦躁而出现失误，因此在计算 机飞速发展的今天，应用数据库技术实现酒店管理是可行而必要的工 作。本课程设计旨在设计西安理工大学宿舍管理系统，提高工作效 率，提高管理水平。二、系统分析2.1选择开发工具操作系统：windows98/windows2000/windowsXP开发语言：visual foxpro 6.02.2功能分析系统开发的总体任务是实现各种信息的系统化、规范化、和自动系统功能分析是在系统开发的基础上完成。本例中的西安理工大学 宿舍管理系统可以完成的主要功能有：宿舍查询系统的登录。 管理人员对学生信息的查询，添加，删除。学生对个人信息的查询流程图如下：三、数据库设计数据库需求分析：学生详细信息的保存、提供、添加，这就要求数据库结构 能充分满足各种信息的输入与输出。收集基本数据、数据结构以及数据处理流 程，组成一份详尽的数据字典，为后面的具体设计打下基础。在仔细调查有关宿舍管理系统需求的基础上，得到如下的本系统所处理的数 据流程。18 / 16数据库设计如下: 学生详细信息表:学生信息:宿舍详细信息:?表设计誥 宿舍详细信H.dbf学生密码:管理密码:数据库关系如下:/表设计盟吿理密码血吋寻数爵库设计蛊-Bycj宿类人段舍型数引M孚生宿舍営宜宿舍详细信息楼号：楼 晟号舍會引号舍 T学宿宿關学宿 邑 口用户名 密码四、表单及程序馬宇段:学号 密码ta学生详细信宜0段号名别寰生片 字学姓性籍出照B-1、系统进入界面代码：进入系统代码：do form 登陆界面.sexthisform.release退出代码：thisform.release登录界面：Forml属性设置：Caption :西安理工大学宿舍管理系统 V1.0ShowWi ndow : 2 作为顶层表单Forml事件代码：In it事件：do men ul.mpr with this,.t.菜单的设计：确定代码：n=0if thisform.opti on groupl.opti on 2.value=1loca for 学 生密码.学号=allt (thisform.text1.value and 学生密码.密码=allt(thisform.text2.valueif foun d(do form 学生进入界面 .scx 学生进入界面 .refresh read event thisform.visible=.t. thisform.text2.value= elsemessagebox(输入用户名或密码错误 thisform.text2.value= thisform.text2.setfocus n=n+1 endif if n=3messagebox(次数超过限制 thisform.releaseendifendifif thisform.optiongroup1.option1.value=1loca for 管 理 密 码 . 用 户 名 =allt (thisform.text1.value and 管 理 密 码 . 密 码 =allt(thisform.text2.valueif found( do form 管理界面 .scx 管理界面 .refresh read event thisform.visible=.t. thisform.text2.value= elsemessagebox(输入用户名或密码错误 thisform.text2.value= thisform.text2.setfocus n=n+1 endif if n=3messagebox(次数超过限制 thisform.releaseendifendif 退出代码：thisform.release管理界面：点击打印后的界面:学生详如巔帕学号:9000Utt,： bil nsk具cw；北宣吧生日Jtfl: Q1Q5冯0Sit；Forml属性设置：Captio n :西安理工大学宿舍管理系统V1.0ShowWi ndow : 2 作为顶层表单Commandgroupl 属性设置： command1 caption :上一个Comma nd2 capti on： 下一个Comma nd3 capti on： 添力口Comma nd4 capti on： 删除Comma nd5 capti on： 退出Comma nd1 capti on：打印Timerl interval: 100Forml数据环境:界面皿x数翳环境设计罔二 期 g _u5 w - 段号s剧贯生片引号 字学姓性籍出照滦学 園二 毋代码：上一个：if not bof(skip -1thisform.refreshen dif下一个：if not eof(skipthisform.refreshen dif添加：do form tj.scx删除：sy=messagebox(确认删除学生吗？,4+32+256,确认if sy=6delepacken difthisform.refresh退出：thisform.release打印：report form 学生详纟田信息 00 for 学号=alltrim(thisform.txt 学号.valuepreviewTimer1 代码：thisform.label1.left=thisform.label1.left-10if thisform.label1.left0thisform.label1.left=500en dif报表设计：E.I B LI . I . I .丄 HI . “ . K i .3l . I u J . i J I . E . I . I . I . i 上| I .t| . I . | . I 占| . I . | . J 岁I 一 I . | . I. i . I . i .Z-学生详细佶晨00DATE0|D学号一J性别：use 学生详细信息 00do caseandandcase len(thisform.text1.value0 and len(thisform.text2.value0 len(thisform.text3.value0 and len(thisform.text4.value0 len(thisform.text5.value0store thisform.text1.value to a(1store thisform.text2.value to a(2store thisform.text3.value to a(3store thisform.text4.value to a(4store thisform.text5.value to a(5zy=messagebox(确认添加新纪录？,4+32+256,确认if zy=6append blankgo bottomgather from a fields 学号 ,姓名,性别,籍贯 ,出生日期messagebox(添加成功！ thisform.releaseendifcase len(thisform.text1.value=0 len(thisform.text3.value=0orlen(thisform.text5.value=0 messagebox(输入值不能为空！ endcaseuse 密码do casecase len(thisform.text1.value0 len(thisform.text3.value0andlen(thisform.text5.value0 append blankgo bottomreplace 学号 with a(1replace 密码 with a(1endcasethisform.refresh 返回代码：Thisform.release学生进入界面：or len(thisform.text2.value=0 len(thisform.text4.value=0and len(thisform.text2.value0len(thisform.text4.value0ororandandForml属性：Caption :西安理工大学宿舍管理系统V1.0ShowWi ndow : 2 作为顶层表单Forml事件代码：In it事件：do men ul.mpr with this,.t.菜单设计：退出代码:thisform.release五、总结1. 通过 VF 做这个西安理工大学宿舍管理系统，我把许多课堂上的理 论知识，应用于实践。2. 把整个系统的各个程序串起来就可以形成一个完整的系统，最后 用菜单来显示整个过程可以有提纲挈领的效果。3. 在做 8 个按钮的时候，要注意各个按钮的关系，注意按钮的属 性。4. 报表的制作可以手工也可以用想到做，改变报表样式使其更美 观。5. 在做菜单时要注意做成顶层菜单。在输入命令的时候要注意文件 后缀。6. 在做 VF 的时候要注意设置默认路径，将所有文件程序都放在默认 路径的文件里，防止丢失，供后来再作调整。7. 再建表的时候一定要注意没有相同的记录，也不可以有几个空记 录，空纪录也被认为是相同记录。表中的字段类型要准确，字符长度要 确定，在建立连接时要注意两个表中相同字段类型、长度要一直8. 在做 VF 的时候容易出现一些系统自己的错误，有时可以尝试关掉 VF 重新开一个也许会避免一些错误。