Question

VFP 命令按钮click 代码

THISFORM.Grid1.RECORDSOURCE =;
"SELECT KC.课程号,KC.课程名,cj.成绩;
FROM 学生 xs,课程 kc,成绩 cj ;
where xs.学号=cj.学号 and kc.课程号=cj.课程号 and xs.姓名=cName;
ORDER BY CJ.课程号 into cursor cjb"
输入后没显示数据

• 你的回答被采纳后将获得：
• 系统奖励15（财富值+成长值）+难题奖励10（财富值+成长值）+提问者悬赏5（财富值+成长值）

Answer 1

正确代码：
SELECT KC.课程号,KC.课程名,cj.成绩 ;
FROM 学生 xs,课程 kc,成绩 cj ;
where xs.学号=cj.学号 and kc.课程号=cj.课程号 and xs.姓名=cName ;
ORDER BY CJ.课程号 into cursor cjb &&生成临时表
thisform.Grid1.RecordSourceType = 1 &&指定表格数据源类型为数据表
thisform.Grid1.RecordSource ="cjb" &&指定表格的数据源为cjb