textDecorationUnderline Property

Sets or returns a Boolean that represents whether text is underlined.

expression.textDecorationUnderline

expression    Required. An expression that returns one of the objects in the Applies To list.

Example

The following example underlines the text in the body of the active document.

    Dim objStyle As FPHTMLStyle

Set objStyle = ActiveDocument.body.Style
objStyle.textDecorationUnderline = True