Visual FoxPro 课程设计实验报告.docx

上传人:李司机 文档编号:2279632 上传时间:2023-02-09 格式:DOCX 页数:11 大小:169.35KB
返回 下载 相关 举报
Visual FoxPro 课程设计实验报告.docx_第1页
第1页 / 共11页
Visual FoxPro 课程设计实验报告.docx_第2页
第2页 / 共11页
Visual FoxPro 课程设计实验报告.docx_第3页
第3页 / 共11页
Visual FoxPro 课程设计实验报告.docx_第4页
第4页 / 共11页
Visual FoxPro 课程设计实验报告.docx_第5页
第5页 / 共11页
点击查看更多>>
资源描述

《Visual FoxPro 课程设计实验报告.docx》由会员分享,可在线阅读,更多相关《Visual FoxPro 课程设计实验报告.docx(11页珍藏版)》请在三一办公上搜索。

1、中国最大的商务办公文档下载基地:中tpwww.WO!项目方案厂商业计划 :战略管理 合同文本调查报告项目管理 企业文化 个人简历可研分析电子商务 行政管理 年终总结广告策划案例分析财税管理法律文书 人力资源管理制度 公文写作视频讲座中国文案:WWW中国商务办公文案的下载基地娱乐中国:WWW免费电影下载在线电影观看,办公休闲小游戏:WWW超多FLASH游戏免费玩以下为文案正文:VisualFoxPro课程设计实验报告“学生信息管理系统”国贸2班200204074224余楷一.设计题目学生信息管理系统二.开发软件VFP6.0三.课题要求(1)掌握课堂讲授的基本数据库知识和VFP的基本技巧:1 .数

2、据库管理系统合数据库应用系统;2 .VFP的界面组成与操作;3 .VFP的工作方式;4 .标的基本操作(表的建立与修改、表达式、维护命令);5 .表的查询与统计(排序与索引,SELEeT-SQL查询,数据库于视图);6 .程序设计初步(程序文件,程序的控制,多模块程序)。(2)自学部分书本关于VFP的内容:1 .菜单设计;2 .表单设计;3 .表单控件设计;4 .实例:汽车修理管理系统的开发。(3)要求能够独立设计。完成一个简单的学生信息管理系统,此系统必须有如下基本功能:1 .数据的查询;2 .记录的增加,删除,修改等功能;3 .系统界面良好;4 .操作方便,运行稳定。四目的掌握基本的数据库

3、知识,熟悉VFP的使用。学习VFP数据库应用系统开发的一般步骤:1 .需求分析2 .数据库设计3 .应用程序设计4 .软件的运行测试通过简单的系统设计、开发,激发学生的学习兴趣和动手能力。五.设计时间第12周第19周六.设计主要流程流程图:普通用户登陆用户登陆logo.scx选择用户类型管理员登陆统计统计(1)数据库设计根据此系统需要建立数据库sexxdb.dbc,数据库中有如下几个数据表:StUdenI.dbf、COUrSe.dbf、SCore.dbf、PaSSWord.dbf、passwordm.dbfoSexxdbB*t nda管理员密码adminlIlllllathiM)2222222

4、admi03333333(2)应用程序设计由于本系统是多用户登陆,当是管理员登陆时此系统的所有功能都可能用,当是普通用户登陆时此系统时将无法使用系统的维护功能。下面就各个表单功能和使用作如下简述:1 .用户登录先选择用户类型:普通用户、管理员,输入密码,按确定键进入(按重写键重新填写;按退出键退出系统)。主要代码如下:optiongroup1.click事件:docasecasethis.value=OIhisfbrmxombol.rowsource=,ncasethis.value=1Ihisformxombo1.rowsource=password.用户名“casethis.value=2

