Visual Basic 滚动条 ScrollBarScrollBar 滚动条控件在窗体上显示垂直和水平滚动条。有两种类型的滚动条控件：用于水平滚动条的 HScrollBar 和用于垂直滚动条的 VScrollBar。它们相互独立使用。
让我们从工具箱中单击 HScrollBar 控件和 VScrollBar 控件，并将它们放置在表单上。
ScrollBar 控件的属性以下是 ScrollBar 滚动条控件的一些常用属性:
编号属性 & 描述1AutoSize
获取或设置一个值，该值表示滚动条是否自动调整大小以适应其内容。
2BackColor
获取或设置控件的背景色。
3ForeColor
获取或设置滚动条控件的前景色。
4ImeMode
获取或设置此控件支持的输入法编辑器（IME）模式。
5LargeChange
获取或设置要向值 当滚动框移动一段距离时的属性。
6Maximum
获取或设置可滚动范围的值的上限。
7Minimum
获取或设置可滚动范围的值的下限。
8SmallChange
获取或设置当滚动框移动一小段距离时，要在 Value 属性中添加或减去的值。
9值
获取或设置一个数值，该数值表示滚动条控件上滚动框的当前位置。
ScrollBar 控件的方法以下是 ScrollBar 滚动条控件的一些常用方法:
编号方法名称 & 描述1OnClick
生成 Click 事件。
2Select
激活控件。
ScrollBar 控件的事件以下是 ScrollBar 滚动条控件的一些事件:
编号事件 & 描述1Click
单击控件时发生。
2DoubleClick
当用户双击控件时发生。
3Scroll
移动控件时发生。
4值Changed
通过处理滚动事件或以编程方式更改 Value 属性时发生。
实例在本例中，让我们在运行时创建两个滚动条。让我们双击表单，并在打开的窗口中输入以下代码:
Public Class Form1 Private Sub Form1_Load(sender As Object, e As EventArgs) _ Handles MyBase.Load 'create two scroll bars Dim hs As HScrollBar Dim vs As VScrollBar hs = New HScrollBar() vs = New VScrollBar() 'set properties hs.Location = New Point(10, 200) hs.Size = New Size(175, 15) hs.Value = 50 vs.Location = New Point(200, 30) vs.Size = New Size(15, 175) hs.Value = 50 'adding the scroll bars to the form Me.Controls.Add(hs) Me.Controls.Add(vs) ' Set the caption bar text of the form. Me.Text = "cankaoshouce.com" End SubEnd Class当使用 Microsoft Visual Studio 工具栏上的 开始 按钮执行并运行上述代码时，它将显示以下窗口: