查询结果在表单表格中显示不出来
有学生表(学号,姓名,性别),选课表(学号,课程号),课程表(课程号,课程名)表单中有一个文本框,一个命令按钮,一个表格,在文本框内输入学号,查询学生的学号,姓名,性别,课程号,课程名,学分;并将结果显示在表格中。问题来了,表格中一直显示不出来查询结果!!
a=allt(this.text1.value)
loca for 学号=a
if found()
select distinct 学生.学号,学生.姓名,学生.性别,课程.课程号,课程.课程名,课程.学分
from 学生信息!学生inner join学生信息!选课;
inner join 学生信息!课程;
on课程.课程号=选课.课程号;
on学生.学号=选课.学号;
where学生.学号="a"
order by学生.学号;
into cursor kc
thisform.grid1.recordsource="kc"
else
messagebox("查无此人",64,"系统")
endif
thisform.refresh
请各路大神招
[ 本帖最后由 且行06 于 2015-6-9 07:20 编辑 ]