currentStyleState Property

Returns an IFPStyleState object that represents the style state of the current document.

expression   Required. An expression that returns a DispFPHTMLDocument object.

Example

The following example returns the style state of the current document. The display type of the current style state is displayed to the user.

Sub StyleState()
'References the style state of the current document

    Dim objApp As FrontPage.Application
    Dim objDoc As DispFPHTMLDocument
    Dim objStyleState As IFPStyleState

    Set objApp = FrontPage.Application
    Set objDoc = objApp.ActiveDocument
    'Create a reference to the IFPStyleState object.
    Set objStyleState = objDoc.currentStyleState
    MsgBox "The display type of the current style state is " & _
            objStyleState.Display

End Sub