问答题
编制一个表单完成表文件“学生.dbf”、“成绩.dhf”内容的班级平均成绩查询显示功能。要求：(1)当用户在组合框输入或选择班级(学号的左3位)后，按回车键或单击“确定”按钮时，表单将自动显示对应班级的所有学生的总平均成绩；(2)单击“退出”按钮时，自动关闭表单。具体界面如下图所示。
【正确答案】
【答案解析】表单Init事件代码如下：
SET TALK OFF
INDEX ON LEFT(学号,3)TO INXH UNIQUE
SCAN
THlS. COMBO1. ADDITEM(LEFT(学号,3))
ENDSCAN
SET INDEX TO
"确定"按钮的Click事件代码如下：
SELECT成绩
AVERAGE成绩TO MCJ:
FOR LEFT(ALLTRIM(学号),3)==ALLTRIM(THISFORM. COMBO1. DISPLAYVALUE)
THISFORM. TEXTl. VALUE=MCJ
SELECT学生
"退出"按钮的Click事件代码如下：
THISFORM. RELEASE
SET TALK OFF
INDEX ON LEFT(学号,3)TO INXH UNIQUE
SCAN
THlS. COMBO1. ADDITEM(LEFT(学号,3))
ENDSCAN
SET INDEX TO
"确定"按钮的Click事件代码如下：
SELECT成绩
AVERAGE成绩TO MCJ:
FOR LEFT(ALLTRIM(学号),3)==ALLTRIM(THISFORM. COMBO1. DISPLAYVALUE)
THISFORM. TEXTl. VALUE=MCJ
SELECT学生
"退出"按钮的Click事件代码如下：
THISFORM. RELEASE