&&表單-“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
相關推薦:北京 | 天津 | 上海 | 江蘇 | 山東 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
廣東 | 河北 | 湖南 | 廣西 | 河南 |
海南 | 湖北 | 四川 | 重慶 | 云南 |
貴州 | 西藏 | 新疆 | 陜西 | 山西 |
寧夏 | 甘肅 | 青海 | 遼寧 | 吉林 |
黑龍江 | 內(nèi)蒙古 |