Hi

In your example file, change the function code to be
Function WhichTB(TargetTB As Control)
Dim WhichTB1 As String
    
    If TargetTB.Name = Me.TextBox1.Name Then
        WhichTB = "Date"
    Else
    End If
    
    If TargetTB.Name = Me.TextBox2.Name Then
        WhichTB = "Trust Name/Case Name"
    Else
    End If
    
    If TargetTB.Name = Me.TextBox3.Name Then
        WhichTB = "Referred By"
    Else
    End If
    
End Function
I just opened the form, left everything blank, and pressed the OK button and it brought back 3 lines
Date
Trust Name/Case Name
Referred By

Is that correct?

rylo