DisplayVerticalScrollBar 属性

       

如果该属性值为 True,则在指定的窗口中显示垂直滚动条。Boolean 类型,可读写。

示例

本示例在 Windows 集合的各个窗口中显示垂直和水平滚动条。

Dim winLoop As Window

For Each winLoop In Windows
    winLoop.DisplayVerticalScrollBar = True
    winLoop.DisplayHorizontalScrollBar = True
Next winLoop

本示例切换显示活动窗口中的垂直滚动条。

Dim winTemp As Window

Set winTemp = ActiveDocument.ActiveWindow
winTemp.DisplayVerticalScrollBar = _
    Not winTemp.DisplayVerticalScrollBar