How t o reference a specific control from a function

[LAS]

I'm creating a function to empty all the detail controls in any form unless
they have a control source. I'm copying most of this from
http://www.tek-tips.com/faqs.cfm?fid=5010 (very good little article). I
can't figure out if there's a way to reference a specific control, which all
of my forms will have, without naming the form variable, even though I'm in
a WITH structure. Is there a way?

With frmSomeForm
frmSomeForm("txtFocus").SetFocus CAN I AVOID NAMING THE
FORM

VARIABEL HERE, SINCE I'M IN A WITH STRUCTURE?
For Each ctl In .Detail.Controls
If ((ctl.ControlType = acTextBox) _
Or (ctl.ControlType = acCheckBox) _
Or (ctl.ControlType = acComboBox) _
Or (ctl.ControlType = acListBox)) _
And (Left$(ctl.ControlSource, 1) <> "=") Then
ctl.Value = Null
End If
Next ctl
End With

 

[David W. Fenton]

With frmSomeForm
.Controls("txtFocus").SetFocus

Or:

With frmSomeForm
!txtFocus.SetFocus