如何自动更新组合框中的内容？

wu8313

窗体中有两个组合框，都限于列表，组合框--类别的行来源为：老师;学生  ，组合框--列表的行来源为：老师1;老师2;学生1;学生2

目的：在组合框--类别中选择老师，则组合框-列表显示：老师1；老师2，在组合框--类别中选择学生，则组合框-列表显示：学生1；学生2


组合框--类别和组合框-列表是基于同一个表的两个同样数据类型--查阅字段，没有建立关系，这样可以实现吗？

[此贴子已经被作者于2004-4-19 21:00:16编辑过]

paul16

你可以设定在第一个组合框更新事件中更改第二个组合框的行来源就可以了!

ROWSOURCE

wu8313

能具体点吗？我很菜的!感谢您的关注！

[此贴子已经被作者于2004-4-14 0:47:04编辑过]

sea.er

组合框教程：
http://www.accfans.net/BBS/Announce/Announce.asp?BoardID=107&ID=105

wu8313

以下是引用paul16在2004-4-14 0:27:14的发言：
你可以设定在第一个组合框更新事件中更改第二个组合框的行来源就可以了!

ROWSOURCE

是这样吗？
private sub 类别_afterupdate()
if not isnull(类别) and 类别 <> "" then
列表.rowsource="select ..... from ... where ...."
end if
end sub
可是="select ..... from ... where ...."该怎么写呢？恳请赐教！

[此贴子已经被作者于2004-4-17 0:39:20编辑过]

Ajoe

在第二个组合框的“获得焦点事件”里用条件语句：

If Me.类别 = "老师" Then
Me.列表.Rowsource = "SELECT 某老师的字段 From 某个数据表"
ElseIf Me.类别 = "学生" Then
Me.列表.Rowsource = "SELECT 某学生的字段 From 某个数据表"
End If

[此贴子已经被作者于2004-4-17 12:01:02编辑过]

wu8313

问题已经解决，感谢各位网友的指点，我重新加入两段组合框自动伸展的代码，因为我的初衷是让组合框在窗体添加记录是实现上述效果的。另外，我想让窗体在更新记录时也能实现上述效果，恳请大家指点。
新的库放在顶楼！

[此贴子已经被作者于2004-4-23 14:52:02编辑过]

wu8313

怎么没人？我只好自己顶一下啦！我可能没有说清楚吧？我的这个窗体在添加数据模式下，完全可以实现分级组合框的，我目前是希望在窗体的编辑模式下，也可以实现分级组合框。

[此贴子已经被作者于2004-4-23 14:59:43编辑过]

xialin

我已经下了，你的问题也是我一直想解决的问题，这个功能在EXCEL中很容易就实现，用数据有限性就可以。

随便问一个非常初级的问题：为什么在设计模式下只有一行，而在视图模式下却是一条记录一行？是设置哪个参数实现的？

wu8313

以下是引用xialin在2004-4-23 15:25:03的发言：
我已经下了，你的问题也是我一直想解决的问题，这个功能在EXCEL中很容易就实现，用数据有限性就可以。

随便问一个非常初级的问题：为什么在设计模式下只有一行，而在视图模式下却是一条记录一行？是设置哪个参数实现的？

没有设置任何参数。至于视图模式下却是一条记录一行，那是指窗体的数据表视图，窗体视图有三种，单一窗体，连续窗体，数据表窗体。