够详细了吧。
Dim ctl As Access.Control '定义一个控件变量
Dim i '假设有10个文本框
i = 0
For Each ctl In Me.Form.Controls '在窗体中遍历控件
If ctl.ControlType = 109 Then '如果控件类型为文本框（109代表文本框）
MsgBox ctl.Name & "=" & ctl '跳出该文本框的名字以及内容。你可以根据你的需要，在这里写你需要的代码。
'_____________________下面这段代码时模拟你打算把指定文本框清空或者更改为你想要的结果_____________________________________________________
Do Until i > 10 '假设你有10个文本框，文本框的名字前缀相同，后面用不同数字
If ctl.Name = "Text" & i Then 'Text是你文本框的前缀，后面的i代表你文本框后面的数字，比如你的aa1和ff1
ctl = Null
MsgBox "已清空"
ctl = "xxx"
MsgBox "已改为xxx"
End If
i = i + 1
Loop
End If
'________________________上面这段代码时模拟你打算把指定文本框清空或者更改为你想要的结果_____________________________________________________
i = 0
Next
