1) I'm trying to cycle through all the TextBoxes in my form. This does not seem to work. Where did I go wrong?

Dim mtxt as TextBox
For Each mtxt In Me.Controls
mtxt.Enabled = True
Next mtxt


2) I'm having trouble figuring out the ADO find function:
Find (criteria, SkipRows, searchDirection, start)

I more or less worked out criteria, but can someone please give me an example of how to use the other parameters? I can't seem to find one anywhere. My code as it stands:

Private Sub cboAgentCode_Change()
On Error GoTo NotFoundErr
Dim x As String
x = "intAgentCode = " & cboAgentCode.Text
datAgent.Recordset.Find (x)

Exit Sub
NotFoundErr:
MsgBox Err.Description
End Sub

Problem is, it works just fine if I cycle through the recordset using the ADO control itself. However, if I were to use the ComboBox to select a record which is earlier than the current record, an error would occur, I'm guessing because at the moment, it only searches one way.