使用 FlatScrollBar 控件

FlatScrollBar 控件提供了与标准 Windows 滚动条相同的功能,同时提供了增强的界面。FlatScrollBar 可以以三种形式之一显示:标准形式,三维(斜角)滚动条;二维(平面)滚动条;或者带有可变箭头的平面滚动条,当鼠标指针悬停在其上时,箭头会变为斜角。

FlatScrollBar 可以作为水平或垂直滚动条使用。控件的 Orientation 属性决定了如何使用滚动条。

通过FlatScrollBar 也能够禁用滚动箭头。滚动箭头可以被缺省地禁用,或根据程序运行进行切换。例如,可以在滑块到达滚动条底部时禁用向下滚动箭头,提示用户无法再向下滚动。

可能的用途

在设计时或运行时设置 Min 和 Max 属性

Min 和 Max 属性决定了 FlatScrollBar 控件的上界和下界;这些属性可以在设计时设置,也可以在运行时设置。在设计时,可以使用属性工作表修改这些属性值。也可以右键单击该控件,选择“属性”调用“属性页“,然后在这里修改这些属性的值。

在运行时,可以重新设置Min Max 以适应不同的范围。例如,如果容器的大小改变了,那么可以重新设置 Max 值来反应容器新的高度或宽度。

SmallChange 和 LargeChange 属性

SmallChange 和 LargeChange 属性决定了当用户单击 FlatScrollBar 控件时,控件的 Value 属性如何增加或减少。SmallChange 属性指定了当用户按下向上或向下(左或右)滚动箭头时滑块移动多少单位。LargeChange 属性指定了当用户在控件内部区域单击而不是在滚动箭头或滑块上单击时,滑块移动多少单位。

使用 FlatScrollBar 显示不同的界面风格

FlatScrollBar 控件有三种不同的界面样式。所使用的界面由 Appearance 属性的设置决定。建议使用与程序用户界面整体风格最相一致的界面。

可以将 Appearance 属性设置为 fsb3D,这样 FlatScrollBar 就具有标准 Windows 滚动条风格。将其设置为 fsbFlat 会使滚动条具有 2–D 风格。将其设置为 fsbTrack3D 会使滚动条成为2维形式,但是滚动箭头和滑块将会对鼠标指针作出响应变为斜角。

根据滚动条的移动情况禁用滚动箭头

为了在使用 FlatScrollBar 时向用户提供更多的视觉反馈,可以根据控件的 Value 来禁用滚动箭头。这样就可以在任意时刻向用户显示可以执行的滚动操作。

箭头是根据它们的位置来指定的,而其位置的改变则依赖于控件的 Orientation 属性。水平滚动条的左箭头在垂直滚动条中就变成了上箭头,而右箭头变成了下箭头。这种关系在用于指定 Arrow 属性设置的常量名称中得到反映。

使用 Arrows 属性来指定可以使用控件的哪个滚动箭头。如果将控件设置为仅用一个箭头,那么另一个箭头将自动被禁用。缺省情况下,两个箭头都可以使用。

要根据控件的 Min 和 Max属性设置来禁用滚动箭头,可以在 FlatScrollBar 控件的 Change 事件中输入以下代码:

If FlatScrollBar1.Value = FlatScrollBar1.Min Then
    FlatScrollBar1.Arrows = fsbRightDown
ElseIf FlatScrollBar1.Value = FlatScrollBar1.Max Then
    FlatScrollBar1.Arrows = fsbLeftUp
Else
    FlatScrollBar1.Arrows = fsbBoth
End If