实验六简单“学生信息查询系统”的设计与实现

实验四简单“学生信息查询系统”的设计与实现实验题目简单的“学生信息查询系统”的设计与实现日期2013.9.23一、实验目的1、掌握应用程序设计规划的基本方法；２、掌握使用VFP设计简单的查询系统；３、掌握数据表的建立，及表单控件与数据源的连接方法；４、掌握查询、修改、添加、删除记录的基本实现方法。二、设备与环境PC兼容机、Windows系列操作系统、VisualFoxPro数据库编程环境三、实验内容（一）设计简单的“学生信息查询系统”；要求：设计一个简单的“学生信息查询系统”，其功能包括系统的登陆、学生信息的添加/删除、根据不同条件进行模糊查询等。（二）设计3个自由表；包括：密码表、系表、学生信息表，表中记录自行输入，记录应尽量真实，每个表记录数不得少于５条。表结构如下。1.密码表——passwd.dbf字段名字段类型字段宽度说明用户名字符型１０字符密码字符型１０英文字母或数字2.系表——department.dbf字段名字段类型字段宽度说明系编号字符型６字符型（数字）系名字符型２０汉字联系电话字型２０数字3.学生信息表——student_info.dbf字段名字段类型字段宽度说明学号字符型８数字姓名字符型８汉字性别字符型２汉字年龄数值型２数值系编号字符型６字符型（数字）（三）欢迎界面要求：设计时可参考图1．创建系统欢迎界面，单击窗口开始系统登陆2．设计查询登陆系统第1页（四）查询系统登陆界面要求：1.填入正确的用户名和密码，登陆系统；2.假若用户名或密码错误，应给出相应提示；3.重试次数不得超过三次；4.加入“重新填写”功能；5.设计时可参考给出的图。（五）系统主界面要求：“学生信息查询系统”主界面包括四个按钮；1.学生信息查询；2.信息的修改/添加；3.信息的删除；4.退出。（六）查询模块要求：1.查询能够实现按照不同条件进行查询；2.查找到的信息显示在查询内容下方的列表中；3.当没有找到符合条件的记录时，能够给出友好的提示信息。（七）信息添加/修改界面要求：1.完成信息的添加/修改操作；2.实现将不同系部的学生分类显示。（八）记录的删除界面要求：1.了解逻辑删除和物理删除的区别；2.编程实现逻辑删除、物理删除两种删除方式的选择。第2页四、实验结果及分析（一）自由表图一：密码表图二：系表图三：学生信息表第3页（二）欢迎界面欢迎界面属性设置：代码:Label2的click的事件代码:doformpass.scx对象属性名值作用FormCaption欢迎使用学生信息查询系统设置欢迎界面表达标题内容Piture瓢虫.Jpg为表单插入图画背景Label1Caption学生信息查询系统界面标题1内容Autosize.t.区域大小自适应标题Backstyle0透明标签与表单颜色一致Fontname楷体指定用于显示文本的字体名Fontsize36指定对象文本的字体大小Forecolor128,0,255指定用于显示对象文本和图形的前景色Label2Caption单击窗口开始登陆界面标题2内容Autosize.t.区域大小自动适应标题Backstyle0透明标签与表单颜色一致Fontname楷体指定用于显示文本的字体名Fontsize20指定对象文的字体大小Forecolor0.128.255指定用于显示对象文本和图形的前景色第4页(三)学生信息查询系统登陆界面图五：登陆界面属性设置:对象属性名值作用FormCaptionPass设置表单的标题内容Label1Caption学生信息查询登陆系统标签1的内容Autosize.t.区域大小自动适应标题Backstyle0透明标签与表单颜色一致Fontname黑体指定用于显示文本的字体名Fontsize20指定对象文本的字体大小Label2Caption用户名标签2的内容Autosize.t.区域大小自动适应标题Backstyle0透明标签与表单颜色一致Fontsize12指定对象文本的字体大小Label3Caption密码标签3的内容Autosize.t.区域大小自动适应标题Backstyle0透明标签与表单颜色一致Fontsize12指定对象文本的字体大小文本框1CaptionText1设置文本框标识Value无清空文本框文本框2CaptionText2设置文本框标识Value无清空文本框Command1Name确定设置密令按钮的标题Command2Name重新填写设置密令按钮的标题Command3Name退出设置密令按钮的标题代码:Command1(确定)的click事件：j=j+1dowhilenoteof()第5页ifthisform.text1.value=用户名username=.t.ifthisform.text2.value=密码userpassword=.t.exitelsei=i+1exitendifelseskipendifenddogotopifusername=.t.ifuserpassword=.t.messagebox(欢迎使用学生信息查询系统！)thisform.releasedoform主界面elseifi3messagebox(密码错误，请重新输入密码！)thisform.text2.value=thisform.text2.setfocuselsemessagebox(密码尝试超过3次，退出系统！)thisform.releasequitendifendifelseifj3messagebox(用户名输入错误，请重新输入！)thisform.text1.value=thisform.text2.setfocuselsemessagebox(用户名尝试超过3次，退出系统！)thisform.releasequitendifendifcommand2(重新填写)的click事件：thisform.text1.value=thisform.text2.value=thisform.text1.setfocuscommand3(退出)的click事件thisform.release第6页（四）系统主界面图六：主界面属性设置:对象属性名值作用Form1Caption系统主界面设置表单的标题内容Command1Caption学生信息查询设置命令按钮的标题Command2Caption信息的修改/添加设置命令按钮的标题Command3Caption信息的删除设置命令按钮的标题Command4Caption退出设置命令按钮的标题代码：Command1（学生信息查询）的click事件：doform信息查询Command2（信息的修改/添加）的click事件：doform信息的添加与修改Command3（信息的删除）的click事件;doform信息的删除Command4（退出）的click事件;thisform.release第7页(五)学生信息查询模块此模块需要插入表单,添加学生信息表到数据环境并进行设置图七:查询界面属性设置：对象属性名值作用Form1Caption学生信息查询模块设置表单的标题Label1Caption请选择学生信息查询方式：标签1的内容Backstyle0透明标签的背景透明Autosize.t.区域大小自动适应标题内容Label2Caption填入待查询的内容标签2的内容Backstyle0透明标签的背景透明Autosize.t.区域大小自动适应标题内容Optiongroup1Backstyle0透明选项按钮组的背景透明Text1NameText1设置文本框标识Command1Caption确定查找设置命令按钮1的标题Autosize.t.区域大小自动适应标题内容Command2Caption取消并退出设置命令按钮2的标题Autosize.t.区域大小自动适应标题内容第8页代码：optiongroup1的click事件:LPARAMETERScName,cClassOption1setfilterto学号=allt(thisform.text1.value)Option2setfilterto姓名=allt(thisform.text1.value)Option3setfilterto性别=allt(thisform.text1.value)Option4setfilterto年龄=val(allt(thisform.text1.value))Option5setfilterto系编号=allt(thisform.text1.value)command1（确定查找）的click事件：thisform.refreshcommand2（取消并退出）的click事件：thisform.release（六）信息的添加修改图八;信息的添加修改1.打开“文件”中的新建命令，选定“表单”中的“向导”按钮；2.打开“表单向导”，选择“一对多表单向导”；3.从父表中选定字段：单击“数据库和表”的对话按钮，在“打开”对话框中选定“系表”，然后将“可用字段”中的所有字段移到“选定字段”列表框中，选定“下一步”；4.从字表中选定字段：单击“数据库和表”的对话按钮，在“打开”对话框中选定“学生信息表”，然后将“可用字段”中的所有字段移到“选定字段”列表框中，选定“下一步”；5.建立表之间的关系：选定“下一步”；6.设置完成对话框：在“请键入表单标题”文本框中输入“信息的添加修改”选定“完成”；7.运行并进行调试；8.表单“信息的添加修改”执行后，父表提供分类数据，子表数据则显示在表格中，用按钮翻页时子表的内容随父表变化。第9页属性设置:对象属性名值作用From1Caption信息的添加修改设置表单的标题内容Label1Caption系编号标签1的内容Label2Caption系名标签2的内容Label3Caption系联系电话标签3的内容Text1Caption系编号1文本框1的内容Controlsouce系表.系编号指定与对象建立联系的数据源Text2Caption系名1文本框2的内容Controlsouce系表.系名指定与对象建立联系的数据源Text2Caption系联系电话1文本框3的内容Controlsouce系表.系联系电话指定与对象建立联系的数据源（七）信息的删除图九：信息的删除第10页属性设置:对象属性名值作用FormCaption信息的删除设置表单的标题Label1Caption系编号标签1的内容Autosize.t.区域大小自动适应标题内容Backstyle0透明标签的背景透明Label2Caption系名称标签2的内容Autosize.t.区域大小自动适应标题内容Backstyle0透明标签的背景透明Label3Caption系联系电话标签3的内容Autosize.t.区域大小自动适应标题内容Backstyle0透明标签的背景透明Gird1Recordsource学生信息表指定数据的来源Command1Caption下一个设置命令按钮1的标题Command2Caption上一个设置命令按钮2的标题Command3Caption仅从表中删除设置命令按钮3的标题Command4Caption从磁盘中删除设置命令按钮4的标题Command5Caption退出设置命令按钮5的标题代码：command1(仅从列表中删除数据)的click事件：use学生信息表deleteallcommand2（从磁盘上删除数据）的click事件：use学生信息表zap错误分析：在“学生信息查询模块”中单击“按学号查询”时，系统没有反应。解决方法：将代码中的过程由click改为init