Question

VFP中在一个列表框中选择系名，在另一个列表框中出现专业名称，是怎么实现的，请大侠门帮帮我啊

问题如图

Answer 1

计算机应用系为list1,网络安全为list2，如果系名和专业是在一个表中tempp.系名tempp.专业名称，那么可以这样list1的rowsourcetype置成“select语句”，rowsource的值为“select DISTINCT tempp.系名 order by tempp.系名 from tempp INTO CURSOR NOCONSOLE”，在list1.的interactivechange事件中直接刷新list2的字段（当然list2 的rowsourcetype置成“select语句”），thisform.list2.rowsource="select DISTINCT tempp.专业名称 where alltrim(tempp.系名)=alltrim(this.value) order by tempp.专业名称 from tempp INTO CURSOR NOCONSOLE"
thisform.list2.requery

追问

两个在不同的表中，要怎么弄呢

追答

稍微变通下吧，呵呵，计算机应用系为list1,网络安全为list2，如果系名和专业不在一个表中tempp1.系名，tempp2表中肯定得有和tempp1.系名一样的字段，即至少包含tempp2.系名和tempp2.专业名称，那么可以这样list1的rowsource的值为“select DISTINCT tempp1.系名 order by tempp1.系名 from tempp1 INTO CURSOR NOCONSOLE”，在list1.的interactivechange事件中直接刷新list2的字段（当然list2 的rowsourcetype置成“select语句”），thisform.list2.rowsource="select DISTINCT tempp2.专业名称 where alltrim(tempp2.系名)=alltrim(this.value) order by tempp2.专业名称 from tempp2 INTO CURSOR NOCONSOLE"
thisform.list2.requery
这是其中一个情况，这得看实际情况，你说的不是很清楚，比如tempp1中系名这个字段的值是否唯一，如果唯一，不必把list1的rowsourcetype置成“select语句”，直接设置成“字段”就行啦