borderBottomStyle Property

Microsoft FrontPage Visual Basic

previous page next page

borderBottomStyle Property

Returns or sets a String that represents the line style of the bottom border of a specified object.

expression.borderBottomStyle

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

Remarks

The String for the borderBottomStyle property can be one of the following values:

`none`	Border is not drawn.
`dotted`	Border is a dotted line on the Macintosh platform with Microsoft Internet Explorer version 4.01 or later, and a solid line on the Microsoft Windows and Unix platforms.
`dashed`	Border is a dashed line on the Macintosh platform with Internet Explorer 4.01 or later, and a solid line on the Windows and Unix platforms.
`solid`	Border is a solid line.
`double`	Border is a double line drawn on top of the background of the object. The sum of the two single lines and the space between equals the value of the borderBottomWidth property. The borderBottomWidth property must be at least 3 pixels wide to draw a double border.
`groove`	3-D groove is drawn in colors based on the value of the border color.
`ridge`	3-D ridge is drawn in colors based on the value of the border color.
`inset`	3-D inset is drawn in colors based on the value of the border color.
`outset`	3-D outset is drawn in colors based on the value of the border color.

Example

The following example sets the color, style, and size for the bottom, left, right, and top borders of the specified IHTMLElement object.

    Sub SetBorders(objElement As IHTMLElement, strColor As String, _
        strStyle As String, strWidth As String)
    With objElement.Style
        'Sets the bottom border properties.
        .borderBottomColor = strColor
        .borderBottomStyle = strStyle
        .borderBottomWidth = strWidth

        'Sets the left border properties.
        .borderLeftColor = strColor
        .borderLeftStyle = strStyle
        .borderLeftWidth = strWidth

        'Sets the right border properties.
        .borderRightColor = strColor
        .borderRightStyle = strStyle
        .borderRightWidth = strWidth

        'Sets the top border properties.
        .borderTopColor = strColor
        .borderTopStyle = strStyle
        .borderTopWidth = strWidth
    End With
End Sub

Use the following example to call the preceding subroutine.

    Sub CallSetBorders()
    Call SetBorders(ActiveDocument.body.all _
        .tags("p").Item(0), "blue", "dashed", "thick")
End Sub

previous page start next page