组合框联动的问题

cyj759

根据网上提示，我做了一个组合框联动的小例子，想得到这样一个效果：当我选择行政村的一个村名时，自然村名会出现这个行政村所辖的自然村名。但我做了以后，在更新后事件里写如下代码：
Private Sub Combo371_AfterUpdate()
Me.Refresh
Me.Combo373.RowSource = "SELECT zrc.rID as 自然村编号, zrc.rcm as 自然村名 " _
& "FROM zrc " _
& "WHERE zrc.cID = '" & Me.Combo371.Column(0) & "'"
Debug.Print Me.Combo373.RowSource
Me.Combo373.Requery
End Sub
但不能出现我想要的结果，选择一个行政村名时，自然村名组合框内无内容

koutx

看看你zrc.cID字段中的内容吧,"WHERE zrc.cID = '" & Me.Combo371.Column(0) & "'"作条件
当然什么都不会显示了.

将zrc.cID字段中的内容改成与xzc表中cID 相对应的数据后再按以下
'Me.Refresh
Me.Combo373.RowSource = "SELECT zrc.rID as 自然村编号, zrc.rcm as 自然村名 " _
& "FROM zrc " _
& "WHERE zrc.cID = '" & Me.Combo371.Column(0) & "'"
'Debug.Print Me.Combo373.RowSource
'Me.Combo373.Requery
试试

cyj759

谢谢！问题解决了

yihesmxx

学习学习