You're may want to go through the Form Controls:
For Each cntl In MyForm.Controls
If InStr(cntl.Name, "TextBox") Then
Select Case cntl.Value
Case Is < 2
End Select
End If
Next
This assumes that you want to do this with all TextBoxes in the Form,
and that they've got "TextBox" as part of their name.
There is also a TypeName(cntl) = "TextBox" construct, but I've not had
consistent results with it. It could be because I don't know how to
use it.