This was entirely built by the Expression Builder. I didn't type anything, not one letter or character!
ConcatenateText("(",GRxInsTel_Business1.area_code,") ",
ExtractSubstring(GRxInsTel_Business1.phone_no, 0, 3),"-",
ExtractSubstring(GRxInsTel_Business1.phone_no, 3, 4))