最近我在试做一个小程序,在form1上,有两个控件,combo1,combo2,数据环境为两个表,部门信息,员工信息,

我的目的是combo1显示部门信息表中的部门字段,combo2显示当员工信息表中的部门字段与combo1值相等时的员工信息表中的所有员工姓名

我尝试做了一下,combo2刚开始时显示正确,随后报错,显示不能选定temp1表,我想可能是临时表已经存在的原故,再次操作时就有可能报错,我尝试将临时表关闭,则一开始就会报错,请各位大侠帮忙,不胜感激!

附相关代码

combo1的属性 rowsource="部门信息.部门",rowsourcetype=6

combo2的gotfocus 代码为:

IF !EMPTY(thisform.combo1.Value)
SELECT 300
SELECT 员工姓名 FROM 员工信息 WHERE ALLTRIM(员工信息.部门)=ALLTRIM(thisform.combo1.Value) INTO CURSOR tmp1
thisform.combo2.RowSource="tmp1"
thisform.combo2.RowSourceType= 6

ELSE
MESSAGEBOX("请选择部门",48,"提醒")
ENDIF

非常感谢Tiger5392的帮助,这一是我在网上获得的第一个帮助,我感到非常的荣幸
我做了一个小小的修改,请批评指正
combo2.lostfocus
thisform.combo2.clear

这样可以避免重复给combo2增加数据

我按照您的设计去做了,但现在又出现了一个新的问题,我在把combo2值添加入另一表时,第一个值会添加正确,但在选取第二个值以后的项时,添加入另一个表时,却显示空值,这是为什么呢?

后来我又检查了一遍,是我的错,combo2有一处代码未删除,您的程序没问题,谢了