综合应用题（1小题，计30分）在考生文件夹下有学生管理数据库books，数据库中有score表（学号、物理、高数、英语和学分查询表结构），其中前4项已有数据。请编写符合下列要求的程序并运行程序：设计一个名为myform的表单，表单中有两个命令按钮，按钮的名称分别为cmdyes和cmdno，标题分别为"计算"和"关闭"。程序运行时，单击"计算"按钮应完成下列操作：1）计算每一个学生的总学分并存入对应的学分字段。学分的计算方法是：物理60分以上 （包括60分）2学分，否则0分；高数60分以上（包括60分）3学分，否则0分；英语60分以上（包括60分）4学分，否则0分。2）根据上面的计算结果，生成一个新的表xf（要求表结构的字段类型与score表对应字段的类型一致），并且按学分升序排序，如果学分相等，则按学号降序排序。单击"退出"菜单项，程序终止运行。
参考答案：在命令窗口输入命令：CREATE FORM myform，打开表单设计器；单击表单控件工具栏上的"命令按钮"控件图标，向表单添加两个命令按钮，选中第一个命令按钮（commandA），在属性对话框中将命令按钮的Name属性值修改为"cmdyes"，将Caption属性值修改为"计算"，如图G-D所示。以同样的方法，将第二个命令按钮（commandB）的Name属性值修改为"cmdno"，将Caption属性值修改为"关闭"。 [H}双击命令按钮cmdyes（计算），在Click事件代码中编写如下程序段：*******"计算"命令按钮的Click事件代码*******SET TALK OFFUSE scoreREPLACE ALL 学分 WITH 0GO TOPDO WHILE .NOT. EOF() IF 物理>=F0 THEN REPLACE 学分 WITH 学分+B ENDIF IF 高数>=F0 THEN REPLACE 学分 WITH 学分+C ENDIF IF 英语>=F0 THEN REPLACE 学分 WITH 学分+D ENDIF SKIPENDDOSORT ON 学分,学号/d TO xfSET TALK ON**********************************************双击命令按钮cmdno（关闭），在Click事件代码中编写如下程序段：********"关闭"命令按钮的Click事件代码*******ThisForm.Release**********************************************保存表单，在命令窗口输入命令：DO FORM myform。在运行的表单界面中单击"计算"命令按钮，系统将计算结果自动保存到新表xf中。
解析：本大题考查的主要是通过对表单控件编写事件代码，来完成数据的查询操作，一般来说命令按钮的单击事件代码是存放在Click事件中，控件属性修改可以在属性对话框中完成，对于程序设计部分，可以通过Do While…Enddo循环来依次判断数据表中的每条记录，然后通过条件语句进行分类统计。