编辑Access 2013连续表单中的所有控件

Question

我有一个按钮在我的主表单标记所有控件在一个连续子表单为"是"，但它只改变连续表单中的第一个记录。第二、第三等记录不会改变。我找到了一个使用DAO记录集的答案，但我使用的组合框是未绑定的。

这是我的代码。它修改子表单中第一条记录中的所有组合框。

For Each ctl In Me![SubformName].Controls
    If ctl.ControlType = acComboBox Then
        If ctl.Name <> "Yes" Then
            ctl.Value = "Yes"
        End If
    End If
Next ctl

我在我的代码中做了什么改变来允许我修改第一个记录之后的记录?是否有办法直接参考连续形式的记录?

编辑添加:

我仍然不能让它在未绑定的组合框中工作，但是下面的代码可以在绑定的组合框中工作。

Set rst = Me.SubformName.Form.RecordsetClone
rst.MoveFirst
Do While rst.EOF = False
    rst.Edit
    rst!FieldName = "Yes"
    rst.Update
rst.MoveNext
Loop

Answer 1

打开子表单控件的RecordsetClone

循环此操作，并为每个记录设置绑定到组合框的字段的值为True。