VFP课程设计报告

Visual Foxpro 课程设计（教学管理）

内容说明（实验报告与使用说明书）教学管理信息系统开发 —— Visual Foxpro 课程设计（教学管理）

目 录

1.系统名称....................................................................................................................................3

2.开发背景....................................................................................................................................3

3.系统完全介绍............................................................................................................................3

4.系统简介....................................................................................................................................3

5.系统模块构成............................................................................................................................3

6.系统简介............................................................................................................................4—12

7.附录(代码分析).......................................................................................................................13

- 2 -

Visual Foxpro 课程设计（教学管理）

系统名称：教学管理信息系统

开发背景

开发环境：Vidual Foxpor6.0 操作系统：Window 7

系统简介：

主体功能以及相关结构关系（如图一所示）

教学管理信息系统 教师端系统系学生端系统

管理员登非管理员登服务 功能

只允许浏各类信息浏览 览登陆人 信息 各类信息查询

报密成学

错码绩籍

无权修改任何信有权修改任何信信修信信

息 改 息 息

修改相关记录

（图一）

系统简介：

该系统由Vidual Foxpor6.0引导进入，主要实现学生端用户使用（包括登陆人信息查询与反馈）和教师端用户使用（包括数据管理，数据查询，统计处理，打印输出等服务。同时设置管理员登录窗口实现记录修改工作。注：学生端用户，教师端非管理员用户无权修改任何记录。）

系统模块构成

1. 数据库（sjk）包含baocuo,cj,dlxx,gz,js,kc,rk,xim,xs,zc数据库表 2. 视图：jsrk，kcccc,xscjmx,xsxxktj,视图2

3. 表单：bcxg,dljm-zjm,jsrk,jsjb,jsrkks,kcxx,rukou,xsjb,xsjb,xsxxkxx,xxcjtj,zc 4. 报表：bbxscjtj，jsrksh，zh 5. 程序：main（主引导程序）

- 3 -

Visual Foxpro 课程设计（教学管理）

系统完全介绍 1． 主引导系统

1.1主引导文件是有主程序（main.prg）引导完成。 1.1主引导文件任务，初始化运行环境启动登录引导界面。（选择教师端还是学生端）

2. 教师端登陆

2.1教师端主进入界面

登录情况系统赋予智能识别系统 1.当用户名或密码不正确时无法进入并 且弹出提示框提示错误信息。 2.当用户名和密码均正确时允许进入并 且弹出提示框提示进入成功。

2.2注册界面

“提交”CLICK代码分析：

select js &&选择当前JS数据库表 for i=1 to RECCOUNT() &&记录指针位置

if thisform.text1.value=alltrim(js.xm) if thisform.text2.value=thisform.text3.value

insert into dlxx(yhm,mima) values(thisform.text1.value,thisform.text2.value) messagebox(\注册成功，是否直接进入系统？\登录成功\ do form dljm-zjm thisform.release exit else messagebox(\两次密码输入不一致，请重新输入！\提交失败！\ thisform.text2.value=\ thisform.text3.value=\ endif else skip &&扫描整个JS数据库表，如果注册的用户不是JS表中的人不予以注册！ if eof() messagebox(\您的信息在教师数据库中为查询到，请核实！当前您无权注册！\警告！\ go top thisform.text1.value=\ thisform.text2.value=\ thisform.text3.value=\ endif endif endfor

- 4 -

Visual Foxpro 课程设计（教学管理）

Text1的 LOSTFOCUS代码 失去焦点时的代码： select dlxx &&选择记录表 for i=1 to RECCOUNT()&&指针位置 if thisform.text1.value!=dlxx.yhm skip else thisform.label7.visible=.t. messagebox(\该用户名已注册请直接登录!\提示\ thisform.label7.caption=\ go top do form dljm-zjm thisform.release exit endif endfor if eof() thisform.label7.visible=.t. thisform.label7.caption=\√用户名尚未注册！\ go top endif

Text2的 GOTFOCUS代码 获得焦点时的代码： thisform.label5.visible=.f. thisform.label6.visible=.f. thisform.command1.enabled=.t. Text3的 LOSTFOCUS代码 失去焦点时的代码： If thisform.text2.value!=thisform.text3.value thisform.label5.visible=.t. thisform.label5.caption=\×两次密码输入不一致！请重新输入！\ thisform.text2.value=\ thisform.text3.value=\ thisform.command1.enabled=.f. else thisform.label5.visible=.f. endif - 5 -

搜索“diyifanwen.net”或“第一范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读，第一范文网，提供最新工程科技VFP课程设计报告 全文阅读和word下载服务。