Question

access中有2个表：表1和表2，表1的字段为：A1饮食，B1详细；表2的字段为：A2种类，B2详细。

表1为：A1饮食 B1详细 表2为： A2种类： B2详细
食物 食物 面包
饮料 食物 香肠
饮料 可乐
饮料 牛奶
如何对表1的”B1详细“字段使用查阅向导，而且，当表1中”A1饮食“确定时（如为”食物“时），B1详细，只能从”面包“和”香肠“内进行选择（即列表框内只有“面包”和“香肠”）。而不是从”面包“，”香肠“，“可乐”，“牛奶”中选择。

Answer 1

添加combobox1,combobox2
(数据库连接 略)
dim str as string ="select A1饮食 from 表1"
rs.open (str,cn,3,1)
if rs.eof then exit sub
for i= 0 to rs.recordcount-1
combobox1.itemadd(rs.fields(0).value)
if not rs.eof then rs.movenext
next

private combobox1_dropitemclick(..) handle combobox1_click
dim item_name as string = e.clickitem.text.tostring
select B2详细 from 表2 where A2种类 like '" & item_ name & "'"
if rs.state=1 then rs.close
rs.open...
for j = 0 to ..
combobox2.itemadd()
next
end sub

不用谢！

追问

哦，这么复杂，我还是一个小小白啊~~~
我想请问一下，你说些的这些语句，都是从哪些地方学的，给我说说，给我指条道儿
Thx