单选题：在窗体上画一个标签．名为Label1，然后域一个名称为Hscroll1的滚动条，其Min和Max的属性分别为0和100。

在窗体上画一个标签．名为Label1，然后域一个名称为Hscroll1的滚动条，其Min和Max的属性分别为0和100。程序运行后，如果移动滚动框，则在相应的标签上显示滚动条的当前值，运行结果如图所示。

以下能实现上述功能的事件过程是
A．Private Sub Hscrolll Click()
　Label1.Caption=HScroll1.Value
　End Sub
B．Private Sub Hscrolll—Change()
　Label1.Caption=Hscroll1.Value
　End Sub
C．Private Sub Hscr0111＿Click．()
　Labell．Caprion=HSCrolll.Caption
　End Sub
D．Private Sub Hscrolll＿Change()
　Lahell.Caption=Hserolll.Caption
　End Sub