我.Requery不起作用?

时间:2015-08-04 16:07:50

标签: vba access-vba

我正在尝试根据组合框中的选择更新表单。以下是for的布局。该表单有一个组合框,其中包含一系列城市。我在此下拉列表中选择一个城市,然后单击“提交”按钮。点击提交后,下面的所有列表框都将使用该城市的地址信息进行更新。我为地址的每个部分都有一个单独的列表框。

现在,如果我执行以下操作,我可以正常工作:

"0dp"

但是,我正在寻找一种方法来执行此操作,而无需在每次添加新字段时添加Me.Address1.Requery Me.Address2.Requery Me.City.Requery 。我试过了Me.field.Requery,但这对我不起作用。

1 个答案:

答案 0 :(得分:0)

您可以尝试循环控制。如果您决定添加更多列表框,这将允许灵活性

For Each ctl In Me.Controls
Select Case ctl.ControlType
Case Case acTextBox, acComboBox, acListBox, acOptionGroup, acCheckBox 'adjust to taste

clt.requery

Case Else

End Select
Next