帮助编一个表单表格的程序
设有两个数据表:导师表(文件名为:DSB.DBF)(导师编号/C,姓名/C,性别/C,研究方向/C);学生表(文件名为:XSB.DBF)(学号/C,姓名/C,性别/C,所在院系/C,导师编号/C)。设计如图11所示表单,组合框COMBO1与导师表中的导师编号字段绑定。表单运行后,在组合框COMBO1中选择任一位导师的编号,则
(1)在标签LABEL3处显示该导师的姓名;
(2)在标签LABEL5处显示该导师的研究方向;
(3)在表格GRID1控件中显示该导师所指导的学生信息(包括学号、学生姓名、性别、所在院系)。
请编写组合框COMBO1的INTERACTIVECHANGE事件代码实现以上查询功能。
我是这样写的,运行正常
数据环境设为导师表
表单的init事件:thisform.grid1.recordsource="" & 此处运行时总是自动显示导师表的全部字段,为什么?
combo1的INTERACTIVECHANGE代码:
LOCATE FOR 导师编号=THIS.VALUE
THISFORM.LABEL3.CAPTION=姓名 &&运行正常
THISFORM.LABEL5.CAPTION=研究方向 &&运行正常
THISFORM.GRID1.RECORDSOURCEtype=4
THISFORM.GRID1.RECORDSOURCE="SELECT 学号,姓名,性别,所在院系 FROM 学生 WHERE 导师编号=THIS.VALUE"
THISFORM.REFRESH
若改成这样:表格怎么就显示不出来了,有什么问题吗?
SELECT 学号,姓名,所在院系 FROM 学生 WHERE 导师编号=THIS.VALUE into cursor ss
THISFORM.GRID1.RECORDSOURCE="ss"
THISFORM.GRID1.RECORDSOURCEtype=4
[ 本帖最后由 taiyanghua 于 2015-1-7 16:35 编辑 ]