以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。