Manipulate[ Plot3D[ {Sin[x]-Sin[y]+c},{x,-5,5},{y,-5,5},Filling->Axis,FillingStyle->{Opacity[0.7],RGBColor[1,1,0]},
    Boxed->False,Axes->False],{c,-2,2}]