单选题：在窗体上画一个名称为Text1的文本框，然后画一个名称为Hscroll1的滚动条，其Min和Max属性分别为0和100。

在窗体上画一个名称为Text1的文本框，然后画一个名称为Hscroll1的滚动条，其Min和Max属性分别为0和100。程序运行后，如果移动滚动框，则在文本框中显示滚动条的当前值，如图所示。以下能显示上述操作的是
（　　）
A．Private Sub Hscroll 1_Change()
Text1.Text=HScroll l.Value
End Sub
B．Private Sub Hscroll1_(Slick()
Text1.Text=Hscroll1.Vallie
End Sub
C．Private Sub HScroll 1_Change()
Text1.Text=HScroll 1.Caption
End Sub
D．Private Sub HScroll 1_Click()
Textl.Text=HScroll l.Caption
End Sub