通过比较另一个列表框值来填充列表框

时间:2013-09-16 08:16:28

标签: vba ms-access access-vba

如何使用anohter列表框中的选定行填充列表框。我使用以下代码来比较两个列表框的标准。但我还没有成功。

  forms![HHRRR]![List0].[ListIndex](0)

请帮助。

由于

1 个答案:

答案 0 :(得分:0)

每次我做过这个,我都使用RowSource作为列表框,在第一个列表框的OnChange事件中,我构造了一个SQL字符串并更新了第二个列表框的RowSource。类似的东西:

sSQL = "SELECT * FROM MyTable WHERE MyField = " & forms![HHRRR]![List0].Text & ""
Me.Listbox2.RowSource = sSQL
Me.Listbox2.Requery

这完全是“空中代码”,可能需要稍微调整,但你明白了。