Block[{f=Sin[x+I y]},ParametricPlot[Evaluate[{Re[f],Im[f]}],{x,-Pi,Pi},{y,-2,2},Mesh->Automatic]]

?f