Have you tried DLookup?
Example:
Me.Escrow_Officer = DLookup("Escrow_Officer", "tlkpTitle", "[Title_Co_ID] = 1")
Me.Escrow_Phone = DLookup("Escrow_Phone", "tlkpTitle", "[Title_Co_ID] = 1")
Me.Escrow_Fax = DLookup("Escrow_Fax", "tlkpTitle", "[Title_Co_ID] = 1")