【单选题】

在窗体上画一个名称为Text1的文本框，然后画一个名称为HScroll1的滚动条，其Min和Max属性分别为0和100。程序运行后，如果移动滚动框，则在文本框中显示滚动条的当前值，以下能实现上述操作的程序段是()

A.Private Sub HScroll_Change( )
Text1.Text=HScroll1.Value End Sub
B.Private Sub HScroll_Click( )
Text1.Text=HScroll1.Value End Sub
C.Private Sub HScroll_Change( )
Text1.Text=HScroll.Caption End Sub
D.Private Sub HScroll_Click( )
Text1.Text=HScroll.Caption End Sub