5、【boLrowsource=PaSSWOrdm.管理员”endcase确定键Commandl.click事件:publicguestprivatePassword1docasecaseIhisfbrm-OptiongroupLvalue=IselectpasswordpasswordI=alltrim(thisfrm.textl.value)locateforalltrim(用户名)=atrim(thisfboLvalue)iffound()andpassword1=alltrim(5)guest=2thisfbrm.releasedoformmain.sexelse=messagebox(用

6、户名或密码错误,请重新输入!”)thisfbrm.textl.setfbcusendifcasethisfbrm.optiongroupl.value=2selectpasswordmpasswordI=alltrim(thisform.textl.value)locateforalltrim(管理员)=alltrim(thisfoboLvalue)iffound()andpasswordl=alltrim(5)guest=1thisfrm.releasedoformmain.sexelse=messagebox(用户名或密码错误,请重新输入!”)thisfbrm.textl.setfbcus

7、endifendcase在此代码中定义了公共变量guest,是为了判断用户类型以确定进入系统界面后“维护”键是否可用。重写键Command2.click事件:bol.value=*thisform.textl.value=nthisform.textl.setfbcus退出键Command3.click事件:thisform.release2 .系统界面当使用者是普通用户时,系统界面中的“维护”键是不可用的。当管理员登陆时则可以使用“维护”键。“维护”键可否使用是通过form.activate来实现的:ifguest=1thisfbrm.Command2.enabled=.t.elsethis

8、fbrm.Command2.enabled=.f.endif“查询”、“维护”、“统计”、“退出”键的dick代码分别为:doformchaxun.scxdoformweihu.scxdoformstatistic.scxthisform.releasedoformlogo3 .查询界面用户可以在此查询学生信息、课程信息和成绩信息。查询学生信息时“确定”键的代码是:thisform.pageframel.page1.gridI.recordsource=XH=alltrim(thisfbrm.pageframel.page!.textLvalue)thisform.pageframe1.pag

9、e1.gridI.recordsource=selectStUdenL学号,StUdent.姓名,StUdent.性别,StUdent.民族,StUdent.出生口期,StUdent.专业,SuIdent.籍贯fromstudentwherealltrim(学号)=XHoralltrim(姓名)=XHintocursortempthisform.pageframel.pageI.text1.value=1查询课程信息时的代码为:kcmc=alltrim(thisfbrm.pageframel.page2.textl.value)thisform.pageframel.page2.gridl.r

10、ecordsource=selectcourse.课程编号,course.课程名称,COUrSe.学分,course.任课老师fromcoursewherealltrim(课程名称)=kcmcoralltrim(课程编-)=kcmcintocursortempthisform.pageframel.page2.textl.value=1查询成绩信息时的代码为:xh=alltrim(thisfbrm.pageframel.page3.textl.value)thisform.pageframe1.page3.gridI.recordsource=selectstudent.学,student.姓

11、名,COUrSe.课程名称,score.成绩fromstudent,course,scorewhereaHtrim(SCOre.学号)=xhandalltrim(student.i号)=aHtrim(score.学号)andalltrim(course.课程编号)=alltrim(score.课程编号)intocursortempthisform.pageframel.page3.textl.value=14 .维护界面只有管理员才能进入此界面。进入此界面后,选择组合框里的一项可以查询此项的数据,但不能修改,只有按下“进行修改”键后才能进行修改,修改后按“确定”键确认修改。按“退出”键退出此界

12、面。此界面中OPtiOllgroUPl的click事件代码为:docasecasethisfbrm.optiongroup!.option1.value=1thisform.grid1.recordsource=studentuthisform.gridl.refreshcasethisfbrm.optiongroup1.option2.value=1thisform.gridI.recordsource=course,thisform.gridl.refreshcasethisfbrm.optiongroup1.option3.value=1thisform.gridI.recordsour

