程序如下:
clear
accept "请输入查找的学号:" to xh
select * from 学生表 where 学号=xh
if _tally>0 then &&找到学生
select a.学号,课程名,成绩,学分 from 学生表 a,课程表 b,成绩表 c ;
where a.学号=c.学号 and b.课程号=c.课程号 and a.学号=xh ;
into table test
else
? "查无此学生信息!"
endif
return
这个问题你发了两次啊