2022年VF宿舍管理完整实验.docx
数据库语言试验报告学院专业班级学号姓名老师2021一、引言西安理工高校宿舍治理系统的设计与实现宿舍治理信息的手工登录与查询，是一项特别繁重而枯燥的劳动， 耗费很多人才和物力，而且会因人的心情烦躁而显现失误，因此在运算机飞速进展的今日，应用数据库技术实现酒店治理是可行而必要的工 作 ；本课程设计旨在设计西安理工高校宿舍治理系统，提高工作效率，提高治理水平；二、系统分析2.1 挑选开发工具操作系统： windows98/windows2000/windowsXP开发语言： visual foxpro 6.02.2 功能分析系统开发的总体任务是实现各种信息的系统化、规范化、和自动化；系统功能分析是在系统开发的基础上完成；本例中的西安理工高校宿舍治理系统可以完成的主要功能有：宿舍查询系统的登录；治理人员对同学信息的查询，添加，删除；同学对个人信息的查询西安理工高校宿舍查询系统宿舍查询系统的进入界面宿舍查询系统的登录界面管 理 人员登录学 生 登录流程图如下：学学学学学个生生生生生人信信信信信信息息息息息息的的的的的的查浏添删打查询览加除印询三、数据库设计数据库需求分析：同学具体信息的储存、供应、添加，这就要求数据库结构能充分满意各种信息的输入与输出；收集基本数据、数据结构以及数据处理流 程，组成一份详尽的数据字典，为后面的具体设计打下基础；在认真调查有关宿舍治理系统需求的基础上，得到如下的本系统所处理的数据流程；同学治理人员登录信息的输入同学信息同学具体信息的输入同学宿舍信息的输入同学登录信息的输入数据库设计如下： 同学具体信息表：同学信息：宿舍具体信息： 同学密码：治理密码：数据库关系如下： 四、表单及程序1、 系统进入界面代码：进入系统代码：do form 登陆界面 .scx thisform.release退出代码： thisform.release 登录界面：Form1 属性设置：Caption : 西安理工高校宿舍治理系统V1.0 ShowWindow : 2 作为顶层表单Form1 大事代码：Init 大事：do menu1.mpr with this,.t.菜单的设计：确定代码：n=0if thisform.optiongroup1.option2.value=1locafor学 生 密 码 . 学 号 =alltthisform.text1.valueand学 生 密 码 . 密 码=alltthisform.text2.value if founddo form 同学进入界面 .scx同学进入界面 .refresh read event thisform.visible=.t. thisform.text2.value=" " elsemessagebox"输入用户名或密码错误"thisform.text2.value="" thisform.text2.setfocus n=n+1endifif n>=3messagebox"次数超过限制 " thisform.releaseendif endifif thisform.optiongroup1.option1.value=1locafor管 理 密 码 . 用 户 名 =alltthisform.text1.valueand管 理 密 码 . 密 码=alltthisform.text2.value if founddo form 治理界面 .scx治理界面 .refresh read event thisform.visible=.t.thisform.text2.value=" " elsemessagebox"输入用户名或密码错误"thisform.text2.value="" thisform.text2.setfocus n=n+1endifif n>=3messagebox"次数超过限制 " thisform.releaseendif endif退出代码：thisform.release治理界面：点击打印后的界面：Form1 属性设置：Caption : 西安理工高校宿舍治理系统V1.0 ShowWindow : 2 作为顶层表单Commandgroup1 属性设置： command1caption ：上一个Command2 caption：下一个Command3 caption：添加Command4 caption：删除Command5 caption：退出Command1 caption：打印Timer1 interval ： 100 Form1 数据环境：代码： 上一个： if not bofskip -1 thisform.refresh endif下一个：if not eof skipthisform.refresh endif添加：do form tj.scx删除：sy=messagebox"确认删除同学吗？ ",4+32+256," 确认" if sy=6dele pack endifthisform.refresh 退出： thisform.release 打印：report form 同学具体信息 00 for 学号=alltrimthisform.txt学号.value preview Timer1 代码：thisform.label1.left=thisform.label1.left-10 if thisform.label1.left<0 thisform.label1.left=500endif报表设计： 添加界面：确认添加代码：dimension a5use 同学具体信息 00 do casecase lenthisform.text1.value>0and lenthisform.text2.value>0and lenthisform.text3.value>0andlenthisform.text4.value>0and lenthisform.text5.value>0store thisform.text1.value to a1 store thisform.text2.value to a2 store thisform.text3.value to a3 store thisform.text4.value to a4 store thisform.text5.value to a5zy=messagebox" 确认添加新纪录？ ",4+32+256," 确认" if zy=6append blankgo bottomgather from a fields 学号 ,姓名,性别 ,籍贯 ,诞生日期messagebox"添加胜利！ "thisform.release endifcaselenthisform.text1.value=0orlenthisform.text2.value=0orlenthisform.text3.value=0orlenthisform.text4.value=0orlenthisform.text5.value=0messagebox"输入值不能为空！"endcaseuse 密码do casecaselenthisform.text1.value>0andlenthisform.text2.value>0andlenthisform.text3.value>0andlenthisform.text4.value>0andlenthisform.text5.value>0append blankgo bottomreplace 学号 with a1 replace 密码 with a1endcasethisform.refresh返回代码：Thisform.release同学进入界面：Form1 属性：Caption : 西安理工高校宿舍治理系统ShowWindow : 2 作为顶层表单Form1 大事代码：Init 大事：do menu1.mpr with this,.t.菜单设计：V1.0退出代码：thisform.release五、总结1. 通过 VF 做这个西安理工高校宿舍治理系统，我把很多课堂上的理论学问，应用于实践；2. 把整个系统的各个程序串起来就可以形成一个完整的系统，最终用菜单来显示整个过程可以有提纲挈领的成效；3. 在做 8 个按钮的时候，要留意各个按钮的关系，留意按钮的属性；4. 报表的制作可以手工也可以用想到做，转变报表样式使其更美观；5. 在做菜单时要留意做成顶层菜单；在输入命令的时候要留意文件后缀；6. 在做 VF 的时候要留意设置默认路径，将全部文件程序都放在默认路径的文件里，防止丢失，供后来再作调整；7. 再建表的时候肯定要留意没有相同的记录，也不行以有几个空记录，空纪录也被认为是相同记录；表中的字段类型要精确，字符长度要确定，在建立连接时要留意两个表中相同字段类型、长度要始终8. 在做 VF 的时候简单显现一些系统自己的错误，有时可以尝试关掉VF 重新开一个或许会防止一些错误；
