综合实验报告格式VF牛世杰Word文档下载推荐.docx

综合实验报告格式VF牛世杰Word文档下载推荐.docx

《综合实验报告格式VF牛世杰Word文档下载推荐.docx》由会员分享，可在线阅读，更多相关《综合实验报告格式VF牛世杰Word文档下载推荐.docx（17页珍藏版）》请在冰豆网上搜索。

实验题目

学生信息管理系统的设计与实现

一、实验目的

1、掌握应用程序设计规划的基本方法；

2、掌握使用VFP设计简单的查询系统；

3、掌握数据表的建立，及表单控件与数据源的连接方法；

4、掌握查询、修改、添加、删除记录的基本实现方法

二、设备与环境

PC兼容机、Windows系列操作系统、VisualFoxPro数据库编程环境

三、实验内容

以及启动界面、登陆界面、系统主界面、确认窗口、学生信息管理表单、课程信息管理表单、学生选课信息管理表单、综合消息表单、考试证打印预览页面、关于系统表单

四、实验结果及分析

<

启动界面>

>

时钟控件的Timer事件代码：

Thisform.release

Doformlogin.scx

登陆界面>

“进入系统”的click事件代码

setexacton

i=i+1

selectpasswd

locateforalltrim（用户名）=alltrim（bo1.value）

iffound（）andalltrim（密码）=alltrim（thisform.text1.value）

setexactoff

releasethisform

doformmain

else

ifi<

3

messagebox（"

帐号或密码错误,请重试!

"

48,"

警告"

）

bo1.value="

thisform.text1.value="

bo1.setfocus

else

非法用户,系统无法启动!

16,"

）

endif

endif

“退出系统”的click事件代码

yn=messagebox（"

确定退出?

4+32,"

信息窗口"

ifyn=6

thisform.release

clearevents

quit

endif

数据环境

passed

系统主界面>

“主界面”的init事件代码：

domenu_sys.prgwiththis,.T.

系统>

退出程序代码:

a=messagebox（"

确认退出系统吗？

1+32+0,"

确认窗口"

docase

casea=1

casea=2

waitclear

endcase

学生基本信息查询>

课程信息查询>

Click事件代码：

*click事件代码

ifeof（）=.t.

已经到最后一条记录!

skip

thisform.refresh

rightclick事件代码：

ifbof（）=.t.

已经到第一条记录!

skip-1

选课信息查询>

综合信息浏览>

显示删除标记列复选框InteractiveChange的事件代码：

ifthisform.pageframe1.page1.grid1.deletemark=.F.

thisform.pageframe1.page1.grid1.deletemark=.T.

thisform.pageframe1.page1.grid1.deletemark=.F.

编辑信息复选框InteractiveChange的事件代码：

ifthisform.pageframe1.page1.grid1.readonly=.F.

thisform.pageframe1.page1.grid1.readonly=.T.

thisform.pageframe1.page1.grid1.readonly=.F.

自定义界面>

查找命令按钮的Click事件代码：

Context=alltrim（thisform..text1.value）

Docase

Casethisform.optiongroup1.value=1

Setfilterto学号=context

Casethisform.optiongroup1.value=2

Setfilterto姓名=context

Casethisform.optiongroup1.value=3

Setfilterto性别=context

Casethisform.optiongroup1.value=4

Setfilterto籍贯=context

Casethisform.optiongroup1.value=5

Setfilterto所在系=context

学生信息管理>

课程信息管理>

选课信息管理>

考试证打印预览>

课程打印预览>

关于系统>

“超链接”的click代码：

thisform.hyperlink1.navigateto（"

Timer的timer事件代码：

ifthisform.label1.left+thisform.label1.width<

thisform.label1.left=thisform.width

thisform.label1.left=thisform.label1.left-10

教师评价

评定项目

A

B

C

D

算法正确

界面美观，布局合理

程序结构合理

操作熟练

语法、语义正确

解析完整

实验结果正确

文字流畅

报告规范

题解正确

其他：

评价教师签名：

年月日