计算机二级VFP上机考试命令速记：综合篇(4)

　　&&表单-“optiongroup1”学生信息

　　if thisform.optiongroup1.value=1

　　SELECT *;

　　FROM 学籍!学生信息;

　　INTO CURSOR aa

　　thisform.grid1.recordsource="aa"

　　endif

　　if thisform.optiongroup1.value=2

　　SELECT 课程信息.课程名称;

　　FROM 学籍!课程信息;

　　INTO CURSOR bb

　　thisform.grid1.recordsource="bb"

　　endif

　　if thisform.optiongroup1.value=3

　　SELECT 课程信息.*, 选课信息.成绩;

　　FROM 学籍!课程信息 INNER JOIN 学籍!选课信息 ;

　　ON 课程信息.课程号 = 选课信息.课程号;

　　WHERE 选课信息.成绩 >= 60;

　　INTO CURSOR cc

　　thisform.grid1.recordsource="cc"

　　endif

　　&&表单-studentform-"浏览"

　　if thisform.optiongroup1.value=1

　　SELECT Course.课程号, Course.课程名;

　　FROM school!course;

　　INTO CURSOR aa

　　thisform.grid1.recordsourcetype=1

　　thisform.grid1.recordsource="aa"

　　endif

　　if thisform.optiongroup1.value=2

　　SELECT Student.学号, Student.姓名;

　　FROM school!student;

　　INTO CURSOR bb

　　thisform.grid1.recordsourcetype=1

　　thisform.grid1.recordsource="bb"

　　endif

　　if thisform.optiongroup1.value=3

　　SELECT Student.姓名, Course.课程名 AS 课程名称, Score.成绩;

　　FROM school!course INNER JOIN school!score;

　　INNER JOIN school!student ;

　　ON Score.学号 = Student.学号 ;

　　ON Course.课程号 = Score.课程号;

　　INTO CURSOR cc

　　thisform.grid1.recordsourcetype=1

　　thisform.grid1.recordsource="cc"

　　endif

　　2011年计算机等级考试二级VFP基础教程汇总

　　2011年全国计算机等级考试二级VFP考点汇总

　　计算机等级考试二级VF八套全真预测试题及答案

　　计算机等级考试二级VFP上机操作常见错误总结