Check shape order

I use word automation in my Vb6 appl.
Is there a way to check the shapes order.
I have in my word doc several shapes
I want to place in my vbform several checkboxes to check or uncheck to put the selected word shape in front or to the back.
I can set the shape in front or back like so

VB Code:

AppWord.activeDocument.Shapes(MyShape).ZOrder msoBringToFront

But how can i check later again if the shape is on top or at the back?
(I don't want to keep a seperate var)

Try the ZOrderPosition property.