13、ce=scorethisform.gridl.refreshendcasemandl.enabled=.1.mand2.enabled=.t.mand3.enabled=.1.“进行修改”键的CIiCk代码为:thisform.gridl.enabled=.1.thisform.gridl.readonly=.f.thisform.gridl.allowaddnew=.t.thisform.gridl.setfbcusmandl.enabled=.f.“确定”键的dick代码为:usethisform.gridl.enabled=1.thisform.gridl.allowaddnew=.f.

14、thisform.gridl.readonly=.1.&thisfbrm.grid1.recordsource=thisform.gridl.refreshmandl.enabled=.1.mand2.enabled=.f.mand3.enabled=.f.5 .统计界面?Or二1叵豳成绩统计通过选择组合框中的选项,可以统计个人成绩或某一课程的成绩。统计类别:此界面中OPtiOlIgrOIIPl的click事件代码为:DocaseCasethis.value=OThisfdrmxomboLrowsource=Casethis.value=lThiSbol.rowsource=student.学

15、号”Casethis.value=2ThiSbol.rowsource=course.课程名称”Endcase“确定”键的dick代码为:docasecasethisform.optiongroupLvalue=1xh=alltrim(bo1.value)selectscorecalculatemax(成绩),min(成绩),avg(成绩),cnt();for学号=Xhtoal,a2,a3,a4&显示统计结果Thisfbrm.textl.value=alltrim(str(al)Thisform.text2.value=alltrim(str(a2)Thisfon.text3.value=al

16、ltrim(str(a3)Thisform.text4.value=alltrim(str(a4)Casethisform.optiongroup1.value=2Kcmc=alltrim(boLvalue)SelectcourseLocatefor课程名称=kcmcSelectscoreCalculatemax(成绩),min(成绩),avg(成绩),cnt();For课程名称=kcmcloal,a2,a3,a4&显示统计结果Thisfbrm.textl.value=alltrim(str(al)Thisform.text2.value=alltrim(str(a2)Thisform.tex

17、t3.value=alltrim(str(a3)Thisform.text4.value=alltrim(str(a4)Endcase(3)程序测试登陆系统,选择选项按钮组中的“普通用户”,在组合框中选择用户(如用“王仪”登陆,密码为nun),查看能否登陆。以此相同方法查看“管理员”选项。查看“重写”、“退出”按钮是否有效。进入系统界面,查看“维护”键是否可用(用户为管理员时才可用);点击“查询”键进入查询界面,点击页框的“学生信息”一项,在文本框中输入学号或姓名(如1或王仪),单击“确定”,查看列表框中是否显示相应的信息。依此方法查看“课程信息”、“成绩信息”。然后单击“退出二点击“统计”进

18、入统计界面,选择选项按钮组中的“个人统计”选项,在组合框中选择学号(如II),单击“,确定”,查看右侧文本框中的数据是否正确。以相同方法检查“课程统计”选项。然后单击“退出”。点击“维护”(当用户为管理员时),选择选项按钮组中的“学生信息”选项,然后单击列表,检查能否修改(正常应当无法修改);然后单击“进行修改”按钮,在检查列表能否修改(正常应当可以修改);单击“确定”确认修改,在查看列表能否修改(正常应当无法修改)。以此方法检查“课程信息”、“成绩信息”选项。七.系统实现的功能查询、统计、维护(添加、删除、修改)八,设计中遇到的主要问题,解决方法主要问题:代码编写问题、数据表的关联、数据环境解决方法:注意中英文输入法切换;注意主索引的设置;添加数据表。九.心得体会符号输入不可用中文输入法出现错误时从使用“挂起”,查看代码何处发生错误,查看控件属性。十,系统需要改善之处,改善方法的构思该系统比较简单,功能较少;可添加报表功能、用户注册功能、修改密码功能;可使用菜单。

展开阅读全文
相关资源
猜你喜欢
相关搜索
资源标签

当前位置:首页 > 生活休闲 > 在线阅读


备案号:宁ICP备20000045号-2

经营许可证:宁B2-20210002

宁公网安备 64010402000987号