![](/img/trans.png)
[英]How to loop through all controls in a form, including controls in a subform - Access 2013
[英]Edit all controls in an Access 2013 continuous form
我在主窗體上有一個按鈕,用於將連續子窗體中的所有控件標記為“是”,但是它僅更改連續窗體中的第一條記錄。 第二,第三等記錄不會更改。 我使用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
打開子窗體控件的RecordsetClone 。
循環遍歷,對於每個記錄,將綁定到組合框的字段的值設置為True。
聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.