No output from Plot3D[ ]?

It is the following formula.

Plot3D[((1/(x + 5))*Exp[-I (x + 5)*10] - (1/(3 + I*Pi*y))*
     Exp[-I (3 + I*Pi*y)*10] + (1/(3 + I*Pi*y)) - (1/(x + 
        5)))*((1/(x + 5))*Exp[I (x + 5)*10] - (1/(3 - I*Pi*y))*
     Exp[I (3 - I*Pi*y)*10] + (1/(3 - I*Pi*y)) - (1/(x + 
        5)))*(1/(x^2 + y^2)), {x, 0, 100}, {y, 0, 100}]

Perhaps this is because Plot3D does not plot complex functions by default.

Try wrapping Re[…] around the expression you want to plot. If that works then you can replace Re with Im and see the imaginary part.