学生成绩管理数据库中包含:学生信息表studtab.dbf、课程表coursetab.dbf、成绩表scoretab.dbf.他们的结构如下:
在VFP中,学生成绩分类排列表单如图3所示,在进入表单时,上述数据库中的三个数据表均已被打开,各数据表名分别设定为其别名。在表单的表格控件中显示学生相关信息,该表格的Name属性为Gridl,数据源为--临时表tempscore(sn,sname,cname,scores,major),其数据来自于对上述三表分类排到的结果。表单中,选项按钮组的Name属性为Opgl,包括4个选项按钮,它们的Caption属性依次为"学号"、"课程"、"专业"和"成绩"。打印按钮的Name为
Command1. 1
在下列有关代码程序的空白处填入正确内容并回答问题。
①在表单的"Init"事件中写入如下代码:
SELECT scoretab.sno,sname,cname,scores,major;
FROM ();
WHERE studtab.sno=scoretab.sno AND scoretab.cno=coursetab.cno;
INTO CURSOR tempscore
ThisForm.Grid1.RecordSource="tempscore"
G0 T0P
ThisForm.Refresh
IF RECOUNT()=0
ThisForm.Command1.Enabled=.F.
ThisForm.Opg1.Enabled=.F.
ENDIF
2.表单中的选项按钮组Opg1控件用于设置排序的项目,其"Click"事件代码如下:
SELECT tempscore
sel=()
D0 CASE
CASE sel=1
INDEX ON sno TO tempxh
CASE sel=2
INDEX ON cname TO tempkc
CASE sel=3
INDEX ON major TO tempbh
CASE sel=4
INDEX ON () TO tempfs
ENDCASE
ThisForm.Grid1.RecordSource="tempscore"
ThisForm.Grid1.Column1.Header1.Caption="学号"
ThisForm.Grid1Column2.Header1.Caption="姓名"
ThisForm.Grid1.Column3.Header1.Caption="课程名"
ThisForm.Grid1.Column4.Header1.Caption="成绩"
ThisForm.Grid1.Column5.Header1.Caption="专业"
GO TOP
ThisForm.Refresh
回答下列问题:
.CASE中,命令语句INDEX的功能是对当前数据表建立()(备注/索引)文件。
.代码中的ThisForm.Refresh语句的作用为()
参考答案:studtab, coursetab, scoretab;ThisForm.OpgA.Value;scores;索引文件