TextFrameDisplay property example

Private Sub TextFrame_Example()

     ' This example returns the current setting of TextFrameDisplay.

     Dim TextDisp As Boolean

     TextDisp = ThisDocument.Preferences.TextFrameDisplay

     MsgBox "The TextFrameDisplay property is: " & TextDisp

End Sub