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

Question

我的主窗体上有一个按钮，它将连续子窗体中的所有控件标记为＆＃34;是＆＃34;但是它只更改连续窗体中的第一条记录。第二，第三等记录不会改变。我找到了answer using DAO recordsets，但我使用的组合框是未绑定的。

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

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。