If Has Focus

[gheyman]

I have an unbound Text box that I want to put text in depending on what subform, on my form has the focus.

What is the VBA code for an If statement of a Subform has the Focus (Subform name is frmRFPManagerHyperLnkSubform)

Thanks!

 

[welshgasman]

I always refer to this first.

Forms: Refer to Form and Subform properties and controls

Example:

Private Sub cmdReport_Click()
Dim strFormFilter As String, strReportFilter As String
strReportFilter = "Caller='" & Me.txtCallerName & "'"
strFormFilter = Me.Controls("sfrmBTCalls").Form.Filter
If strFormFilter <> "" Then
    strReportFilter = strFormFilter & " AND " & strReportFilter
End If


DoCmd.OpenReport "rptBTCalls", acViewPreview, , strReportFilter
End Sub