【正确答案】正确答案:【操作步骤】 步骤1:单击常用工具栏中的"新建"按钮,文件类型选择"表单",打开表单设计器。单击工具栏上"保存"按钮,在弹出"保存"对话框中输入"form"即可。 步骤2:在"表单设计器"中,在"属性"的Caption处输入"录取研究生"。 步骤3:在"表单设计器"中,添加两个命令按钮,在第1个命令按钮"属性"窗口的Caption处输入"录取",在第2个命令按钮"属性"窗口的Caption处输入"退出"。 步骤4:在"表单设计器"中,双击录取命令按钮,在"Command1.Click"编辑窗口中输入下列命令语句,接着关闭编辑窗口。输入语句如下。 close all CREATE TABLE test (考生号 C(4), 政治成绩 N(5,1), 外语成绩 N(5,1), 高数成绩 N(5,1), 专业课成绩 N(5,1), 总成绩 N(5,1)) use select 2 use test select 1 use kscjb do while .not.eof() select test locate for 考生号=kscjb->考生号 if not found() then append blank replace 考生号 with kscjb->考生号 endif do case case kscjb->考试科目="101" replace 政治成绩 with kscjb->成绩 case kscjb->考试科目="102" replace 外语成绩 with kscjb->成绩 case kscjb->考试科目="103" replace 高数成绩 with kscjb->成绩 case kscjb->考试科目="104" replace 专业课成绩 with kscjb->成绩 endcase select kscjb skip enddo close all update test set 总成绩=政治成绩+外语成绩+高数成绩+专业课成绩 SELECT Ksb.考生号, Ksb.姓名, Ksb.性别, Ksb.单位, Test.政治成绩,; Test.外语成绩, Test.高数成绩, Test.专业课成绩, Test.总成绩; FROM sdb!ksb INNER JOIN test ON Ksb.考生号 = Test.考生号; WHERE Test.总成绩 >= 330; ORDER BY Test.总成绩 DESC; INTO TABLE four 步骤5:在"表单设计器"中,双击退出命令按钮,在"Command2.Click"编辑窗口中输入"Thisform. Release",接着关闭编辑窗口。
【答案解析】