You can use the several mechanism of filtering data. PlotLabel
is an option for Plot. The options in a Plot that you have made are in the second part of plotwithlabel. That is to say, one way is
In[29]:= Cases[plotwithLabel[[2]], Rule[PlotLabel, x_] -> x] // First
Out[29]= This is Label