Return the control's parent form.The control's direct parent may be tab group etc so go up the tree until we find a form
The control
Dim f as Form Set f = FindControlParentForm(txtDate)