Open textbox shape properties window through VBcode

I use Word automation in my VB6 application
Set Appword = createObject("Word.Application")
Dim Tbox
Set Tbox = Appword.Selection.ShapeRange
'...ferther actions

What i wan to do is to show the build in Textbox shape or picture properties window, an call these from a VB form command button
So call it from code instead of manually from the word menu, Format,Text box
Does someone know how?

Private sub Command1_Click()
'..Code for showing Text box shape properties window
end sub

Private sub Command2_Click()
'..Code for showing picture shape properties window
end sub