使用VBA强制组合框列表更新

时间:2015-05-22 11:51:16

标签: vba combobox access-vba ms-access-2010

我正在使用MS Access表单。我试图在表单上有一个组合框,根据表单中较早的信息缩小列表。我在数据库中保存了一个查询,可以正确获取列表。

我遇到的问题是每次更新表单后都不会调用查询,因此组合框的列表始终是打开表单时的列表。

我尝试在前一个控件的Me.MyComboBox.Requery事件中使用AfterUpdate强制更新,但这只会重新查询该表的记录源,而不是组合框的行源。

我还尝试更改行源属性以强制重新查询,但这不起作用:

    Private Sub PreviusControl_AfterUpdate()
        Me.MyComboBox.RowSourceType = "Table/Query"
        Me.MyComboBox.RowSource = "qryDynamicComboSource"
    End Sub

提前致谢!

1 个答案:

答案 0 :(得分:0)

看起来你所做的一切都是正确的。检查您的查询设计是否实际根据您的参数进行更改。