《VisualFoPro课程设计实验报告.doc》由会员分享，可在线阅读，更多相关《VisualFoPro课程设计实验报告.doc（11页珍藏版）》请在金锄头文库上搜索。
1、中国文案中国最大的商务办公文档下载基地： :/ word98 / -工程方案 调查报告 可研分析 广告筹划 案例分析商业打算 工程治理 电子商务 财税治理 法律文书战略治理 企业文化 行政治理 人力资源 治理制度合同文本 个人简历 年终总结 公文写作 视频讲座-中国文案： 中国商务办公文案的下载基地.消遣中国： v.mv99 免费电影下载 在线电影观看.办公休闲小玩耍： 163173 超多FLASH玩耍免费玩.以下为文案正文：Visual FoxPro 课程设计试验报告“学生信息治理系统”国贸2班202204074224佘楷一.设计题目学生信息治理系统二.开发软件VFP6.0三.课题要求(1)
2、 把握课堂讲授的根本数据库学问和VFP的根本技巧： 1. 数据库治理系统合数据库应用系统； 2. VFP的界面组成与操作； 3. VFP的工作方式； 4. 标的根本操作表的建立与修改、表达式、维护命令； 5. 表的查询与统计排序与索引，SELECT-SQL查询，数据库于视图； 6. 程序设计初步程序文件，程序的把握，多模块程序。(2) 自学局部书本关于VFP的内容： 1. 菜单设计； 2. 表单设计； 3. 表单控件设计； 4. 实例：汽车修理治理系统的开发。(3) 要求能够独立设计。完成一个简洁的学生信息治理系统，此系统必需有如下根本功能： 1. 数据的查询； 2. 记录的增加，删除，修改等
3、功能； 3. 系统界面良好； 4. 操作便利，运行稳定。四.目的把握根本的数据库学问，生疏VFP的使用。学习VFP数据库应用系统开发的一般步骤：1. 需求分析2. 数据库设计3. 应用程序设计4. 软件的运行测试通过简洁的系统设计、开发，激发学生的学习兴趣和动手力气。五.设计时间第12周第19周六.设计主要流程流程图：用户登陆logo.scx治理员登陆一般用户登陆选择用户类型查询维护退出统计退出查询统计成绩信息课程信息学生信息成绩信息课程信息学生信息个人统计课程统计成绩信息课程信息学生信息课程统计个人统计(1) 数据库设计依据此系统需要建立数据库sexxdb.dbc，数据库中有如下几个数据表：
4、student.dbf、course.dbf、score.dbf、password.dbf、passwordm.dbf。student.dbf记录的是学生的个人信息，如：学号、姓名、性别、民族、诞生日期、所在专业、籍贯。Course.dbf记录的是有关课程的信息，如：课程编号、课程名称、学分、任课教师。Score.dbf记录的是每个同学不同科目的考试成绩，有以下这些内容：课程编号、课程名称、学号、成绩。Password.dbf记录系统一般用户的用户名和密码。Passwordm.dbf记录系统治理员的用户名和密码。(2) 应用程序设计由于本系统是多用户登陆，当是治理员登陆时此系统的全部功能都可能
5、用，当是一般用户登陆时此系统时将无法使用系统的维护功能。下面就各个表单功能和使用作如下简述：1. 用户登录先选择用户类型：一般用户、治理员，输入密码，按确定键进入按重写键重填写；按退出键退出系统。主要代码如下：optiongroup1.click大事：do case case this.value=0 thisform bo1.rowsource=“ case this.value=1 thisform bo1.rowsource=“password.用户名“ case this.value=2 thisform bo1.rowsource=“passwordm.治理员“endcase“确定”
6、键command1.click大事：public guestprivate Password1do case case thisform.optiongroup1.value=1 select password password1=alltrim(thisform.text1.value) locate for alltrim(用户名)=alltrim(thisform bo1.value) if found and password1=alltrim(密码) guest=2 thisform.release do form main.scx else =messagebox(“用户名或密码错
7、误,请重输入!“) endif case thisform.optiongroup1.value=2 select passwordm password1=alltrim(thisform.text1.value) locate for alltrim(治理员)=alltrim(thisform bo1.value) if found and password1=alltrim(密码) guest=1 thisform.release do form main.scx else =messagebox(“用户名或密码错误,请重输入!“) endifendcase在此代码中定义了公共变量gues
8、t，是为了推断用户类型以确定进入系统界面后“维护”键是否可用。“重写”键command2.click大事：thisform bo1.value=“thisform.text1.value=“退出”键command3.click大事：thisform.release2. 系统界面当使用者是一般用户时，系统界面中的“维护”键是不行用的。当治理员登陆时则可以使用“维护”键。“维护”键可否使用是通过form.activate来实现的：if guest=1 thisform mand2.enabled=.t. else thisform mand2.enabled=.f.endif“查询”、“维护”、“
9、统计”、“退出”键的click代码分别为：do form chaxun.scxdo form weihu.scxdo form statistic.scxthisform.releasedo form logo3. 查询界面用户可以在此查询学生信息、课程信息和成绩信息。查询学生信息时“确定”键的代码是：thisform.frame1.1.grid1.recordsource=“XH=alltrim(thisform.frame1.1.text1.value)thisform.frame1.1.grid1.recordsource=“select student.学号, student.姓名,
10、student.性别, student.民族, student.诞生日期, student.专业, student.籍贯 from student where alltrim(学号)=XH or alltrim(姓名)=XH into cursor temp“thisform.frame1.1.text1.value=“查询课程信息时的代码为：kcmc=alltrim(thisform.frame1.2.text1.value)thisform.frame1.2.grid1.recordsource=“select course.课程编号, course.课程名称, course.学分, co
11、urse.任课教师 from course where alltrim(课程名称)=kcmc or alltrim(课程编号)=kcmc into cursor temp“thisform.frame1.2.text1.value=“查询成绩信息时的代码为：xh=alltrim(thisform.frame1.3.text1.value)thisform.frame1.3.grid1.recordsource=“select student.学号,student.姓名,course.课程名称,score.成绩 from student,course,score where alltrim(sc
12、ore.学号)=xh and alltrim(student.学号)=alltrim(score.学号) and alltrim(course.课程编号)=alltrim(score.课程编号) into cursor temp“thisform.frame1.3.text1.value=“4. 维护界面只有治理员才能进入此界面。进入此界面后，选择组合框里的一项可以查询此项的数据，但不能修改，只有按下“进展修改”键后才能进展修改，修改后按“确定”键确认修改。按“退出”键退出此界面。此界面中optiongroup1的click大事代码为：do casecase thisform.optiongr
13、oup1.option1.value=1thisform.grid1.recordsource=“student“case thisform.optiongroup1.option2.value=1thisform.grid1.recordsource=“course“case thisform.optiongroup1.option3.value=1thisform.grid1.recordsource=“score“endcasethisform mand1.enabled=.t.thisform mand2.enabled=.t.thisform mand3.enabled=.t.“进展修改”键的click代码为：thisform.grid1.enabled=.t.thisform.grid1.readonly=.f.thisform.grid1.allowaddnew=.t.thisform mand1.enabled=.f.“确定”键的click代码为：usethisform.
