中国商务办公文档载基: httpwwwword98com
╔╗
┆项目方案 调查报告 研分析 广告策划 案例分析┆
┆商业计划 项目理 电子商务 财税理 法律文书┆
┆战略理 企业文化 行政理 力资源 理制度┆
┆合文 简历 年终总结 公文写作 视频讲座┆
╚╝
中国文案:wwwword98com 中国商务办公文案载基
娱乐中国:wwwmv99com vmv99com 免费电影载 线电影观
办公休闲游戏:www163173com 超FLASH游戏免费玩
文案正文:
Visual FoxPro 课程设计实验报告
——学生信息理系统
国贸2班
200204074224
佘楷
设计题目
学生信息理系统
二开发软件
VFP60
三课题求
(1) 掌握课堂讲授基数库知识VFP基技巧:
1 数库理系统合数库应系统
2 VFP界面组成操作
3 VFP工作方式
4 标基操作(表建立修改表达式维护命令)
5 表查询统计(排序索引SELECTSQL查询数库视图)
6 程序设计初步(程序文件程序控制模块程序)
(2) 学部分书关VFP容:
1 菜单设计
2 表单设计
3 表单控件设计
4 实例:汽车修理理系统开发
(3) 求够独立设计完成简单学生信息理系统系统必须基功:
1 数查询
2 记录增加删修改等功
3 系统界面良
4 操作方便运行稳定
四目
掌握基数库知识熟悉VFP学VFP数库应系统开发般步骤:
1 需求分析
2 数库设计
3 应程序设计
4 软件运行测试
通简单系统设计开发激发学生学兴趣动手力
五设计时间
第12周——第19周
六设计流程
流程图:
户登陆
logoscx
理员
登陆
普通户
登陆
选择户类型
查询
维护
退出
统计
退出
查询
统计
成绩信息
课程信息
学生信息
成绩信息
课程信息
学生信息
统计
课程统计
成绩信息
课程信息
学生信息
课程统计
统计
(1) 数库设计
根系统需建立数库sexxdbdbc数库中数表:studentdbfcoursedbfscoredbfpassworddbfpasswordmdbf
studentdbf记录学生信息:学号姓名性民族出生日期专业籍贯
Coursedbf记录关课程信息:课程编号课程名称学分课老师
Scoredbf记录学科目考试成绩容:课程编号课程名称学号成绩
Passworddbf记录系统普通户户名密码
Passwordmdbf记录系统理员户名密码
(2) 应程序设计
系统户登陆理员登陆时系统功普通户登陆时系统时法系统维护功面表单功作简述:
1 户登录
先选择户类型:普通户理员输入密码确定键进入(重写键重新填写退出键退出系统)代码:
optiongroup1click事件:
do case
case thisvalue0
thisformcombo1rowsource
case thisvalue1
thisformcombo1rowsourcepassword户名
case thisvalue2
thisformcombo1rowsourcepasswordm理员
endcase
确定键command1click事件:
public guest
private Password1
do case
case thisformoptiongroup1value1
select password
password1alltrim(thisformtext1value)
locate for alltrim(户名)alltrim(thisformcombo1value)
if found() and password1alltrim(密码)
guest2
thisformrelease
do form mainscx
else
messagebox(户名密码错误请重新输入)
thisformtext1setfocus
endif
case thisformoptiongroup1value2
select passwordm
password1alltrim(thisformtext1value)
locate for alltrim(理员)alltrim(thisformcombo1value)
if found() and password1alltrim(密码)
guest1
thisformrelease
do form mainscx
else
messagebox(户名密码错误请重新输入)
thisformtext1setfocus
endif
endcase
代码中定义公变量guest判断户类型确定进入系统界面维护键否
重写键command2click事件:
thisformcombo1value
thisformtext1value
thisformtext1setfocus
退出键command3click事件:
thisformrelease
2 系统界面
者普通户时系统界面中维护键
理员登陆时维护键
维护键否通formactivate实现:
if guest1
thisformCommand2enabledt
else
thisformCommand2enabledf
endif
查询维护统计退出键click代码分:
do form chaxunscx
do form weihuscx
do form statisticscx
thisformrelease
do form logo
3 查询界面
户查询学生信息课程信息成绩信息
查询学生信息时确定键代码:
thisformpageframe1page1grid1recordsource
XHalltrim(thisformpageframe1page1text1value)
thisformpageframe1page1grid1recordsourceselect student学号 student姓名 student性 student民族 student出生日期 student专业 student籍贯 from student where alltrim(学号)XH or alltrim(姓名)XH into cursor temp
thisformpageframe1page1text1value
查询课程信息时代码:
kcmcalltrim(thisformpageframe1page2text1value)
thisformpageframe1page2grid1recordsourceselect course课程编号 course课程名称 course学分 course课老师 from course where alltrim(课程名称)kcmc or alltrim(课程编号)kcmc into cursor temp
thisformpageframe1page2text1value
查询成绩信息时代码:
xhalltrim(thisformpageframe1page3text1value)
thisformpageframe1page3grid1recordsourceselect student学号student姓名course课程名称score成绩 from studentcoursescore where alltrim(score学号)xh and alltrim(student学号)alltrim(score学号) and alltrim(course课程编号)alltrim(score课程编号) into cursor temp
thisformpageframe1page3text1value
4 维护界面
理员进入界面
进入界面选择组合框里项查询项数修改进行修改键进行修改修改确定键确认修改退出键退出界面
界面中optiongroup1click事件代码:
do case
case thisformoptiongroup1option1value1
thisformgrid1recordsourcestudent
thisformgrid1refresh
case thisformoptiongroup1option2value1
thisformgrid1recordsourcecourse
thisformgrid1refresh
case thisformoptiongroup1option3value1
thisformgrid1recordsourcescore
thisformgrid1refresh
endcase
thisformcommand1enabledt
thisformcommand2enabledt
thisformcommand3enabledt
进行修改键click代码:
thisformgrid1enabledt
thisformgrid1readonlyf
thisformgrid1allowaddnewt
thisformgrid1setfocus
thisformcommand1enabledf
确定键click代码:
use
thisformgrid1enabledt
thisformgrid1allowaddnewf
thisformgrid1readonlyt
&&thisformgrid1recordsource
thisformgrid1refresh
thisformcommand1enabledt
thisformcommand2enabledf
thisformcommand3enabledf
5 统计界面
通选择组合框中选项统计成绩某课程成绩
界面中optiongroup1click事件代码:
Do case
Case thisvalue0
Thisformcombo1rowsource
Case thisvalue1
Thisformcombo1rowsourcestudent学号
Case thisvalue2
Thisformcombo1rowsourcecourse课程名称
Endcase
确定键click代码:
do case
case thisformoptiongroup1value1
xhalltrim(thisformcombo1value)
select score
calculate max(成绩)min(成绩)avg(成绩)cnt()
for 学号xh to a1a2a3a4
&&显示统计结果
Thisformtext1valuealltrim(str(a1))
Thisformtext2valuealltrim(str(a2))
Thisformtext3valuealltrim(str(a3))
Thisformtext4valuealltrim(str(a4))
Case thisformoptiongroup1value2
Kcmcalltrim(thisformcombo1value)
Select course
Locate for 课程名称kcmc
Select score
Calculate max(成绩)min(成绩)avg(成绩)cnt()
For 课程名称kcmc to a1a2a3a4
&&显示统计结果
Thisformtext1valuealltrim(str(a1))
Thisformtext2valuealltrim(str(a2))
Thisformtext3valuealltrim(str(a3))
Thisformtext4valuealltrim(str(a4))
Endcase
(3) 程序测试
登陆系统选择选项钮组中普通户组合框中选择户( 王仪登陆密码111111)查否登陆相方法查理员选项查重写退出钮否效
进入系统界面查维护键否(户理员时)点击查询键进入查询界面点击页框学生信息项文框中输入学号姓名(1王仪)单击确定查列表框中否显示相应信息方法查课程信息成绩信息然单击退出
点击统计进入统计界面选择选项钮组中统计选项组合框中选择学号(1)单击确定查右侧文框中数否正确相方法检查课程统计选项然单击退出
点击维护(户理员时)选择选项钮组中学生信息选项然单击列表检查否修改(正常应法修改)然单击进行修改钮检查列表否修改(正常应修改)单击确定确认修改查列表否修改(正常应法修改)方法检查课程信息成绩信息选项
七系统实现功
查询统计维护(添加删修改)
八设计中遇问题解决方法
问题:代码编写问题数表关联数环境
解决方法:注意中英文输入法切换注意索引设置添加数表
九心体会
符号输入中文输入法
出现错误时挂起查代码处发生错误查控件属性
十系统需改善处改善方法构思
该系统较简单功较少
添加报表功户注册功修改密码功
菜单
文档香网(httpswwwxiangdangnet)户传
《香当网》用户分享的内容,不代表《香当网》观点或立场,请自行判断内容的真实性和可靠性!
该内容是文档的文本内容,更好的格式请下载文档