tion设置为: 欢迎进入四级成绩查询系统,并设 置相应的字体、 字号和颜色。
4.1.2代码
设计 ? 名称,年 Page 6 of 11
课题名称 《VFP设计报告》
表单的Destroy事件代码:RELEASE MENU 四级系统菜单 EXTENDED
表单的Init事件代码:do 四级系统菜单.mpr with this
4.1.3菜单设计
按照系统功能结构图设计菜单。
在VFP系统主菜单的“显示”菜单下,选择“常规选项”命令,在弹出的 对话框中,勾选顶层表单选项,将该菜单设置为顶层表单菜单。
4.2考生准考证号录入
4.2.1控件属性设置
标签:Lb1 欢迎进入四级成绩
查询系统
? 名称,年
标题:Caption 设置为:欢迎进入
Page 7 of 11
课题名称 《VFP设计报告》
四级成绩查询系统
Lb2准考证号 标题:Caption 设置为:准考证号
label2标签无标题,程序运行时,根据文本框的内容显示标题信息。
文本框:Text1准考证号 接收由键盘输入的数据
命令按钮:command1 标题:caption 设置为:查询
Command2 标题:caption 设置为:退出
计时器:timer1 Interval 设置为:200
表格:显示结果
4.2.2代码设计
命令按钮command1的Click事件代码:
set safety off
select 考生表.准考证号,考生表.,考生表.性别,考生表.分院,四级成绩 表.成绩 from 考生表,四级成绩表;
where 考生表.准考证号=四级成绩表.准考证号 and alltrim(考生表.准 考证号)=alltrim(thisform.text1.value);
into table cxb
thisform.grid1.recordsource='cxb'
thisform.refresh
set safety on
命令按钮command2的Click事件代码:
Thisform.release
表单的Timer1的Timer事件代码:
if thisform.label1.left+thisform.label1.width<0
thisform.label1.left=thisform.width
else
thisform.label1.left=thisform.label1.left-10
Endif
4.3考生信息修改
考生信息修改表单设计:
按修改数据,考生由键盘输入,当控制交点离开文本框时,在表 格中显示要修改的数据记录。考生用鼠标、键盘对数据记录进行修改。
? 名称,年
Page 8 of 11
课题名称 《VFP设计报告》
4.3.1控件属性设置
标签:label1 标题:caption 设置为:
文本框:text1 接收由键盘输入的数据
命令按钮:command1 标题:caption 设置为:退出
Command2 标题:caption 设置为:修改
表格:显示要修改的记录
4.3.2代码设计
命令按钮command1的Click事件代码:
Thisform.release
命令按钮command2的Click事件代码:
set safety off
select * from 考生表;
where alltrim(考生表.)=alltrim(thisform.text1.value);
into table cxb1
thisform.grid1.recordsource='cxb1'
thisform.refresh
set safety on
文本框txt成绩的LostFocus事件代码:
set filter to alltrim()=alltrim(thisform.text1.value)
4.4打印四级成绩单设计
? 名称,年
Page 9 of 11
课题名称 《VFP设计报告》
4.4.1报表文件设计
数据源为:四级成绩表.dbf
可用字段为该表的所有字段,样式为简报式,字段布局为列,方向为纵向, 按成绩降序,报表标题为四级成绩一览表,保存四级成绩一览表
在运行结果如下:
第5章 系统实现
5.1功能
1.四级成绩查询功能:为了方便考生查找自己的四级成绩等信息, 将所有信息 按照需要进行分类。这样学生就能很方便的找到自己需要的信息。
2.保密功能: 考生可以通过填写表格的形式输入自己的准考证号来查找自己的 成绩。 系统可以自动避免泄露其他考生的信息, 还给查询自己成绩的考生保密 成绩。3.修改功能:考生可以对数据库中的信息进行修改。系统能够通过管理 员给出的条件查找出所要修改的信息, 对修改后的信息进行保存, 并自动查找 是否是重复信息。
4.删除功能: 管理员可以对数据进行删除操作。系统能够通过管理员给出的条 件查找出要删除的信息,并提示是否确定删除,如果确定删除,则把相关信息 从数据库中删除掉。
5.管理员查询功能: